给你个小例子
<%
Set conn = Server.CreateObject("ADODB.Connection")
DSNtemp="DRIVER={SQL Server};SERVER=zb;UID=sa;PWD=7890;DATABASE=northwind"
conn.open DSNtemp
strSQL = "SELECT FirstName, LastName FROM employees"
Set rsCustomers = Server.CreateObject("ADODB.Recordset")
rsCustomers.Open strSQL, conn
Set objFirstName = rsCustomers("FirstName")
Set objLastName = rsCustomers("LastName")
Do Until rsCustomers.EOF
Response.Write objFirstName & " " & objLastName & "<BR>"
rsCustomers.MoveNext
Loop
%>
<%
Set conn = Server.CreateObject("ADODB.Connection")
DSNtemp="DRIVER={SQL Server};SERVER=zb;UID=sa;PWD=7890;DATABASE=northwind"
conn.open DSNtemp
strSQL = "SELECT FirstName, LastName FROM employees"
Set rsCustomers = Server.CreateObject("ADODB.Recordset")
rsCustomers.Open strSQL, conn
Set objFirstName = rsCustomers("FirstName")
Set objLastName = rsCustomers("LastName")
Do Until rsCustomers.EOF
Response.Write objFirstName & " " & objLastName & "<BR>"
rsCustomers.MoveNext
Loop
%>
用这个
CreateObject ("SQLOLE.SQLServer")
用这个连接字符串试试
用这个连接字符串试试
dim conn
set conn=server.createobject("ADODB.connection")
set conn.connect="PROVIDER=SQLOLEDB;DATA SOURCE=机器名;UID=sa;PWD=sa;DATABASE=数据库名"
conn.open
%>