% set baglanti=server.createobject("adodb.connection") baglanti.open Cumle set rs=server.createobject("adodb.recordset") SQL="Select * from ziyaretcidefteri where id="&request.querystring("id") rs.open SQL,baglanti,1,3 if not rs.eof then Rs("onay")="Y" end if rs.update Rs.Close Set Rs=Nothing Baglanti.Close Set Baglanti=Nothing %>
Onaylama İşleminiz Tamamlanmıştır