infodel.asp

来自「工资管理系统功能齐全包括工人工资信息查询.」· ASP 代码 · 共 17 行

<!--#include file="CheckLogin.asp"-->
<!--#include file="StudentConn.asp" -->
<%
dim strStudentNum
strStudentNum=request("StudentNum")
if strStudentNum<>"" then
	MM_editConnection = MM_StudentConn_STRING
	MM_editQuery = "delete from StudentInfo where StudentNum = '" & strStudentNum & "'"
	Set MM_editCmd = Server.CreateObject("ADODB.Command")
    MM_editCmd.ActiveConnection = MM_editConnection
    MM_editCmd.CommandText = MM_editQuery
    MM_editCmd.Execute
    MM_editCmd.ActiveConnection.Close
	Session("txtDel")="Yes"
	response.redirect "InfoQuery2.asp?" & Session("strQureyString")
end if
%>