| 发表于:2008-01-23 16:26:12 楼主 |
自己写的一个简单的查询页面,输入用户号,查询年份,点提交后就会查询得到该年内12个月的水费情况。 执行结果是成功的。但是文本框中输入的用户号,查询年份被清空了。我想保留不被清空,请问怎么实现。 表单如下 <form name="userreg" method='post' action="?action=regpost"> 以下代码实现了提交后,查询的功能 <% select case request("action") case "regpost" call regpost() end select%> <% '●●●●●●●●●●●●●●●●●●●● '●过程名:regpost() ● '●功 能:执行查询功能 。 ● '●●●●●●●●●●●●●●●●●●●● sub regpost() if request.form("yhh")="" then response.write(" <script> alert('请输入一个用户号,再点击“查询”');javascript:history.back(); </script> ") response.end end if if request.form("nian")="" then response.write(" <script> alert('请输入要查询的年份,再点击“查询”');javascript:history.back(); </script> ") response.end end if yhno = request.form("yhh") cxnian = request.form("nian") cxyue = request.form("yue") connstr="driver={sql server};server=192.168.0.89;database=water;uid=sa;pwd=12345;" set conn = server.createobject("adodb.connection") conn.open connstr set rs= server.createobject("adodb.recordset") sql="select 用户号,用户名称,用户地址,污水费计费度 as 耗度,污水费金额 as 污水费,水费金额 as 水费,合计金额,计费日期 from t_抄表记录表 where 1=1" if yhno <> "" then sql = sql + " and 用户号 = '"&yhno&"'" end if if cxnian <> "" then sql = sql + " and year(计费日期) = '"&cxnian&"'" end if if cxyue <> "" then sql = sql + " and month(计费日期) = '"&cxyue&"'" end if sql = sql + " order by 计费日期 desc" rs.open sql,conn,1,1 end sub %> |
|
|
|
|