单击提交按钮后再触发ASP代码,而不是一打开页面就触发
新手初学ASP,请高手指教,
每次打开这个页面,就自动运行了这段代码,我想单击Button按钮后,再触发这段代码,怎么做?
<%
Dim myconn,mysql,jsy,fprq,bzdh,jzuser_id,jzzt

set myconn=server.CreateObject("ADODB.Connection")
myconn.Connectionstring = MM_conn_STRING
myconn.open

jzzt=1
bzdh=request.QueryString("bz_id")
fprq=now()
jsy=request("jsy")
jzuser_id=Session("MM_Username")

mysql="update bzdj set jzzt='"&jzzt&"',jzuser_id='"&jzuser_id&"',jsy='"&jsy&"',fpdata='"&fprq&"' where bz_id='"&bzdh&"'"
if request("gzbc")<>"" then
myconn.execute mySql
response.write "<script language=javascript>alert('分派成功！');window.location.href='main.asp';</script>"
response.End
end if
%>


[解决办法]
给form提交个参数，这个参数不为空的时候 执行你的代码，比如

HTML code

<%    act = request("act")    if act = "do"        你的代码    end if%><form action="?act=do">。。。。</form>