saveuphtclass.asp

来自「contract management system」· ASP 代码 · 共 28 行

<!--#include file="../Inc/dbconn.asp" -->
<!--#include file="../Inc/config.asp" -->

<link href="../other/admin.css" rel="stylesheet" type="text/css">
<title><%=appname%></title>

<%
bianma=Trim(Request("bianma"))
name=Trim(Request("name"))
beizhu=Trim(Request("beizhu"))
id=trim(request("id"))
'response.write bianma&"<BR>"&name&"<BR>"&beizhu&"<BR>"&id
set rst=server.CreateObject("adodb.recordset")  
sql="EXEC  HT_UpHTFLAG '"&bianma&"','"&name&"','"&beizhu&"'"
rst.Open sql,Conn
set rst=nothing
call endconn ()

response.write "<script language=javascript>"	'Javascript 开始
				response.write"alert('完   毕！');"	'警告
				response.write"location.href='index.asp';"	'跳转到页面
				response.write "</script>"	

%>