📄 main.frm
字号:
VERSION 5.00
Object = "{48E59290-9880-11CF-9754-00AA00C00908}#1.0#0"; "msinet.ocx"
Object = "{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.3#0"; "comctl32.ocx"
Begin VB.Form Main
BackColor = &H00FFFFFF&
Caption = "流氓集团 Asp漏洞自动注入软件 编写 教主 QQ：2005022"
ClientHeight = 7185
ClientLeft = 60
ClientTop = 345
ClientWidth = 10260
DrawMode = 14 'Copy Pen
Icon = "Main.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
ScaleHeight = 7185
ScaleMode = 0 'User
ScaleWidth = 10255.3
StartUpPosition = 2 '屏幕中心
Begin VB.ListBox InjectList
Appearance = 0 'Flat
Height = 390
Left = 960
TabIndex = 2
Top = 1320
Visible = 0 'False
Width = 8055
End
Begin ComctlLib.ProgressBar ProgressBar
Height = 225
Left = 5160
TabIndex = 49
Top = 6960
Width = 2505
_ExtentX = 4419
_ExtentY = 397
_Version = 327682
Appearance = 0
End
Begin VB.Frame Frame1
BackColor = &H00FFFFFF&
BorderStyle = 0 'None
Height = 615
Left = 8400
TabIndex = 52
Top = 1440
Width = 1575
Begin VB.OptionButton MethodPost
BackColor = &H00FFFFFF&
Caption = "Post"
Height = 255
Left = 900
TabIndex = 54
Top = 360
Width = 735
End
Begin VB.OptionButton MethodGet
BackColor = &H00FFFFFF&
Caption = "Get"
Height = 255
Left = 900
TabIndex = 53
Top = 40
Value = -1 'True
Width = 615
End
Begin VB.Label Label9
BackStyle = 0 'Transparent
Caption = "提交方法:"
Height = 255
Left = 45
TabIndex = 55
Top = 200
Width = 855
End
End
Begin VB.TextBox TmpURL
Appearance = 0 'Flat
Height = 270
Left = 960
TabIndex = 51
Top = 1080
Visible = 0 'False
Width = 180
End
Begin VB.CommandButton btnHelp
Caption = "帮助"
Enabled = 0 'False
Height = 255
Left = 120
TabIndex = 50
Top = 1680
Width = 615
End
Begin VB.CommandButton btnGetField
Caption = "猜解列名"
Enabled = 0 'False
Height = 280
Left = 4320
TabIndex = 20
Top = 3570
Width = 975
End
Begin VB.TextBox TxtSiteAddress
Appearance = 0 'Flat
Height = 270
Left = 120
TabIndex = 48
Top = 8400
Visible = 0 'False
Width = 1695
End
Begin VB.TextBox TxtRecordTable
Appearance = 0 'Flat
Height = 270
Left = 1800
TabIndex = 47
Top = 8400
Visible = 0 'False
Width = 2055
End
Begin VB.TextBox TxtRecordField
Appearance = 0 'Flat
Height = 270
Left = 3840
TabIndex = 46
Top = 8400
Visible = 0 'False
Width = 2295
End
Begin VB.TextBox TxtSelectedValue
Appearance = 0 'Flat
Enabled = 0 'False
Height = 270
Left = 5400
TabIndex = 45
Text = "当前记录提示区"
Top = 6480
Width = 3975
End
Begin VB.CommandButton btnExport
Caption = "导出"
Enabled = 0 'False
Height = 300
Left = 9360
TabIndex = 44
Top = 6465
Width = 615
End
Begin VB.CommandButton btnDelField
Caption = "移除"
Enabled = 0 'False
Height = 300
Left = 4680
TabIndex = 25
Top = 6465
Width = 615
End
Begin VB.TextBox txtFieldName
Appearance = 0 'Flat
Enabled = 0 'False
Height = 270
Left = 2760
TabIndex = 23
Text = "手工输入列名"
Top = 6480
Width = 1215
End
Begin VB.CommandButton btnAddField
Caption = "添加"
Enabled = 0 'False
Height = 300
Left = 4080
TabIndex = 24
Top = 6465
Width = 615
End
Begin VB.TextBox TxtSQL
Appearance = 0 'Flat
Height = 270
Left = 120
TabIndex = 21
Top = 8040
Visible = 0 'False
Width = 10815
End
Begin VB.TextBox txtCondition
Appearance = 0 'Flat
Enabled = 0 'False
Height = 270
Left = 5880
TabIndex = 26
Text = "1=1"
Top = 3580
Width = 2055
End
Begin VB.ListBox RecordList
Appearance = 0 'Flat
Enabled = 0 'False
Height = 2550
ItemData = "Main.frx":2CFA
Left = 5400
List = "Main.frx":2CFC
TabIndex = 28
Top = 3840
Width = 4575
End
Begin VB.ListBox FieldList
Appearance = 0 'Flat
Enabled = 0 'False
Height = 2550
Left = 2760
Style = 1 'Checkbox
TabIndex = 22
Top = 3840
Width = 2535
End
Begin ComctlLib.StatusBar StatusBar
Align = 2 'Align Bottom
Height = 255
Left = 0
TabIndex = 38
Top = 6930
Width = 10260
_ExtentX = 18098
_ExtentY = 450
SimpleText = ""
_Version = 327682
BeginProperty Panels {0713E89E-850A-101B-AFC0-4210102A8DA7}
NumPanels = 3
BeginProperty Panel1 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Object.Width = 9000
MinWidth = 9000
Text = "--WEB--Scan--2.0"
TextSave = "--WEB--Scan--2.0"
Key = ""
Object.Tag = ""
EndProperty
BeginProperty Panel2 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Object.Width = 4412
MinWidth = 4412
TextSave = ""
Key = ""
Object.Tag = ""
EndProperty
BeginProperty Panel3 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Object.Width = 4410
MinWidth = 4410
Text = "编写:教主 (QQ:2005022)"
TextSave = "编写:教主 (QQ:2005022)"
Key = ""
Object.Tag = ""
EndProperty
EndProperty
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.CommandButton btnDelTable
Caption = "移除"
Enabled = 0 'False
Height = 300
Left = 2040
TabIndex = 19
Top = 6465
Width = 615
End
Begin InetCtlsObjects.Inet iNet2
Left = 720
Top = 6720
_ExtentX = 1005
_ExtentY = 1005
_Version = 393216
End
Begin VB.ListBox TableList
Appearance = 0 'Flat
Enabled = 0 'False
Height = 2550
ItemData = "Main.frx":2CFE
Left = 120
List = "Main.frx":2D00
TabIndex = 16
Top = 3840
Width = 2535
End
Begin VB.CommandButton btnAddTable
Caption = "添加"
Enabled = 0 'False
Height = 300
Left = 1440
TabIndex = 18
Top = 6465
Width = 615
End
Begin VB.TextBox txtTableName
Appearance = 0 'Flat
Enabled = 0 'False
Height = 285
Left = 120
TabIndex = 17
Text = "手工输入表名"
Top = 6480
Width = 1215
End
Begin VB.TextBox Help
Appearance = 0 'Flat
BackColor = &H00EBF0F0&
ForeColor = &H00404040&
Height = 615
Left = 4320
Locked = -1 'True
MultiLine = -1 'True
TabIndex = 33
Top = 260
Width = 5655
End
Begin InetCtlsObjects.Inet iNet
Left = 1200
Top = 6720
_ExtentX = 1005
_ExtentY = 1005
_Version = 393216
End
Begin VB.CommandButton btnAnalyse
Caption = "分析"
Enabled = 0 'False
Height = 300
Left = 0
TabIndex = 5
Top = 6720
Visible = 0 'False
Width = 735
End
Begin VB.TextBox TxtKeyword
Appearance = 0 'Flat
Enabled = 0 'False
Height = 615
Left = 1080
TabIndex = 4
Top = 1440
Width = 7215
End
Begin VB.Frame FrameProgress
BackColor = &H00FEF7ED&
Caption = "检测进度:"
Height = 1815
Left = 120
TabIndex = 29
Top = 7200
Width = 11175
Begin VB.TextBox Progress
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -