<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>SQLconn_rs建立记录集</title>
</head>
<body>
<%
dim conn,rs,connstr
connstr="driver={SQL Server};Server=(local);uid=用户名;pwd=密码;database=数据库名;"
'下面一行是SQL数据库连接的第二种方法:
'connstr="provider=sqloledb;data source=127.0.0.1,1433;User ID=sa;pwd=密码;Initial Catalog=数据库名"
set conn=server.CreateObject("adodb.connection")
conn.open connstr
set rs=server.CreateObject("adodb.recordset")
rs.open "表名" ,conn,1,1
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<script language="vbscript">msgbox "建立SQL记录集成功!!",,"呵呵^-^"</script>
</body>
</html>