<% Set db = server.createobject("adodb.connection" ) db.Open "provider=microsoft.jet.oledb.4.0; data source = " & Server.MapPath("data.mdb" ) &";" Set rs = db.Execute("select * from banner" ) %> <%do while not rs.eof%> <%rs.movenext loop %>
" width="1000" border="0" align="left" height="156" />
<% dim db, rs, sayi Set db = server.createobject("adodb.connection" ) db.Open "provider=microsoft.jet.oledb.4.0; data source = " & Server.MapPath("data.mdb" ) &";" Set rs = db.Execute("select * from reklam" ) %>

<% set baglantim = server.createobject("adodb.connection") baglantim.open"provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("hakkimizda/hakkimizda.mdb") set rs = server.createobject("adodb.recordset") rs.open"select*from hakkimizda",baglantim,1,3 rs.movelast %> <%do while not rs.eof%> <%rs.movenext loop %>
<%=rs("hakkimizda")%>

 

 

Copyright @ cocukkulubu.com | Tüm hakkı saklıdır.|