📄 dejxc.dsr
字号:
EndProperty
BeginProperty Field7
Precision = 0
Size = 15
Scale = 0
Type = 202
Name = "c_baby2"
Caption = "c_baby2"
EndProperty
BeginProperty Field8
Precision = 0
Size = 2
Scale = 0
Type = 202
Name = "c_sex2"
Caption = "c_sex2"
EndProperty
BeginProperty Field9
Precision = 0
Size = 8
Scale = 0
Type = 7
Name = "c_bdate2"
Caption = "c_bdate2"
EndProperty
BeginProperty Field10
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "c_ad1"
Caption = "c_ad1"
EndProperty
BeginProperty Field11
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "c_moble"
Caption = "c_moble"
EndProperty
BeginProperty Field12
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "c_tl1"
Caption = "c_tl1"
EndProperty
BeginProperty Field13
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "c_ad2"
Caption = "c_ad2"
EndProperty
BeginProperty Field14
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "c_tl2"
Caption = "c_tl2"
EndProperty
BeginProperty Field15
Precision = 0
Size = 8
Scale = 0
Type = 7
Name = "c_creadate"
Caption = "c_creadate"
EndProperty
BeginProperty Field16
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "c_total"
Caption = "c_total"
EndProperty
BeginProperty Field17
Precision = 10
Size = 4
Scale = 0
Type = 3
Name = "c_now"
Caption = "c_now"
EndProperty
BeginProperty Field18
Precision = 5
Size = 2
Scale = 0
Type = 2
Name = "c_num"
Caption = "c_num"
EndProperty
BeginProperty Field19
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "c_code"
Caption = "c_code"
EndProperty
BeginProperty Field20
Precision = 0
Size = 536870910
Scale = 0
Type = 203
Name = "c_demo"
Caption = "c_demo"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset20
CommandName = "commatall"
CommDispId = 1149
RsDispId = 1211
CommandText = $"DEjxc.dsx":0000
ActiveConnectionName= "Conjxc"
CommandType = 1
Locktype = 4
IsRSReturning = -1 'True
NumFields = 9
BeginProperty Field1
Precision = 0
Size = 8
Scale = 0
Type = 202
Name = "p_id"
Caption = "p_id"
EndProperty
BeginProperty Field2
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "p_name"
Caption = "p_name"
EndProperty
BeginProperty Field3
Precision = 0
Size = 8
Scale = 0
Type = 202
Name = "unit"
Caption = "unit"
EndProperty
BeginProperty Field4
Precision = 0
Size = 4
Scale = 0
Type = 202
Name = "type_id"
Caption = "type_id"
EndProperty
BeginProperty Field5
Precision = 0
Size = 255
Scale = 0
Type = 202
Name = "unit_price"
Caption = "unit_price"
EndProperty
BeginProperty Field6
Precision = 0
Size = 255
Scale = 0
Type = 202
Name = "qty"
Caption = "qty"
EndProperty
BeginProperty Field7
Precision = 0
Size = 255
Scale = 0
Type = 202
Name = "price"
Caption = "price"
EndProperty
BeginProperty Field8
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "product_code"
Caption = "product_code"
EndProperty
BeginProperty Field9
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "product_eno"
Caption = "product_eno"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset21
CommandName = "Compsout"
CommDispId = 1191
RsDispId = 1248
CommandText = "select * from psout_head where p_flag=false order by ps_id"
ActiveConnectionName= "Conjxc"
CommandType = 1
Locktype = 4
IsRSReturning = -1 'True
NumFields = 11
BeginProperty Field1
Precision = 0
Size = 9
Scale = 0
Type = 202
Name = "ps_id"
Caption = "ps_id"
EndProperty
BeginProperty Field2
Precision = 0
Size = 8
Scale = 0
Type = 7
Name = "ps_date"
Caption = "ps_date"
EndProperty
BeginProperty Field3
Precision = 0
Size = 8
Scale = 0
Type = 202
Name = "ps_maker"
Caption = "ps_maker"
EndProperty
BeginProperty Field4
Precision = 0
Size = 8
Scale = 0
Type = 202
Name = "ps_men"
Caption = "ps_men"
EndProperty
BeginProperty Field5
Precision = 0
Size = 12
Scale = 0
Type = 202
Name = "ps_rid"
Caption = "ps_rid"
EndProperty
BeginProperty Field6
Precision = 0
Size = 15
Scale = 0
Type = 202
Name = "ps_demo"
Caption = "ps_demo"
EndProperty
BeginProperty Field7
Precision = 19
Size = 8
Scale = 0
Type = 6
Name = "ps_total"
Caption = "ps_total"
EndProperty
BeginProperty Field8
Precision = 0
Size = 2
Scale = 0
Type = 11
Name = "p_flag"
Caption = "p_flag"
EndProperty
BeginProperty Field9
Precision = 0
Size = 20
Scale = 0
Type = 202
Name = "p_worker"
Caption = "p_worker"
EndProperty
BeginProperty Field10
Precision = 0
Size = 8
Scale = 0
Type = 7
Name = "p_time"
Caption = "p_time"
EndProperty
BeginProperty Field11
Precision = 0
Size = 536870910
Scale = 0
Type = 203
Name = "notes"
Caption = "notes"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
BeginProperty Recordset22
CommandName = "Compsoh"
CommDispId = 1197
RsDispId = 1201
CommandText = "select * from psout_detail order by p_id"
ActiveConnectionName= "Conjxc"
CommandType = 1
IsRSReturning = -1 'True
NumFields = 7
BeginProperty Field1
Precision = 0
Size = 9
Scale = 0
Type = 202
Name = "order_id"
Caption = "order_id"
EndProperty
BeginProperty Field2
Precision = 0
Size = 8
Scale = 0
Type = 202
Name = "p_id"
Caption = "p_id"
EndProperty
BeginProperty Field3
Precision = 0
Size = 50
Scale = 0
Type = 202
Name = "p_name"
Caption = "p_name"
EndProperty
BeginProperty Field4
Precision = 7
Size = 4
Scale = 0
Type = 4
Name = "qty"
Caption = "qty"
EndProperty
BeginProperty Field5
Precision = 0
Size = 8
Scale = 0
Type = 202
Name = "unit"
Caption = "unit"
EndProperty
BeginProperty Field6
Precision = 19
Size = 8
Scale = 0
Type = 6
Name = "unit_price"
Caption = "unit_price"
EndProperty
BeginProperty Field7
Precision = 19
Size = 8
Scale = 0
Type = 6
Name = "price"
Caption = "price"
EndProperty
NumGroups = 0
ParamCount = 0
RelationCount = 0
AggregateCount = 0
EndProperty
End
Attribute VB_Name = "DEjxc"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit
Private Sub DataEnvironment_Initialize()
Conjxc.ConnectionString = strConnect
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -