fason bayrak

tanım

<% ' Mehmet Ata [www.ancestor.tr.cx] ' andpaur@yahoo.com %> <%if request.cookies("nedir")="admin" then%> <%if request.form("adi")<>"" and request.form("link")<>"" then set bag=server.createobject("adodb.connection") bag.open "driver={microsoft access driver (*.mdb)}; dbq="& server.mappath ("ancestor.mdb") sql= "select * from a" set rs=server.createobject("adodb.recordset") rs. open sql,bag,1,3 rs.addnew rs("adi")=request.form("adi") rs("link")=request.form("link") rs.update rs.close set rs = nothing bag.close set bag = nothing response.write "Yeni Kayıt Dataya Girildi" end if%> Powered ßy Ancestor
<%set bag=server.createobject("adodb.connection") bag.open "driver={microsoft access driver (*.mdb)}; dbq="& server.mappath ("ancestor.mdb") sql= "select * from a" set rs=server.createobject("adodb.recordset") rs. open sql,bag,1,3 do while not rs.eof%> <%rs.movenext loop%>

" style="text-decoration: none"><%=rs("adi")%>      " style="text-decoration: none">Bunu Sil

<%rs.close set rs = nothing bag.close set bag = nothing%> <%end if%>