ASP常用对象

Connection

1.Access
Set conn=Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db1.mdb")
conn.Open connstr
conn.close
set conn=nothing

2.SQL
dim conn,connstr,connServerName,connDatabase,connUserName,connPassword
connServerName = "127.0.0.1" '数据库服务器名或者IP，本机填“(local)”即可。
connDatabase = "db1"   '数据库名称
connUserName = "sa"    '数据库用户名
connPassword = "1234567"  '数据库密码

Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=SQLOLEDB;Data Source="&connServerName&";Initial Catalog="&connDatabase&";User ID="&connUserName&";Password="&connPassword&";"
conn.Open connstr
response.write "OK!"
Conn.close
Set conn = Nothing

3.EXCEL
Set conn=Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=Excel 8.0;Data Source=" & Server.MapPath("db1.xls")
conn.Open connstr
conn.close
Set conn = Nothing

Recordset

1.
Set rs=Server.CreateObject("ADODB.Recordset")
'rs.Open "tab1",conn,1,3
sqlstr="select * from tab1"
rs.Open sqlstr,conn,1,3
rs.close
set rs=nothing

2.
Set rs=Server.CreateObject("ADODB.Recordset")
sqlstr="select * from [Sheet1$]"
rs.Open sqlstr,conn,1,3
rs.close
set rs=nothing

Session

session("name")="Hello"
response.write session("name") & session.sessionid

Cookies

response.cookies("user")("name")="Hello"
response.cookies("user").expires=date+1
response.write request.cookies("user")("name")