<% function defilter_mysql (data) txt=replace(data,"'",chr(39)) txt2=replace(txt,""",chr(34)) defilter_mysql=txt2 end function mysql_server = "localhost" mysql_user = "bsekercioglu" mysql_pass = "4323626#68" mysql_db = "stso" Connection_DSN= "DRIVER={MySQL ODBC 3.51 Driver}; SERVER="&mysql_server&"; UID="&mysql_user&"; pwd="&mysql_pass&";db="&mysql_db&";" Set con= Server.CreateObject("ADODB.Connection") con.Open Connection_DSN con.execute ("SET NAMES 'latin5'") haberSQL="select * from fuarlar where yayinda=1 ORDER BY ID DESC" set haberler=con.execute(habersql) %>
FUAR DUYURULARI
ORGANİZASYONUN ADI
TARİHİ
İLETİŞİM-AYRINTILI BİLGİ
<%do while not haberler.eof %>
<%=defilter_mysql (haberler("baslik"))%>
<%=defilter_mysql (haberler("tarih"))%>
<%=defilter_mysql (haberler("iletisim"))%>
<% haberler.movenext loop haberler.close set haberler=nothing %>
