?? init.asp
字號:
<%@ LANGUAGE = VBScript %><!-- #include file="include/adovbs.inc" --><!--#include file="include/dataconn.asp"--><!-- #include file="include/checksession.asp" -->
<%
set rs=server.createobject("adodb.recordset")
sql="delete * from hy where id<>126"
rs.open sql,conn,3,3
sql="select * from hyclub where id=126"
rs.open sql,conn,3,3
if not rs.eof then
rs("leftnumber")=""
rs("rightnumber")=""
rs.update
end if
rs.close
sql="delete * from hyclub where id<>126 "
rs.open sql,conn,3,3
sql="delete * from dlclub where hid<>126 "
rs.open sql,conn,3,3
sql="select * from dlclub where hid=126"
rs.open sql,conn,3,3
if not rs.eof then
rs("orders")=0
rs("allmoney")=10000
rs.update
end if
rs.close
sql="delete * from HyMoneyAccount"
rs.open sql,conn,3,3
sql="delete * from HyMoneyLog"
rs.open sql,conn,3,3
sql="delete * from orders"
rs.open sql,conn,3,3
sql="delete * from guestbook"
rs.open sql,conn,3,3
sql="delete * from commodity"
rs.open sql,conn,3,3
sql="delete * from CompanyYeji"
rs.open sql,conn,3,3
sql="delete * from friend"
rs.open sql,conn,3,3
sql="delete * from HfBook"
rs.open sql,conn,3,3
sql="delete * from HyBuDan"
rs.open sql,conn,3,3
sql="delete * from infoid"
rs.open sql,conn,3,3
sql="delete * from log"
rs.open sql,conn,3,3
sql="delete * from message"
rs.open sql,conn,3,3
sql="delete * from tongxunlu"
rs.open sql,conn,3,3
sql="delete * from t_InfoDetail"
rs.open sql,conn,3,3
sql="delete * from PaySignLog"
rs.open sql,conn,3,3
sql="delete * from pinglun"
rs.open sql,conn,3,3
'set rs=nothing
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -