dataenv2.dsr

来自「学生信息管理系统」· DSR 代码 · 共 34 行

VERSION 5.00
Begin {C0E45035-5775-11D0-B388-00A0C9055D8E} DataEnv2 
   ClientHeight    =   6615
   ClientLeft      =   0
   ClientTop       =   0
   ClientWidth     =   10665
   _ExtentX        =   18812
   _ExtentY        =   11668
   FolderFlags     =   1
   TypeLibGuid     =   "{7E0319C0-8D5A-4D28-AA9E-DF0B40DA2927}"
   TypeInfoGuid    =   "{6E43EC5B-6309-47C2-90B2-6E99AC730494}"
   TypeInfoCookie  =   0
   Version         =   4
   NumConnections  =   1
   BeginProperty Connection1 
      ConnectionName  =   "cmd2"
      ConnDispId      =   1001
      SourceOfData    =   3
      QuoteChar       =   34
      SeparatorChar   =   46
   EndProperty
   NumRecordsets   =   0
End
Attribute VB_Name = "DataEnv2"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit

Private Sub command2_InfoMessage(ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)

End Sub