Question

ASP中ACCESS数据库转成SQL SERVER的链接代码怎么改？

<%
'打开数据库连接
dim conn,connstr,db,rs
db="manage/db/db.mdf"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="driver={sql server};server=（local）.;uid=sa;pwd=;database=db"
conn.Open connstr

%>

Answer 1

dim db
dim sqldatabasename,sqlpassword,sqlusername,sqlhostip
const bjxshopversion=2
const bjxshopdatabasetype="access"
db="access数据路径(根目录为基准)" 'manage/db/db.mdf 这是你的数据库 如果manage在根目录下的话改为/manage/db/db.mdf
sqlusername = "bjxshop" '用户名如:sa
sqlpassword = "bjxshop888" '密码
sqldatabasename = "bjxshop" '数据库名称
sqlhostip = "127.0.0.1" '数据库ip
on error resume next
dim connstr
dim conn,rs,errmsg,iserr
if bjxshopdatabasetype="sql" then
'这是sql server连接字符串
connstr = "provider = sqloledb; user id = " & sqlusername & "; password = " & sqlpassword & "; initial catalog = " & sqldatabasename & "; data source = " & sqlhostip & ";"
else
'这是access数据库的
connstr = "provider=microsoft.jet.oledb.4.0;data source=" & server.mappath(db)
end if
set conn = server.createobject("adodb.connection")
conn.open connstr
asp常用数据库连接字符串,access和sql server

Answer 2

dim conn,connstr
Set conn = Server.CreateObject("ADODB.Connection")
conn.Connstr="driver={SQL Server};server=(local);uid=sa;pwd=sa;database=db"
conn.Open