有好多种哈!!!!!!!!!!!!!!!!!!!
<%
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=SQLOLEDB;Server=服务器IP或域名;Database=数据库名;UID=用户名;pwd=密码;"
conn.Open connstr
%>
Set Conn=Server.CreateObject("ADODB.Connection")
Connstr="driver={SQL server};server="&ServerAddr&";uid="&ServerUID&";pwd="&ServerPWD&";database="&ServerDB
Conn.Open Connstr
%>
<%
dim a,b,c
set a=server.createobject("adodb.connection")
a.open"driver={ sql server};server=机器名;uid=sa;pwd=密码;database=库名"
b="select * from xsjk"
set c=server.createobject("adodb.recordset")
c.open b,a
response.write c("user")&"<br>"