📄 dee.dsr
字号:
ParamCount = 3
BeginProperty P1
RealName = "@RETURN_VALUE"
Direction = 4
Precision = 10
Scale = 0
Size = 0
DataType = 3
HostType = 3
Required = 0 'False
EndProperty
BeginProperty P2
RealName = "@studentID"
Direction = 1
Precision = 10
Scale = 0
Size = 0
DataType = 3
HostType = 3
Required = -1 'True
EndProperty
BeginProperty P3
RealName = "@examID"
Direction = 1
Precision = 10
Scale = 0
Size = 0
DataType = 3
HostType = 3
Required = -1 'True
EndProperty
RelationCount = 0
AggregateCount = 1
BeginProperty Aggregate1
Name = "SumOfScore"
AggOn = "rptFinalResult"
AggField = "Score"
AggType = 2
AggFunction = 7
Precision = 8
Size = 4
Scale = 8
Type = 131
Name = "SumOfScore"
Caption = "SumOfScore"
Control = "TextBox"
ControlGuid = "{0CA5C786-7C71-11D0-B223-00A0C908FB55}"
EndProperty
EndProperty
BeginProperty Recordset7
CommandName = "rptallcourse"
CommDispId = 1036
RsDispId = 1047
CommandText = "select * from course"
ActiveConnectionName= "Con1"
CommandType = 1
IsRSReturning = -1 'True
NumFields = 4
BeginProperty Field1
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "COURSE_ID"
Caption = "COURSE_ID"
EndProperty
BeginProperty Field2
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "COURSE_NAME"
Caption = "COURSE_NAME"
EndProperty
BeginProperty Field3
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "DESCRIPTION"
Caption = "DESCRIPTION"
EndProperty
BeginProperty Field4
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "SEMESTER"
Caption = "SEMESTER"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset8
CommandName = "rptallstudent"
CommDispId = 1048
RsDispId = 1055
CommandText = "select stud_id,name,nic_no,admit_date,address,phone from student"
ActiveConnectionName= "Con1"
CommandType = 1
IsRSReturning = -1 'True
NumFields = 6
BeginProperty Field1
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "stud_id"
Caption = "stud_id"
EndProperty
BeginProperty Field2
Precision = 0
Size = 50
Scale = 0
Type = 200
Name = "name"
Caption = "name"
EndProperty
BeginProperty Field3
Precision = 0
Size = 50
Scale = 0
Type = 200
Name = "nic_no"
Caption = "nic_no"
EndProperty
BeginProperty Field4
Precision = 16
Size = 16
Scale = 0
Type = 135
Name = "admit_date"
Caption = "admit_date"
EndProperty
BeginProperty Field5
Precision = 0
Size = 50
Scale = 0
Type = 200
Name = "address"
Caption = "address"
EndProperty
BeginProperty Field6
Precision = 0
Size = 50
Scale = 0
Type = 200
Name = "phone"
Caption = "phone"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset9
CommandName = "rptallvisitors"
CommDispId = 1056
RsDispId = 1061
CommandText = "select * from visitors"
ActiveConnectionName= "Con1"
CommandType = 1
IsRSReturning = -1 'True
NumFields = 10
BeginProperty Field1
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "SR_NO"
Caption = "SR_NO"
EndProperty
BeginProperty Field2
Precision = 16
Size = 16
Scale = 0
Type = 135
Name = "DATE_VISIT"
Caption = "DATE_VISIT"
EndProperty
BeginProperty Field3
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "NAME"
Caption = "NAME"
EndProperty
BeginProperty Field4
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "FATHER_NAME"
Caption = "FATHER_NAME"
EndProperty
BeginProperty Field5
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "QUALIFICATION"
Caption = "QUALIFICATION"
EndProperty
BeginProperty Field6
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "CLASS_TIMING"
Caption = "CLASS_TIMING"
EndProperty
BeginProperty Field7
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "ADDRESS"
Caption = "ADDRESS"
EndProperty
BeginProperty Field8
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "REFERENCE"
Caption = "REFERENCE"
EndProperty
BeginProperty Field9
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "COURSE"
Caption = "COURSE"
EndProperty
BeginProperty Field10
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "PHONE"
Caption = "PHONE"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset10
CommandName = "rptallemployee"
CommDispId = 1062
RsDispId = 1065
CommandText = "select * from employee"
ActiveConnectionName= "Con1"
CommandType = 1
IsRSReturning = -1 'True
NumFields = 9
BeginProperty Field1
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "EmployeeID"
Caption = "EmployeeID"
EndProperty
BeginProperty Field2
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "LastName"
Caption = "LastName"
EndProperty
BeginProperty Field3
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "FirstName"
Caption = "FirstName"
EndProperty
BeginProperty Field4
Precision = 0
Size = 30
Scale = 0
Type = 202
Name = "Typeid"
Caption = "Typeid"
EndProperty
BeginProperty Field5
Precision = 16
Size = 16
Scale = 0
Type = 135
Name = "Birth_date"
Caption = "Birth_date"
EndProperty
BeginProperty Field6
Precision = 16
Size = 16
Scale = 0
Type = 135
Name = "HireDate"
Caption = "HireDate"
EndProperty
BeginProperty Field7
Precision = 0
Size = 60
Scale = 0
Type = 202
Name = "Address"
Caption = "Address"
EndProperty
BeginProperty Field8
Precision = 0
Size = 15
Scale = 0
Type = 202
Name = "Qualification"
Caption = "Qualification"
EndProperty
BeginProperty Field9
Precision = 0
Size = 24
Scale = 0
Type = 202
Name = "Phone"
Caption = "Phone"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset11
CommandName = "rptallsubjects"
CommDispId = 1066
RsDispId = 1072
CommandText = "select * from subjects"
ActiveConnectionName= "Con1"
CommandType = 1
IsRSReturning = -1 'True
NumFields = 5
BeginProperty Field1
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "SUB_ID"
Caption = "SUB_ID"
EndProperty
BeginProperty Field2
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "SUB_NAME"
Caption = "SUB_NAME"
EndProperty
BeginProperty Field3
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "Author"
Caption = "Author"
EndProperty
BeginProperty Field4
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "DESCRIPTION"
Caption = "DESCRIPTION"
EndProperty
BeginProperty Field5
Precision = 16
Size = 16
Scale = 0
Type = 135
Name = "StartDate"
Caption = "StartDate"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset12
CommandName = "rptemployee"
CommDispId = 1073
RsDispId = -1
CommandText = "dbo.rptemployee"
ActiveConnectionName= "Con1"
CallSyntax = "{? = CALL dbo.rptemployee( ?) }"
Expanded = -1 'True
NumFields = 0
NumGroups = 0
ParamCount = 2
BeginProperty P1
RealName = "@RETURN_VALUE"
Direction = 4
Precision = 10
Scale = 0
Size = 0
DataType = 3
HostType = 3
Required = 0 'False
EndProperty
BeginProperty P2
RealName = "@C"
Direction = 1
Precision = 10
Scale = 0
Size = 0
DataType = 3
HostType = 3
Required = -1 'True
EndProperty
RelationCount = 0
AggregateCount = 0
EndProperty
End
Attribute VB_Name = "DE"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub rsrptGusset_WillChangeField(ByVal cFields As Long, ByVal Fields As Variant, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
End Sub
Private Sub rsCommand1_WillChangeField(ByVal cFields As Long, ByVal Fields As Variant, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -