📄 datae.dsr
字号:
Precision = 0
Scale = 0
Size = 510
DataType = 202
HostType = 8
Required = -1 'True
EndProperty
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset4
CommandName = "cmdFindAll"
CommDispId = 1013
RsDispId = 1015
CommandText = "UserTable"
ActiveConnectionName= "conQICQ"
CommandType = 2
dbObjectType = 1
IsRSReturning = -1 'True
NumFields = 19
BeginProperty Field1
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "UserID"
Caption = "UserID"
EndProperty
BeginProperty Field2
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "UserName"
Caption = "UserName"
EndProperty
BeginProperty Field3
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "Pwd"
Caption = "Pwd"
EndProperty
BeginProperty Field4
Precision = 0
Size = 8
Scale = 0
Type = 7
Name = "RegisterTime"
Caption = "RegisterTime"
EndProperty
BeginProperty Field5
Precision = 0
Size = 8
Scale = 0
Type = 7
Name = "LastLogin"
Caption = "LastLogin"
EndProperty
BeginProperty Field6
Precision = 0
Size = 8
Scale = 0
Type = 7
Name = "LoginTime"
Caption = "LoginTime"
EndProperty
BeginProperty Field7
Precision = 5
Size = 2
Scale = 0
Type = 2
Name = "Logins"
Caption = "Logins"
EndProperty
BeginProperty Field8
Precision = 5
Size = 2
Scale = 0
Type = 2
Name = "State"
Caption = "State"
EndProperty
BeginProperty Field9
Precision = 0
Size = 536870910
Scale = 0
Type = 203
Name = "Friends"
Caption = "Friends"
EndProperty
BeginProperty Field10
Precision = 0
Size = 536870910
Scale = 0
Type = 203
Name = "Hates"
Caption = "Hates"
EndProperty
BeginProperty Field11
Precision = 5
Size = 2
Scale = 0
Type = 2
Name = "img"
Caption = "img"
EndProperty
BeginProperty Field12
Precision = 5
Size = 2
Scale = 0
Type = 2
Name = "Age"
Caption = "Age"
EndProperty
BeginProperty Field13
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "Sex"
Caption = "Sex"
EndProperty
BeginProperty Field14
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "Email"
Caption = "Email"
EndProperty
BeginProperty Field15
Precision = 0
Size = 100
Scale = 0
Type = 202
Name = "Address"
Caption = "Address"
EndProperty
BeginProperty Field16
Precision = 0
Size = 200
Scale = 0
Type = 202
Name = "Introduce"
Caption = "Introduce"
EndProperty
BeginProperty Field17
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "IP"
Caption = "IP"
EndProperty
BeginProperty Field18
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "Port"
Caption = "Port"
EndProperty
BeginProperty Field19
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "NickName"
Caption = "NickName"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset5
CommandName = "cmdUser"
CommDispId = 1016
RsDispId = 1018
CommandText = "select * from usertable where conindex=?"
ActiveConnectionName= "conQICQ"
CommandType = 1
IsRSReturning = -1 'True
NumFields = 20
BeginProperty Field1
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "UserID"
Caption = "UserID"
EndProperty
BeginProperty Field2
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "UserName"
Caption = "UserName"
EndProperty
BeginProperty Field3
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "Pwd"
Caption = "Pwd"
EndProperty
BeginProperty Field4
Precision = 0
Size = 8
Scale = 0
Type = 7
Name = "RegisterTime"
Caption = "RegisterTime"
EndProperty
BeginProperty Field5
Precision = 0
Size = 8
Scale = 0
Type = 7
Name = "LastLogin"
Caption = "LastLogin"
EndProperty
BeginProperty Field6
Precision = 0
Size = 8
Scale = 0
Type = 7
Name = "LoginTime"
Caption = "LoginTime"
EndProperty
BeginProperty Field7
Precision = 5
Size = 2
Scale = 0
Type = 2
Name = "Logins"
Caption = "Logins"
EndProperty
BeginProperty Field8
Precision = 5
Size = 2
Scale = 0
Type = 2
Name = "State"
Caption = "State"
EndProperty
BeginProperty Field9
Precision = 0
Size = 536870910
Scale = 0
Type = 203
Name = "Friends"
Caption = "Friends"
EndProperty
BeginProperty Field10
Precision = 0
Size = 536870910
Scale = 0
Type = 203
Name = "Hates"
Caption = "Hates"
EndProperty
BeginProperty Field11
Precision = 5
Size = 2
Scale = 0
Type = 2
Name = "img"
Caption = "img"
EndProperty
BeginProperty Field12
Precision = 5
Size = 2
Scale = 0
Type = 2
Name = "Age"
Caption = "Age"
EndProperty
BeginProperty Field13
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "Sex"
Caption = "Sex"
EndProperty
BeginProperty Field14
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "Email"
Caption = "Email"
EndProperty
BeginProperty Field15
Precision = 0
Size = 100
Scale = 0
Type = 202
Name = "Address"
Caption = "Address"
EndProperty
BeginProperty Field16
Precision = 0
Size = 200
Scale = 0
Type = 202
Name = "Introduce"
Caption = "Introduce"
EndProperty
BeginProperty Field17
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "IP"
Caption = "IP"
EndProperty
BeginProperty Field18
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "Port"
Caption = "Port"
EndProperty
BeginProperty Field19
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "NickName"
Caption = "NickName"
EndProperty
BeginProperty Field20
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "ConIndex"
Caption = "ConIndex"
EndProperty
NumGroups = 0
ParamCount = 1
BeginProperty P1
RealName = "?"
UserName = "index"
Direction = 1
Precision = 0
Scale = 0
Size = 510
DataType = 3
HostType = 8
Required = -1 'True
EndProperty
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset6
CommandName = "cmdUpdate"
CommDispId = 1019
RsDispId = -1
ActiveConnectionName= "conQICQ"
CommandType = 1
NumFields = 0
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
End
Attribute VB_Name = "dataE"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub DataEnvironment_Initialize()
conQICQ.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\QICQ.mdb;Persist Security Info=False"
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -