Question

连接提示数据库连接出错1！

db_name="/juyizszmkm/data/tyis.mdb"
webName="0"
'数据库文件的名字，可以是任何有效名字.

dim conn
dim connstr
on error resume next

connstr = "DBQ=" + server.mappath(db_name) + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err.number<>0 then
err.clear
set conn=nothing
response.write "数据库连接出错1！"
Response.End
else
conn.open connstr
if err then
err.clear
set conn=nothing
response.write "数据库连接出错2！"
Response.End
end if
end if

sub clsdb()
conn.close
set conn=nothing
end sub哪里不对？

Answer 1

你这个问题应该是sql server 网络配置的问题，方法，开始-所有程序-micorsoft sql server 2005-配置工具-sql server 配置管理器-sql server 2005 网络配置-MSSQLSERVER 协议
将Named Pipes和TCP/IP启用，默认应该是不启用的！