我的ASP程序用游览器游览时提示这个的错误:“无法显示网页
试图访问的网页出现问题,无法显示。
--------------------------------------------------------------------------------
请尝试执行下列操作:
单击刷新按钮,或稍后重试。
打开 127.0.0.1 主页,然后查找与所需信息相关的链接。
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务
--------------------------------------------------------------------------------
技术信息(用于支持人员)
错误类型:
Provider (0x80020005)
类型不匹配。
/CL_Addnewtxjl.asp, 第 13 行
浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; TencentTraveler )
网页:
POST 145 ??? /CL_Addnewtxjl.asp
时间:
2006年10月12日, 20:14:49
详细信息:
Microsoft 支持
”
我的原程序是: <%
'If Request.form("name")<>"" and Request.form("xb")<>"" and Request.form("ln")<>"" and Request.form("xl")<>"" and Request.form("ywgx")<>"" and Request.form("qq")<>"" and Request.form("iocq")<>"" and Request.form("sj")<>"" and Request.form("dh")<>"" and Request.form("msn")<>"" and Request.form("txdz")<> and Request.form("eamil")<>"" and Request.form("grzy") then
%>
<!--#Include file="link_database.asp"-->
<%set Addnewrs=server.CreateObject("ADODB.Recordset") '建立一个表组件为Addnewrs,名字可以自己取的.%>
<%
AddnewSql="select * from txjlbiao"
Addnewrs.Open AddnewSql,dchconn,1,3
'-----------------------------------------------------------------------------
Addnewrs.Addnew '向数据库写入内容
Addnewrs("txjl_name")=request.form("name")
Addnewrs("txjl_xb")=request.form("xb")
Addnewrs("txjl_ln")=request.form("xl")
Addnewrs("txjl_ywgx")=requst.form("ywgx")
Addnewrs("txjl_qq")=request.form("qq")
Addnewrs("txjl_oicq")=request.form("oicq")
Addnewrs("txjl_sj")=request.form("sj")
Addnewrs("txjl_dch")=request.form("dh")
Addnewrs("txjl_msn")=request.form("msn")
Addnewrs("txjl_txdz")=request.form("txdzs")
Addnewrs("txjl_eamil")=request.form("eamil")
Addnewrs("txjl_grzy")=request.form("grzys")
Addnewrs("txjl_date")=now()
Addnewrs.update ' //////////当把数据写完之后,就自动更新
'--------------------------------------------------------------------------------
%>
<%
' Else Response.Write "<script language=javascript>alert('请填写完整\n请重写……');self.location=(""Addnewtxjl.asp"");</script>"
'End If
%><%
Addnewrs.close '关闭表
set Addnewrs=nothing '清空表
dchconn.close '关闭数据库
set dchconn=nothing '清空数据库
%>