b.asp'一个表单提交
<%=request("zhuanqu_user")%>'是从a.asp中获得的值,可以正常显示
add.asp'填加到数据
<%
hand_shijian=trim(request("hand_shijian"))
hand_jine=trim(request("hand_jine"))
hand_beizhu=trim(request("hand_beizhu"))
set rs=server.CreateObject("adodb.recordset")
sqlstr="select* from hand_auto"
rs.open sqlstr,conn,1,3
rs.addnew
rs("hand_user")=request("zhuanqu_user")rs("hand_shijian")=hand_shijian
rs("hand_jine")=hand_jine
rs("hand_beizhu")=hand_beizhu
rs("shijian")=now()
rs.update
rs.close
conn.close
set rs=nothing
set conn=nothing
%>