我在ACCESS中能够正常的连接数据库。但是我把ACCESS导入到SQL SERVER2000中以后，却不能运行了。

ruyunluck 2003-09-15 02:48:00

我在ACCESS中能够正常的连接数据库。但是我把ACCESS导入到SQL SERVER2000中以后，却不能运行了。

我在SQL SERVER的CONN.ASP文件：
<%
connstr="Provider=SQLOLEDB.1;Password=;Persist Security Info=True;User

ID=sa;Initial Catalog=member;Data Source=127.0.0.1"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>

我把CONN.ASP文件改为：
<%
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={SQL Server};server=127.0.0.1;
uid=sa;pwd=;database=member"
%>
运行首页时候还是不能连接.请问是什么原因呢?多谢指教

...全文

65 16 打赏收藏转发到动态举报

写回复

用AI写文章

16 条回复

切换为时间正序

请发表友善的回复…

发表回复

61 2003-10-08

打赏
举报

Skin_css.ASP中没有取出Skin_CSS字段值的语句呀

formatkm 2003-10-07

打赏
举报

估计是sql语句里的函数出错了，在access里的now（）函数在sql server里要换成getdate()。

nchen123 2003-10-07

打赏
举报

这样设定 css 是不会生效的

ruyunluck 2003-10-05

打赏
举报

请多指教

ruyunluck 2003-10-04

打赏
举报

现在我把SQL SERVER中的Skin表的Skin_CSS字段类型改为：nvarchar这时Skin_CSS中出现了A{TEXT-DECORATION: none;}这个值，但是运行index.asp程序，显示不出界界面风格。

<html>
<head>
<title>计算机维护网</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">


</head>
<body >

......
</body>
</html>

Skin_css.ASP:

<%
dim rsSkin,sqlSkin,tSkinID,Skin_CSS,Body_Label
tSkinID=request.Cookies("Skin")("Class" & ClassID)
if tSkinID="" then
tSkinID=0
else
tSkinID=Clng(tSkinID)
end if
if tSkinID>0 then
SkinID=tSkinID
end if
sqlSkin="select * from Skin where SkinID=" & SkinID
set rsSkin=server.CreateObject("adodb.recordset")
rsSkin.open sqlSkin,conn,1,1
if rsSkin.bof and rsSkin.eof then
rsSkin.close
sqlSkin="select * from Skin where IsDefault=True"
rsSkin.open sqlSkin,conn,1,1
call main()
else
call main()
end if
rsSkin.close
set rsSkin=nothing
%>

nchen123 2003-10-01

打赏
举报

access 的备注类型相当于 sql server 的 ntext.
用 ntext, 可以直接编辑的

stefli 2003-10-01

打赏
举报

改成varchar型的。
和access中的备注型类似

ruyunluck 2003-10-01

打赏
举报

请多指教啊

ruyunluck 2003-09-30

打赏
举报

现在运行index.asp程序不报错了。
但是保存界面风格的表有个问题：
SKIN表从ACCESS中导过来的：
Skin表的结构如下：
[SkinID] [int] NOT NULL ,
[SkinName] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL ,
[PicUrl] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL ,
[IsDefault] [bit] NOT NULL ,
[DesignType] [int] NULL ,
[Body] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL ,
[Skin_CSS] [ntext] COLLATE Chinese_PRC_CI_AS NULL

对应的数据：
SkinID SkinName PicUrl IsDefault DesignType Body
1 蓝天动力 Skin/1/skin_1.gif 1 0 leftmargin=0 topmargin=0
Skin_CSS
<Long Text>

写到这里：
我发现 SKIN这个表在ACCESS中的结构如下：Skin_CSS字段是备注型，内容是
A{TEXT-DECORATION: none;}

但是这个字段在SQL SERVER却显示不出来。我手工想把这个备注型的字段内容A{TEXT-DECORATION: none;}加入SQL SERVER的 Skin_CSS中，系统却显示无法编辑该字段。

请问这是什么原因呢？

ruyunluck 2003-09-16

打赏
举报

请多指教啊

61 2003-09-16

打赏
举报

Set conn = Server.CreateObject("ADODB.Connection")
connstr = "Provider=sqloledb; User ID=sa; Password=; Initial Catalog=你的数据库名; Data Source=机器名"
conn.open connstr
sqlSkin="select * from Skin where SkinID=" & SkinID
set rsSkin=server.CreateObject("adodb.recordset")
rsSkin.open sqlSkin,conn,1,3

xie12898 2003-09-16

打赏
举报

在出错的前面写上
response.wriete("sqlSkin")
response.end
打印出的sql到查询分析器里执行，看有错吗？

ruyunluck 2003-09-16

打赏
举报

肯请帮助啊

ruyunluck 2003-09-15

打赏
举报

现在能够连上了。但是有一个ASP文件连不上。
它是一个更换页面风格的程序
我把代码附上：
Skin_css.ASP:

<%
dim rsSkin,sqlSkin,tSkinID,Skin_CSS,Body_Label
tSkinID=request.Cookies("Skin")("Class" & ClassID)
if tSkinID="" then
tSkinID=0
else
tSkinID=Clng(tSkinID)
end if
if tSkinID>0 then
SkinID=tSkinID
end if
sqlSkin="select * from Skin where SkinID=" & SkinID
set rsSkin=server.CreateObject("adodb.recordset")
rsSkin.open sqlSkin,conn,1,1 //运行显示这里出错
if rsSkin.bof and rsSkin.eof then
rsSkin.close
sqlSkin="select * from Skin where IsDefault=True"
rsSkin.open sqlSkin,conn,1,1
call main()
else
call main()
end if
rsSkin.close
set rsSkin=nothing
%>

我在这段程序的开头加上

还是报错
但是我在用ACCESS数据库的时候就不存在这个问题，请问这是什么原因呢？

summergood 2003-09-15

打赏
举报

<%
dim conn
dim connstr

on error resume next
Set conn = Server.CreateObject("ADODB.Connection")
connstr = "Provider=sqloledb; User ID=sa; Password=; Initial Catalog=你的数据库名; Data Source=机器名"
if err then
err.clear
else
conn.open connstr
if err then
err.clear
end if
end if
%>

nchen123 2003-09-15