日期:2014-05-16  浏览次数:20990 次

ASP+ACCESS 在保存页面时怎么能丢值?
本帖最后由 ddd0301 于 2013-08-14 18:28:04 编辑
我在页面中加入了一个SELECT下拉表单,以下是代码:
 <select name="type" id="type">
                  
                     <%set rsd=server.createobject("adodb.recordset")
                      sql2="select * from table where code="&request.QueryString("code") &""
                      rsd.open sql2,conn,1,1%>
                      <%if int(rsd(""&rs_1("do_ass")))>1 then %> 
                    <option value="<%= rs_1("do_ass")%>">ass</option>
                    <%end if
                     if rsd(""&rs_1("do_gui"))>1 then %> 
                    <option value="<%= rs_1("do_gui")%>">gui</option>
                    <%end if
rsd.close
set rsd=nothing%>
                  </select>

用来选择只有do_ass 和 do_gui 大于1时出现选项,
以下是保存代码:


<% if request.querystring("action")="save" then

set qrs=server.createobject("adodb.recordset")
sql="select * from table2 "
qrs.open sql,conn,1,3
qrs.addnew

qrs("code")=server.HTMLEncode(trim(request.form("file-code")))

qrs("surname")=request.form("surname")

qrs("name")=request.form("name")

set rs_3=server.createobject("adodb.recordset")
sql2="select * from ship_payment where sort_id="&rs_1("sort_id")&""
rs_3.open sql2,conn,1,3
if rs_3("do_ass")=trim(request.form("type")) then
qrs(""&rs_1("spend_ass"))=rs_1("cost_ass")
qrs("spend_total")=rs_1("cost_ass")