📄 dataenvironment1.dsr
字号:
DataType = 200
HostType = 8
Required = -1 'True
EndProperty
BeginProperty P12
RealName = "@email"
Direction = 1
Precision = 0
Scale = 0
Size = 50
DataType = 200
HostType = 8
Required = -1 'True
EndProperty
BeginProperty P13
RealName = "@memo"
Direction = 1
Precision = 0
Scale = 0
Size = 1000
DataType = 200
HostType = 8
Required = -1 'True
EndProperty
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset4
CommandName = "dbo_stu_AddPunishRecord"
CommDispId = 1012
RsDispId = -1
CommandText = "dbo.stu_AddPunishRecord"
ActiveConnectionName= "Connection1"
CallSyntax = "{? = CALL dbo.stu_AddPunishRecord( ?, ?, ?) }"
NumFields = 0
NumGroups = 0
ParamCount = 4
BeginProperty P1
RealName = "@RETURN_VALUE"
Direction = 4
Precision = 10
Scale = 0
Size = 0
DataType = 3
HostType = 3
Required = 0 'False
EndProperty
BeginProperty P2
RealName = "@studentNo"
Direction = 1
Precision = 0
Scale = 0
Size = 6
DataType = 200
HostType = 8
Required = -1 'True
EndProperty
BeginProperty P3
RealName = "@Des"
Direction = 1
Precision = 0
Scale = 0
Size = 50
DataType = 200
HostType = 8
Required = -1 'True
EndProperty
BeginProperty P4
RealName = "@memo"
Direction = 1
Precision = 0
Scale = 0
Size = 1000
DataType = 200
HostType = 8
Required = -1 'True
EndProperty
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset5
CommandName = "dbo_stu_GetChange"
CommDispId = 1017
RsDispId = 1020
CommandText = "dbo.stu_GetChange"
ActiveConnectionName= "Connection1"
CallSyntax = "{? = CALL dbo.stu_GetChange( ?) }"
IsRSReturning = -1 'True
NumFields = 4
BeginProperty Field1
Precision = 0
Size = 6
Scale = 0
Type = 129
Name = "学号"
Caption = "学号"
EndProperty
BeginProperty Field2
Precision = 23
Size = 16
Scale = 3
Type = 135
Name = "记录时间"
Caption = "记录时间"
EndProperty
BeginProperty Field3
Precision = 0
Size = 1
Scale = 0
Type = 129
Name = "记录编号"
Caption = "记录编号"
EndProperty
BeginProperty Field4
Precision = 0
Size = 50
Scale = 0
Type = 200
Name = "记录描述"
Caption = "记录描述"
EndProperty
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 = "@StuNo"
Direction = 1
Precision = 0
Scale = 0
Size = 6
DataType = 200
HostType = 8
Required = -1 'True
EndProperty
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset6
CommandName = "dbo_stu_GetChangeByNO"
CommDispId = 1021
RsDispId = 1024
CommandText = "dbo.stu_GetChangeByNO"
ActiveConnectionName= "Connection1"
CallSyntax = "{? = CALL dbo.stu_GetChangeByNO( ?) }"
IsRSReturning = -1 'True
NumFields = 2
BeginProperty Field1
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "记录编号"
Caption = "记录编号"
EndProperty
BeginProperty Field2
Precision = 23
Size = 16
Scale = 3
Type = 135
Name = "记录时间"
Caption = "记录时间"
EndProperty
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 = "@studentNo"
Direction = 1
Precision = 0
Scale = 0
Size = 6
DataType = 200
HostType = 8
Required = -1 'True
EndProperty
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset7
CommandName = "dbo_stu_GetChangeCode"
CommDispId = 1025
RsDispId = 1028
CommandText = "dbo.stu_GetChangeCode"
ActiveConnectionName= "Connection1"
CallSyntax = "{? = CALL dbo.stu_GetChangeCode }"
IsRSReturning = -1 'True
NumFields = 2
BeginProperty Field1
Precision = 0
Size = 1
Scale = 0
Type = 129
Name = "code"
Caption = "code"
EndProperty
BeginProperty Field2
Precision = 0
Size = 50
Scale = 0
Type = 200
Name = "description"
Caption = "description"
EndProperty
NumGroups = 0
ParamCount = 1
BeginProperty P1
RealName = "@RETURN_VALUE"
Direction = 4
Precision = 10
Scale = 0
Size = 0
DataType = 3
HostType = 3
Required = 0 'False
EndProperty
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset8
CommandName = "dbo_stu_GetPunishCode"
CommDispId = 1029
RsDispId = 1032
CommandText = "dbo.stu_GetPunishCode"
ActiveConnectionName= "Connection1"
CallSyntax = "{? = CALL dbo.stu_GetPunishCode }"
IsRSReturning = -1 'True
NumFields = 2
BeginProperty Field1
Precision = 0
Size = 1
Scale = 0
Type = 129
Name = "code"
Caption = "code"
EndProperty
BeginProperty Field2
Precision = 0
Size = 50
Scale = 0
Type = 200
Name = "description"
Caption = "description"
EndProperty
NumGroups = 0
ParamCount = 1
BeginProperty P1
RealName = "@RETURN_VALUE"
Direction = 4
Precision = 10
Scale = 0
Size = 0
DataType = 3
HostType = 3
Required = 0 'False
EndProperty
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset9
CommandName = "dbo_stu_GetRewardCode"
CommDispId = 1033
RsDispId = 1036
CommandText = "dbo.stu_GetRewardCode"
ActiveConnectionName= "Connection1"
CallSyntax = "{? = CALL dbo.stu_GetRewardCode }"
IsRSReturning = -1 'True
NumFields = 2
BeginProperty Field1
Precision = 0
Size = 1
Scale = 0
Type = 129
Name = "code"
Caption = "code"
EndProperty
BeginProperty Field2
Precision = 0
Size = 50
Scale = 0
Type = 200
Name = "description"
Caption = "description"
EndProperty
NumGroups = 0
ParamCount = 1
BeginProperty P1
RealName = "@RETURN_VALUE"
Direction = 4
Precision = 10
Scale = 0
Size = 0
DataType = 3
HostType = 3
Required = 0 'False
EndProperty
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset10
CommandName = "CmdClass"
CommDispId = 1042
RsDispId = 1047
CommandText = "select code,className from Code_Class"
ActiveConnectionName= "Connection1"
CommandType = 1
IsRSReturning = -1 'True
NumFields = 2
BeginProperty Field1
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "code"
Caption = "code"
EndProperty
BeginProperty Field2
Precision = 0
Size = 50
Scale = 0
Type = 200
Name = "className"
Caption = "className"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset11
CommandName = "CmdDepart"
CommDispId = 1048
RsDispId = 1053
CommandText = "select * from Code_depart"
ActiveConnectionName= "Connection1"
CommandType = 1
Expanded = -1 'True
IsRSReturning = -1 'True
NumFields = 2
BeginProperty Field1
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "code"
Caption = "code"
EndProperty
BeginProperty Field2
Precision = 0
Size = 50
Scale = 0
Type = 200
Name = "name"
Caption = "name"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
End
Attribute VB_Name = "DataEnvironment1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -