UC知道ASP错误代码为:0x800A01A8,请高手指点!
来源：百度知道 编辑：UC知道 时间：2024/06/17 20:57:35
我这段代码是验证用户名是否存在,如果存在就转到另一个名为12.asp的网面,并将该用户的所有信息显示出来!(这是工作需要,一定要显示出来,因为如果该用户的联系信息有错时,要及时修改.),如果验证后只是提示重复,我的网页能正常显示,但我要将ID传过去,却就报错:
错误类型：
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''
/1.asp, 第 43 行
我的检测新用户代码如下,但在DW里将"检测新用户"的服务器行为里在转向的网页里添加了参数时就变成了"动态文本"这是为什么?请高手指点!
<%
' *** Redirect if username exists
MM_flag="MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
MM_dupKeyRedirect="12.asp?ID=” & (R_tel.Fields.Item('ID').Value) (此处是第43行)
MM_rsKeyConnection=MM_conn_STRING
MM_dupKeyUsernameValue = CStr(Request.Form("username"))
MM_dupKeySQL="SELECT username FROM 123 WHERE username='" & Replace(MM_dupKeyUsernameValue,"'","''") & "'"
MM_adodbRecordset="ADODB.Recordset"
set MM_rsKey=Server.CreateObject(MM_adodbRecordset)
MM_rsKey.ActiveConnection=MM_rsK
错误类型：
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''
/1.asp, 第 43 行
我的检测新用户代码如下,但在DW里将"检测新用户"的服务器行为里在转向的网页里添加了参数时就变成了"动态文本"这是为什么?请高手指点!
<%
' *** Redirect if username exists
MM_flag="MM_insert"
If (CStr(Request(MM_flag)) <> "") Then
MM_dupKeyRedirect="12.asp?ID=” & (R_tel.Fields.Item('ID').Value) (此处是第43行)
MM_rsKeyConnection=MM_conn_STRING
MM_dupKeyUsernameValue = CStr(Request.Form("username"))
MM_dupKeySQL="SELECT username FROM 123 WHERE username='" & Replace(MM_dupKeyUsernameValue,"'","''") & "'"
MM_adodbRecordset="ADODB.Recordset"
set MM_rsKey=Server.CreateObject(MM_adodbRecordset)
MM_rsKey.ActiveConnection=MM_rsK
MM_dupKeyRedirect="12.asp?ID=” & (R_tel.Fields.Item("ID").Value)
原因是因为你的(R_tel.Fields.Item("ID").Value)没有取到值~`
你看一下~`
==================
在这行的下面
If (CStr(Request(MM_flag)) <> "") Then
加上这一句
Response.Write R_tel.Fields.Item("ID").Value
Response.End
执行下页面~`看有没有显示东西~~没有的话就是没有取到值~`