主题:  Help!Help!

seconed6

职务:普通成员
等级:1
金币:1.0
发贴:189
#12002/9/20 15:31:14
"HTTP 500 - 内部服务器错误
Internet Explorer "

直接运行下面一段程序是这个提示, 怎么讲。??!
<%
dim name,password
name = Request.Form("name") '获取用户名信息
password = Request.Form("password") '获取密码的信息
if request.form("action") <> "确定添加" then
response.write"您是非法进入"
response.end '这句表示要求服务器立即停止解释之象下面的语句
end if

set rs=server.createobject("adodb.recordset")
sql="insert into tab(name,password) values ('"&name&"','"&password&"')"
conn.Execute(sql)

response.write"内容添加成功"
%>



5D荣誉斑竹

职务:普通成员
等级:3
金币:10.0
发贴:1480
#22002/9/20 15:38:59
conn.Execute(sql)
你的CONN在那里啊?


IE->工具->Internet选项->高级->显示友好的HTTP错误信息
把前面的钩去掉,你能看到具体的错误信息.



seconed6

职务:普通成员
等级:1
金币:1.0
发贴:189
#32002/9/20 15:46:26
<% dim conn
mmdb="user.MDB"
Set tol = Server.CreateObject("ADODB.Connection") '
conn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&mmdb&"")
%>

这可以吗?? 这两天我就搞这个问题了



5D荣誉版主

职务:普通成员
等级:2
金币:10.0
发贴:658
#42002/9/20 15:54:17
& Server.MapPath(""&mmdb&"")
这个地方有问题。
server.mappath("user.mdb")



5D荣誉斑竹

职务:普通成员
等级:3
金币:10.0
发贴:1480
#52002/9/20 15:55:37
Dim DBconn
Dim DBPath

Set DBconn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("yourMDB.mdb")
DBconn.Open"driver={Microsoft Access Driver (*.mdb)};dbq="&DBPath



seconed6

职务:普通成员
等级:1
金币:1.0
发贴:189
#62002/9/20 16:10:40
这些都改过了。
可我的程序还是不行啊!运行检查没有错误,可是数据就是写不进去!
这是为什么啊!!



今晚在线

职务:普通成员
等级:3
金币:1.0
发贴:761
#72002/9/21 2:10:57
conn.Execute(sql)

改成 tol.execute(sql)