课12
一、数据库的打开和关闭
Dim objConn
set objConn=server.CreateObject("ADODB.connection")
open:打开
close 关闭
connectoinString :数据库的连接方式
ACCESS数据库的打开写法
ODBC：
Dim objconn
set objconn=server.CreateObject("ADODB.connection")
objconn.connectionString="DRIVER={Microsoft Access Driver (*.mdb)}; dbq=" & server.MapPath(db)
objconn.open
OLEDB:
set conn=server.CreateObject("ADODB.Connection")
conn.connectionstring = "Provider=microsoft.jet.oledb.4.0;" & "data source=" & server.mappath(db)
conn.open
二、读取、插入、更新和删除表记录
set objRS=server.CreateObject("ADODB.Recordset")
方法：
AddNew : 插入
Delete:删除
MoveNext:移动下一条
MovePrevious:向前移动
MoveFirst:移动到第一条
MoveLast:移动到最后一条
Move Num：移动Num条
open:打开
Update:更新
属性：
AbsolutePosition:目前的绝对位置
AbsolutePage:目前的分页
BOF:为第一条值是true
EOF:为最后一条值是true
PageCount:分页总数
PageSize:每一个分页的记录条数
RecordCount:返回记录总条数
CursorType: 指针类型
LockType:锁类型
格式：
objRS.Open(Source,Connection,CursorType,LockType,CommandType)
Source:包含指令的字符串
Connection:打开连接
CursorType:指针类型
LockType:锁类型
CommandType:当为adcmdTable 即是2 时 Source为表名称处理
------------------------------------------------------------------------------
<HTML>
<BODY>
<%
'使用Connection对象打开Access数据库Friend.mdb
Dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Server.MapPath("Friend.mdb")
objConn.Open
'从数据表读取记录并存放在Recordset对象中
Dim objRS
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open "择友俱乐部", objConn, 1, 3, adCmdTable
'显示指针目前所在位置的记录
If Not objRS.EOF Then
Response.Write "编号：" & objRS("编号") & "<BR>"
Response.Write "姓名：" & objRS("姓名") & "<BR>"
Response.Write "性别：" & objRS("性别") & "<BR>"
Else
Response.Write "到达数据库的结尾，无法显示记录。"
End If
'关闭数据库连接并释放对象
objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>
</BODY>
</HTML>
浙公网安备 33010602011771号