Yeni Dosya Grubu Ekle
<% islem=request.QueryString("islem") select case islem case "Delete" cid=Temizle(Request.Querystring("cid")) if cid="" or isnumeric(cid)=false then response.Redirect("documents.asp?LanguageID="&LanguageID) set DocumentDelete=conn.execute("delete * From Table_ContentDocumentsGroup where DocumentID="& cid &" and CultureID="&LanguageID) set DocumentDelete=conn.execute("delete * From Table_Content_Documents where ParentID="& cid &"") 'Response.Redirect Request.ServerVariables("HTTP_REFERER") %>
! Dosya Grubu Silindi ...
<%end select%>
#
Dosya Adı
İşlemler
<% i=1 Set TabDocuments = Conn.Execute("SELECT * FROM Table_ContentDocumentsGroup where CultureID="& LanguageID &" order by DocumentID desc") %> <%Do While not TabDocuments.EOF%> <% i=i+1 TabDocuments.MoveNext Loop %> <% TabDocuments.Close %>