版主的搜索代码换成SQL数据库就不行了，为什么版主看看

dhdhzzw 发布于 2007-08-13 13:48， 549 次点击

求助，版主的搜索代码换成SQL数据库就不行了，，为什么？那些地方要改么？下面是SQL链接代码
<%@LANGUAGE=VBScript%>
<%
Dim ConnStr,conn
Dim SqlDatabaseName,SqlPassword,SqlUsername,SqlLocalName
SqlDatabaseName = "list"
SqlPassword =""
SqlUsername = "sa"
SqlLocalName = "127.0.0.1"
ConnStr = "PROVIDER=SQLOLEDB;DATA SOURCE="&SqlLocalName&";UID="&SqlUsername&";PWD="& SqlPassword&";DATABASE="&SqlDatabaseName
On Error Resume Next
set conn=Server.CreateObject("ADODB.Connection")
'response.write ConnStr
if err then
err.clear
else
conn.open connstr
end if

sub CloseConn()
conn.close
set conn=nothing
end sub

6 回复

yms1232007-08-13 13:54

<%
Dim ConnStr,connDim SqlDatabaseName,SqlPassword,SqlUsername,SqlLocalName
SqlDatabaseName = "list"
SqlPassword =""
SqlUsername = "sa"
SqlLocalName = "127.0.0.1"
ConnStr = "PROVIDER=SQLOLEDB;"
ConnStr = ConnStr&"DATA SOURCE="&SqlLocalName&";"
ConnStr = ConnStr&"UID="&SqlUsername&";"
ConnStr = ConnStr&"PWD="& SqlPassword&";"
ConnStr = ConnStr&"DATABASE="&SqlDatabaseName
On Error Resume Next
Set conn=Server.CreateObject("ADODB.Connection")'
response.write ConnStr
if err then
err.clear
else
conn.open connstr
end if
sub CloseConn()
conn.close
set conn=nothing
end sub
%>
楼主怎么换的，换那里了？

dhdhzzw2007-08-13 15:16

，ACCESS可以用你写的代码，我换成SQl的就不能用，，查不到数据

yms1232007-08-13 16:45

问题是楼主换哪里了？CONDB.asp之外别处没有换？

dhdhzzw2007-08-13 17:19

没有啊...

yms1232007-08-13 17:23

以下是引用dhdhzzw在2007-8-13 17:19:30的发言：

没有啊...

楼主要把search.asp里的con换成自己项目里的那个数据库连接对象的名称。

dhdhzzw2007-08-13 17:30

终于说到点在上了，，，我没看出来，被你整的呵呵，，你里面写的是con
但常用conn ，我本身又不太强，你不说我看不出来。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
顶礼膜拜！！！！！！！！！！！！！

版主的搜索代码 换成SQL数据库就不行了，为什么版主看看

版主的搜索代码换成SQL数据库就不行了，为什么版主看看