將provider設為sqloledb試試 eg: dim CNN As New ADODB.Connection CNN.Open "provider=sqloledb;server=服務器名;database=數據庫名;uid=用戶名;pwd=密碼"
这是原库的db="database/uming_gb20120.mdb" Set conn = Server.CreateObject("ADODB.Connection") connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(""&db&"") conn.Open connstr on error resume next sub endConnection() conn.close set conn=nothing end sub 这是改后的Set conn=Server.CreateObject("ADODB.Connection") connstr="DRIVER={SQL Server};SERVER=127.0.0.1;UID=sa;PWD=sa;DATABASE=uming_gb20120" conn.open connstr sub endConnection() conn.close set conn=nothing end sub 但在浏览首页时,就出现其它页---这样错误, Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e14' [Microsoft][ODBC SQL Server Driver][SQL Server]在关键字 'user' 附近有语法错误。 /inc/read.asp,行13
eg:
dim CNN As New ADODB.Connection
CNN.Open "provider=sqloledb;server=服務器名;database=數據庫名;uid=用戶名;pwd=密碼"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(""&db&"")
conn.Open connstr
on error resume next
sub endConnection()
conn.close
set conn=nothing
end sub
这是改后的Set conn=Server.CreateObject("ADODB.Connection")
connstr="DRIVER={SQL Server};SERVER=127.0.0.1;UID=sa;PWD=sa;DATABASE=uming_gb20120"
conn.open connstr
sub endConnection()
conn.close
set conn=nothing
end sub
但在浏览首页时,就出现其它页---这样错误,
Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e14'
[Microsoft][ODBC SQL Server Driver][SQL Server]在关键字 'user' 附近有语法错误。
/inc/read.asp,行13