connview_sql.asp 内容
<%
option explicit
response.write("ASP连接查询sqlserver<hr size='1'>")
dim conn
conn = "Provider=SQLOLEDB;Server=localhost;Database=database1;UID=sa;PWD=123"
dim rs,sql
sql="select * from table2"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
do while not rs.eof
response.write("姓名:"&rs("name")&" 工资:"&rs("pay")&"<br>")
rs.movenext
loop
rs.close
set rs=nothing
set conn=nothing
%>