关于ODBC连接的问题

jingxiaoping 2002-03-28 09:26:29

技术信息（适用于支持人员）

错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
/klhg/bbs/dl.asp, 第 31 行

浏览器类型：
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)

页：
POST 23 bytes to /klhg/bbs/dl.asp

POST 数据:
username=11&userpass=11

时间：
2002年3月28日, 9:26:09

详细信息：
Microsoft 支持

...全文

107 19 打赏收藏转发到动态举报

写回复

用AI写文章

19 条回复

切换为时间正序

请发表友善的回复…

发表回复

jingxiaoping 2002-03-29

打赏
举报

难道没有人解决吗？

jingxiaoping 2002-03-29

打赏
举报

谁能解决？

21cnapple 2002-03-28

打赏
举报

是否用的NTFS格式，e:\www\klhg\db\data.mdb权限了

julyclyde 2002-03-28

打赏
举报

看代码吧
这个错误信息太模糊了

jingxiaoping 2002-03-28

打赏
举报

听不懂，晕？？？？？？？？？？？？？？？？？？

ksy 2002-03-28

打赏
举报

应该是Form的问题.

jingxiaoping 2002-03-28

打赏
举报

谁能解决，我将剩下分的一半给他。

jingxiaoping 2002-03-28

打赏
举报

肯定是global.asa的问题
<SCRIPT LANGUAGE=VBScript RUNAT=Server>

sub application_onstart()
application("klhgcn")="driver={microsoft access driver (*.mdb)};dbq=e:\www\klhg\db\data.mdb"
'application("klhgcn")="driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("db/data.mdb")
end sub
sub session_onstart()
set conn=server.CreateObject("adodb.Connection")
conn.Open(application("klhgcn"))
set bc=server.createobject("mswc.browsertype")
ip=request.servervariables("remote_addr")
name=request.servervariables("remote_bost")
curl=request.servervariables("path_info")
browser=bc.browser
ver=bc.version
conn.execute("insert into ipan (ip,name,curl,browser,ver) values ('"&ip&"','"&name&"','"&curl&"','"&browser&"','"&ver&"')")
end sub
</SCRIPT>

ozy 2002-03-28

打赏
举报

贴出来呀

jinhaiou 2002-03-28

打赏
举报

給個原馬

jingxiaoping 2002-03-28

打赏
举报

上面的程序是global.asa，而下面的程序是asp中的。

khnj110 2002-03-28

打赏
举报

好像在global.asa里不能使用response吧！

jingxiaoping 2002-03-28

打赏
举报

是调用上面程序的那一段，干脆我也列出吧。
<%
response.buffer=true
%><html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">

</style>

</head>
<script language="javascript">
function re()
{
window.parent.location.reload()
}
function submita()
{
if (window.event.keycode==13)
{
document.form1.submit()
}
}
</script>
<body bgcolor="#FFFFFF" text="#000000" background="../images/7.gif">
<%
msg=request.querystring("msg")

username=request.form("username")
userpass=request.form("userpass")
if username="" then
%>

<center>
<form name="form1" action="dl.asp" method="post">
<br>
<br>
<br>
<table width="40%" border="1" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF">
<tr bgcolor="#CCCCCC">
<td colspan="2" height="33">
<div align="center">后台管理用户登录</div>
</td>
</tr>
<tr>
<td height="33" width="30%">
<div align="center">管理员名称</div>
</td>
<td height="33" width="70%" align="center">
<input type="text" name="username">
</td>
</tr>
<tr>
<td height="36" width="30%">
<div align="center">管理员口令</div>
</td>
<td height="36" width="70%" align="center">
<input type="password" name="userpass" onkeypress="submita()">
</td>
</tr>
<tr>
<td height="41" width="30%"> </td>
<td height="41" width="70%">
<p align="center">
<input type="submit" name="Submit" value="登录">
<input type="reset" name="Submit2" value="取消"><%=msg%>
</p>
</td>
</tr>
</table>
</form>
</center>
<%
else
set cn=server.createobject("adodb.connection")
cn.open application("klhgcn")
set rs=server.createobject("adodb.recordset")
rs.open "select * from manager where managername='"&username&"' and managerpass='"&userpass&"'",cn,1,3
if rs.eof then
response.redirect "dl.asp?msg=用户名或密码错误"
else
session("admindl")="ok"
session("adminname")=rs("managername")

response.write "<script language='javascript'>re()</script>"
end if
end if
%>
</body>
</html>

zubin006 2002-03-28

打赏
举报

请问，错误的第31行是哪一行？

jingxiaoping 2002-03-28

打赏
举报

肯定是global.asa的问题，以下是具体的内容。
<SCRIPT LANGUAGE=VBScript RUNAT=Server>

sub application_onstart()
application("klhgcn")="driver={microsoft access driver (*.mdb)};dbq=e:\www\klhg\db\data.mdb"
'application("klhgcn")="driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("db/data.mdb")
end sub
sub session_onstart()
set conn=server.CreateObject("adodb.Connection")
conn.Open(application("klhgcn"))
set bc=server.createobject("mswc.browsertype")
ip=request.servervariables("remote_addr")
name=request.servervariables("remote_bost")
curl=request.servervariables("path_info")
browser=bc.browser
ver=bc.version
conn.execute("insert into ipan (ip,name,curl,browser,ver) values ('"&ip&"','"&name&"','"&curl&"','"&browser&"','"&ver&"')")
end sub
</SCRIPT>

zubin006 2002-03-28