ASP连接SQL数据库

<%@ language=VBs cript%>
<% 
dim conn 
set conn=server.createobject("ADODB.connection") 
con.open "PROVIDER=SQLOLEDB;DATA SOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称
%>
建立记录集对象： 

set rs=server.createobject("adodb.recordset") 
rs.open SQL语句,conn,3,2