📄 delete.asp
字号:
<% option explicit%>
<!-- #include virtual="include/DataEnvi.asp" -->
<!-- #include virtual="include/Page.asp" -->
<%
Dim ObjDB,StrSQL,ObjRS,conn
Dim C,IntIDs
Dim objRSNode
IntIDs=Request.QueryString("IDs")
' Set objRSNode = server.CreateObject("ADODB.Recordset")
Set conn=Server.CreateObject("ADODB.Connection")
OpenDBCrm( conn )
Set C = Server.CreateObject ("CMS2003.DBhandle")
C.Init(conn)
Call C.Delete(IntIDs,"T_CRM_LinkMan")
conn.Close
Set ObjDB = Nothing
Response.Redirect "List.asp"
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -