你试着写一个conn.asp,然后把它include到你的asp程序里 这样比较容易查错! 给你一个例子: conn.asp: <% dim con function consql() set con=server.createobject("adodb.connection") con.open "driver={sql server};server=local;uid=sa;pwd=yourpassword;database=yourdb" end function function dissql() con.close set con=nothing end function %>] 如果你的程序是1.asp,则: 1.asp: <!-- #include file=conn.asp--> <$ sql="....." consql() set rs=server.createobject("adodb.recordset") rs.open sql,con,1,3 ...... dissql() $> 你试试 绝对没问题!!!!
dim dcndb set dcndb = server.createobject("adodb.connection") dcndb.connectionstring="provider=sqloledb.1;user id=sa;password=;initial catalog=(数据源ODBC的DSN名);data source=(计算机名)" dcndb.open dim rsdata dim strsql strsql="select * from dpm_Parameters(表名) order by fdtime(字段名)" set rsdata = server.createobject("adodb.recordset") rsdata.cursorlocation = aduseclient rsdata.open strsql,dcndb,adopenstatic,adlockreadonly,adcmdtext我自己试过是可以的,成功的
conn.open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=[database name];Data Source=[server name]"
set rs=server.CreateObject("adodb.recordset")
rs.Open "sql",conn,2,2
你的方法我已经试过了还是不行,我用dsn不行吗?
adocon.open conn_str
给你一个例子:
conn.asp:
<%
dim con
function consql()
set con=server.createobject("adodb.connection")
con.open "driver={sql server};server=local;uid=sa;pwd=yourpassword;database=yourdb"
end function
function dissql()
con.close
set con=nothing
end function
%>]
如果你的程序是1.asp,则:
1.asp:
<!-- #include file=conn.asp-->
<$
sql="....."
consql()
set rs=server.createobject("adodb.recordset")
rs.open sql,con,1,3
......
dissql()
$>
你试试 绝对没问题!!!!
set dcndb = server.createobject("adodb.connection")
dcndb.connectionstring="provider=sqloledb.1;user id=sa;password=;initial catalog=(数据源ODBC的DSN名);data source=(计算机名)"
dcndb.open
dim rsdata
dim strsql
strsql="select * from dpm_Parameters(表名) order by fdtime(字段名)"
set rsdata = server.createobject("adodb.recordset")
rsdata.cursorlocation = aduseclient
rsdata.open strsql,dcndb,adopenstatic,adlockreadonly,adcmdtext我自己试过是可以的,成功的
改信任关系为trusted