UC知道asp问题,谁可以帮我看一下
来源：百度知道 编辑：UC知道 时间：2024/04/29 05:39:52
我做了一个简单的登录页表,里面有三个文件,登录表单default提交给staff处理,还有一个CONN,数据库名为admin,字段名uname,ucode.看了很多次好像没什么问题,但是就是不行,现在我把所有代码发给你们,你可以放在你那里试一下,帮我改一下哪里错了,好吗,小弟无路可走了,送上全部积分了.
1,conn.asp
<%
dim conn
dim connstr
on error resume next
'设置adodb数据源连接
set conn=server.createobject("ADODB.CONNECTION")
'设置SQL连接
connstr="DBQ="+server.mappath("admin.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
conn.open connstr
%>
2,default.asp页面
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
</head>
<body>
<p> </p>
<blockquote>
<p> </p>
<p> </p>
<table width="754" height="209" border="0" cellpadding="0" cellspacing="0">
<tr>
<td colspan="2">
1,conn.asp
<%
dim conn
dim connstr
on error resume next
'设置adodb数据源连接
set conn=server.createobject("ADODB.CONNECTION")
'设置SQL连接
connstr="DBQ="+server.mappath("admin.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
conn.open connstr
%>
2,default.asp页面
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
</head>
<body>
<p> </p>
<blockquote>
<p> </p>
<p> </p>
<table width="754" height="209" border="0" cellpadding="0" cellspacing="0">
<tr>
<td colspan="2">
用下面代码替换掉conn.asp的全部内容，就可以了~
<%
on error resume next
connstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("admin.mdb")
Set Conn=Server.CreateObject("ADODB.Connection")
conn.Open connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，请检查连接字符串"
Response.End
End If
%>
等待答案，学习中
connstr="DBQ="+server.mappath("admin.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
是asp吗？
connstr="DBQ="&server.mappath("admin.mdb")&";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
字符串连接要用&
把这个
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
改为
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
看看，不一定是这个原因
楼主 你最好把报错文件放出来 这里没多少人会把你代码拿去再测试 还要创一个数据库 你把具体报错写出来 这样不好看呀