菜问：asp连接sqlserver读取数据的问题。

[leonnet]

请详细给偶写一下，谢谢了

sql server:
127.0.0.1
sa
leonnet

在ASP页面显示work这张表中的内容，字段为
id 姓名 部门 ............

再次谢谢

[liuqinyi]

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

[yelook]

<%
set cn=server.createobject("ADODB.Connection")
cn.ConnectionString = "driver={SQL Server};server=127.0.0.1;uid=sa;pwd=leonnet;database=gmsdb"
cn.open
set rs=cn.execute("select * from work")
response.write rs("id")
...
%>

[leonnet]

偶这样做了可始终报HTTP500内部服务器错误呢？

<%
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
%>

[逍遥小贼]

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 strcnn

另外,"Data Source=数据库名称或者DSN名称" 这里应该用你的数据库的实际名称来代替,而不是写上这些字!!