用户再填写登入信息后提交到 drpro.asp
drpro.asp代码如下
<%
dim conn
dim connstr
dim gsmc
dim jjz
dim lxfs
connstr="DBQ="+server.mappath("pm.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr

gsmc=trim(request.Form("gsmc"))
jjz=trim(request.Form("jjz"))
lxfs=trim(request.Form("lxfs"))

if gsmc="" then
   response.write "<script language=JavaScript>" & chr(13) & "alert('请输入部门或子公司名称！');window.location.href='index.asp';</script>"
elseif jjz="" then
   response.write "<script language=JavaScript>" & chr(13) & "alert('请输入竞拍人姓名！');window.location.href='index.asp';</script>"
elseif lxfs="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('请输入联系方式！');window.location.href='index.asp';</script>"
else
    session("gsmc")=gsmc
    session("jjz")=jjz
    session("lxfs")=lxfs
   
    set rs=server.CreateObject("ADODB.RecordSet")
    rs.open "select * from dr where gsmc='"&gsmc&"' and jjz='"&jjz&"'",conn,3,3
    if rs.eof then
       rs.addnew
       rs("gsmc")=gsmc
       rs("jjz")=jjz
       rs("lxfs")=lxfs
       rs("drsj")=now()
       rs("ip")=request.servervariables("remote_addr")
       rs.update
    end if   
    rs.close
    set rs=nothing
    Response.Redirect "paim.asp"
end if

%>
为什么我在paim.asp中要调用session("gsmc")却调用不了他的值，页面上看显示是空白，这是为什么？望达人解答

是的，access数据库中添加数据是成功的。说明trim(request.Form("gsmc"))
是没有问题的。

有值，太古怪了...