关于ASP网页的数据库设置
下了一个ASP的源码想做个站在设置这里不知道写什么。能详细告诉我吗|?'=====设置数据库类型1为MSSQL,2为ACCESS====constIsLoveSql=0i...
下了一个ASP的源码
想做个站
在设置这里不知道写什么。能详细告诉我吗|?
'=====设置数据库类型1为MSSQL,2为ACCESS====
const IsLoveSql=0
if IsLoveSql=2 then
Const SqlDatabaseName = "AspXP_love"
Const SqlPassword = "AspXP_SQL_Net"
Const SqlUsername = "AspXpLove"
Const SqlLocalName ="(local)"
else
Db="db.asp"
end if
sub opendb( )
dim Connstr
if IsLoveSql=1 then
ConnStr = "Provider = Sqloledb;
User ID = " & SqlUsername & ";
Password = " & SqlPassword & ";
Initial Catalog = " & SqlDatabaseName & ";
Data Source = " & SqlLocalName & ";"
else
ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
end if问题补充:
把那些要填的帮忙用中文在旁边解释下
谢谢
不知道哪里要改?
我都没改
我的数据库是MySQL
上面的“1为MSSQL” 不知道是不是作者打错还是?? 展开
想做个站
在设置这里不知道写什么。能详细告诉我吗|?
'=====设置数据库类型1为MSSQL,2为ACCESS====
const IsLoveSql=0
if IsLoveSql=2 then
Const SqlDatabaseName = "AspXP_love"
Const SqlPassword = "AspXP_SQL_Net"
Const SqlUsername = "AspXpLove"
Const SqlLocalName ="(local)"
else
Db="db.asp"
end if
sub opendb( )
dim Connstr
if IsLoveSql=1 then
ConnStr = "Provider = Sqloledb;
User ID = " & SqlUsername & ";
Password = " & SqlPassword & ";
Initial Catalog = " & SqlDatabaseName & ";
Data Source = " & SqlLocalName & ";"
else
ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
end if问题补充:
把那些要填的帮忙用中文在旁边解释下
谢谢
不知道哪里要改?
我都没改
我的数据库是MySQL
上面的“1为MSSQL” 不知道是不是作者打错还是?? 展开
展开全部
'=====设置数据库类型1为MSSQL,2为ACCESS====
const IsLoveSql=1 '你的是MSSQL数据库,所以这里设置为1
if IsLoveSql=2 then
Const SqlDatabaseName = "AspXP_love"
Const SqlPassword = "AspXP_SQL_Net"
Const SqlUsername = "AspXpLove"
Const SqlLocalName ="(local)"
else
Db="db.asp"
end if
sub opendb( )
dim Connstr
if IsLoveSql=1 then
ConnStr = "Provider = Sqloledb;
User ID = " & SqlUsername & "; '这里把SqlUsername替换成你的数据库用户名
Password = " & SqlPassword & "; '这里把SqlPassword替换成你的数据库密码,空密码就删掉SqlPassword
Initial Catalog = " & SqlDatabaseName & "; '这里把SqlDatabaseName替换成你的主数据库名
Data Source = " & SqlLocalName & ";" '这里把SqlLocalName替换成你的数据库服务器IP
else
ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
const IsLoveSql=1 '你的是MSSQL数据库,所以这里设置为1
if IsLoveSql=2 then
Const SqlDatabaseName = "AspXP_love"
Const SqlPassword = "AspXP_SQL_Net"
Const SqlUsername = "AspXpLove"
Const SqlLocalName ="(local)"
else
Db="db.asp"
end if
sub opendb( )
dim Connstr
if IsLoveSql=1 then
ConnStr = "Provider = Sqloledb;
User ID = " & SqlUsername & "; '这里把SqlUsername替换成你的数据库用户名
Password = " & SqlPassword & "; '这里把SqlPassword替换成你的数据库密码,空密码就删掉SqlPassword
Initial Catalog = " & SqlDatabaseName & "; '这里把SqlDatabaseName替换成你的主数据库名
Data Source = " & SqlLocalName & ";" '这里把SqlLocalName替换成你的数据库服务器IP
else
ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询