<% cid= Temizle(request.QueryString("cid")) If cid="" then cid=0 if cid="" or isnumeric(cid)=false then response.Redirect("documents.asp") %>
Yeni Yetkili Oluştur
<% islem=request.QueryString("islem") select case islem case "Delete" set DocumentDelete=conn.execute("delete Table_Yonetim_Kadrosu where ID="& cid &"") Response.Redirect Request.ServerVariables("HTTP_REFERER") %>
! Sayfa silindi ...
<%end select%>
#
Ad Soyad
İşlemler
<% i=1 Set TabContent = Conn.Execute("SELECT * FROM Table_Yonetim_Kadrosu ") %> <%Do While not TabContent.EOF%> <% i=i+1 TabContent.MoveNext Loop %> <% TabContent.Close %>