<% islem=request.QueryString("islem") select case islem case "Sirala" For i=1 To Temizle(request.Form("cid").count) cid=temizle(request.Form("cid")(i)) Raw=temizle(request.Form("Raw")(i)) if Raw="" then Raw=0 conn.Execute("update Table_ContentDocuments Set Raw='"& Raw &"' where DocumentID="& cid &"") next Response.Redirect Request.ServerVariables("HTTP_REFERER") 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_ContentDocuments where DocumentID="& cid &" and CultureID="&LanguageID) 'Response.Redirect Request.ServerVariables("HTTP_REFERER") %> <%end select%>

#

Dosya Adı

Tipi

Sıra

İşlemler

<% i=1 Set TabDocuments = Conn.Execute("SELECT * FROM Table_ContentDocuments where GroupID = "& grupid &" and CultureID="& LanguageID &" order by Raw desc") %> <%Do While not TabDocuments.EOF%>

<%=i%>

"><%=TabDocuments("Title")%>

<%If TabDocuments("DocumentType")=1 then%><%elseIf TabDocuments("DocumentType")=2 then%><%elseIf TabDocuments("DocumentType")=3 then%><%elseIf TabDocuments("DocumentType")=4 then%><%elseIf TabDocuments("DocumentType")=5 then%><%end if%>

" onKeyUp="SadeceSayi(this)"/>

">Güncelle

">Sil

" name="cid" id="cid"/> <% i=i+1 TabDocuments.MoveNext Loop %> <% TabDocuments.Close %>