我是新手 大家来帮忙看看啊!
我编了一登陆页面 下面是VBScript部分
<%
Dim zh,mm
zh=Request.Form( "zh ")
mm=Request.Form( "mm ")
If zh <> " " and mm <> " " Then%>
<!--#include file= "ljsjk.asp "-->
<%
Dim dbcmd
Set dbcmd=Server.CreateObject( "Adodb.Command ")
dbcmd.ActiveConnection=dbcn
dbcmd.CommandText= "Select mm,yhsf From yhxx Where zh= ' "&zh& " ' "
dbcmd.CommandType=1
Set dbrs=dbcmd.Execute
If not dbrs.Eof And not dbrs.Bof Then
If dbrs( "mm ")=mm Then
Session( "username ")=zh
If dbrs( "yhsf ")= "1 " Then
Response.Redirect( "yhgl.asp ")
Else
Response.Write( "密码不对,请重新输入! ")
End If
Else
Response.Write( "对不起,您还没有注册! ")
End If%>
<%dbcn.Close
Set dbcn=Nothing
end if
End if%>
ljsjk.asp为
<%
Dim dbcn
Set dbcn=Server.CreateObject( "Adodb.Connection ")
dbcn.ConnectionString= "=dbq= "&Server.MapPath( "DATA\SPXXGLXT.mdb ")& ";Driver={Microsoft Access Driver(*.mdb)} "
dbcn.ConnectionTimeOut=40
dbcn.open
%>
可是运行总是出现
错误类型:
Microsoft OLE DB Service Components (0x80040E73)
指定的初始化字符串不符合 OLE DB 规定。
/ljsjk.asp, 第 6 行
请问我该怎么解决啊!谢谢了!
[解决办法]
dbcn.ConnectionString= "dbq= "&Server.MapPath( "DATA\SPXXGLXT.mdb ")& ";Driver={Microsoft Access Driver(*.mdb)} "
[解决办法]
把=去掉么~