|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
简介 断开连接的记录集是客户端高速缓存中的对象,该对象没有同服务器实时连接。使用断开连接的记录集,ActiveX® 数据对象 (ADO) 答应您创建记录集,断开与数据源的连接,使用户可以脱机查看和编辑记录集。 例如,“类别”数据访问页会询问是否该页应使用断开连接的数据。假如用户单击“是”,该页将提示用户输入断开连接的记录集的路径。假如用户单击“否”,该页将使用实时数据。 创建使用断开连接的记录集的数据访问页 在“设计”视图中创建数据访问页。 添加所需的控件和分组级别。例如,创建“类别”页,该页组合有不同类别下的产品记录。 将代码添加到 BeforeInitialBind 事件,以便连接到断开连接的记录集,或者连接到实时数据。 以下是 BeforeInitialBind 事件过程示例。 <SCRIPT language=vbscript event=BeforeInitialBind(info) for=MSODSC> <!-- Dim rs Dim strShapeText Dim strConnectionString Dim strDataSource adOpenKeyset=1 adLockOptimistic=3 If vbyes=msgbox("使用断开连接的记录集吗?",vbyesno) Then On Error Resume Next strDataSource = InputBox ("请输入要使用的_ 断开连接的记录集的路径。", "Enter Path", _ "C:Program FilesMicrosoft OfficeOffice10Samples _ Northwind.mdb") strShapeText = MSODSC.RootRecordsetDefs(0).ShapeText strConnectionString = "Provider=MSDataShape.1; _ Persist Security Info=False;Data Source=" & strDataSource _ & ";User ID=Admin;Data Provider=Microsoft.Jet.OLEDB.4.0" Set rs = CreateObject("ADODB.Recordset") rs.Open strShapeText, strConnectionString, adOpenKeyset, _ adLockOptimistic If err.Number <> 0 Then MsgBox "错误:" & err.description & "Error " & err.number End If MSODSC.SetRootRecordset "Categories", rs End If --> </SCRIPT> 注重: 不能从 Microsoft Access 内部正常使用绑定到断开连接的记录集的数据访问页。 应在 Microsoft Internet Explorer 中打开该页,才能正常查看。 在创建 Microsoft® Office 数据源控件 (MSODSC) 事件的 Visual Basic® Scripting Edition (VBScript) 块时,必须将参数添加到事件名称中,如下所示: <SCRIPT LANGUAGE=vbscript FOR=MSODSC EVENT=Current(oventInfo)> oEventInfo 参数用于向脚本返回有关该事件的详细信息。无论是否使用此参数,都必须添加此参数,否则脚本将无法运行。 返回类别: 教程 上一教程: ASP讲座之六:ASP与数据库 下一教程: 轻松实现将上传图片到数据库 您可以阅读与"将数据访问页绑定到断开连接的记录集"相关的教程: · 在ASP中使用断开的记录集 · 断开的数据库连接的一个例子 · 断开的数据库连接的例子 · ASP程序中使用断开的数据记录集 · 如何存取三层式结构的数据库的记录 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |