原代码
就行
---------------------------------------------------------------
Set Conn=Server.CreateObject("Adodb.Connection")
ConnStr="Provider=SQLOLEDB;Data Source=127.0.0.1;UID=sa;PWD=;DataBase=dbName"
'打开连接
Conn.Open ConnStr
Dim Cnn, StrCnn
Set Cnn = Server.CreateObject("ADODB.Connection")
strcnn="Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa;Password=leonnet;Initial Catalog=127.0.0.1;Data Source=数据库名称或者DSN名称;Connect Timeout=200"
cnn.open
sql="select * from work"
set rs=cnn.execute(sql)
while not rs.eof
response.write rs("id")
response.write rs("姓名")
rs.movenext
wend
SQL SERVER属于服务器数据库，和文件数据库的连接方法不同！并不是连接某一具体文件，而是连接SQL SERVER服务器上的某一个数据库。
1
2strconn="Provider=SQLOLEDB;network library=dbmssocn;User ID=sa;password=;Initial Catalog=数据库名;Data Source=127.0.0.1,1433"
3strSelect="select * from jok order by putdate desc"
4set adoconn=Server.CreateObject("ADODB.Connection")
5adoconn.open strconn
6set rs=adoconn.execute(strSelect)
7%
8
9
10set conn=server.createobject("ADODB.CONNECTION")
11ConnStr="Driver={SQL Server};Server=(local);UID=User;PWD=xd;database=db"
12conn.Open ConnStr
13
14指定机器、说明用户、提供密码、再告诉sql server
15你要操作那个数据库名
16
17
18dim conn
19set conn=server.createobject("ADODB.connection")
20con.open "PROVIDER=SQLOLEDB;DATA SOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称