• 金蝶k/3 K3密码对照破解源码

通过密码对照表进行密码破解

以下是源码:

VERSION 5.00
Object = "{0ECD9B60-23AA-11D0-B351-00A0C9055D8E}#6.0#0"; "MSHFLXGD.OCX"
Begin VB.Form Form1
Caption = "K3密码对照破解"
ClientHeight =
ClientLeft =
ClientTop =
ClientWidth =
ScaleHeight =
ScaleWidth =
StartUpPosition = '窗口缺省
Begin VB.Frame Frame1
Height =
Left =
TabIndex =
Top =
Width =
Begin VB.TextBox Text4
Height =
Left =
TabIndex =
Text = "192.168.0.6"
Top =
Width =
End
Begin VB.TextBox Text5
Height =
IMEMode = 'DISABLE
Left =
PasswordChar = "*"
TabIndex =
Top =
Width =
End
Begin VB.TextBox Text6
Height =
Left =
TabIndex =
Text = "AIS20140620092508"
Top =
Width =
End
Begin VB.Label Label5
Caption = "密码:"
Height =
Left =
TabIndex =
Top =
Width =
End
Begin VB.Label Label4
Caption = "帐套名:"
Height =
Left =
TabIndex =
Top =
Width =
End
Begin VB.Label Label3
Caption = "服务器:"
Height =
Left =
TabIndex =
Top =
Width =
End
End
Begin MSHierarchicalFlexGridLib.MSHFlexGrid MSFGrid_dsj
Height =
Left =
TabIndex =
Top =
Width =
_ExtentX =
_ExtentY =
_Version =
AllowUserResizing=
_NumberOfBands =
_Band().Cols =
End
Begin VB.CommandButton Command2
Caption = "读取密码"
Height =
Left =
TabIndex =
Top =
Width =
End
Begin VB.TextBox Text3
Height =
Left =
TabIndex =
Text = "Text3"
Top =
Width =
End
Begin VB.TextBox Text2
Height =
Left =
MultiLine = - 'True
ScrollBars = 'Vertical
TabIndex =
Top =
Width =
End
Begin VB.CommandButton Command1
Caption = "解密码"
Height =
Left =
TabIndex =
Top =
Width =
End
Begin VB.TextBox Text1
Height =
Left =
TabIndex =
Text = ") F "", ,P T #8 *P!D &D 80!N &@ <0 C '< : !M &4 )0 X #( . W #( ,0!Y 'H 8P Q T ""@ "
Top =
Width =
End
Begin VB.Label Label2
Caption = "K3密码字段:"
Height =
Left =
TabIndex =
Top =
Width =
End
Begin VB.Label Label1
Caption = "结果:"
Height =
Left =
TabIndex =
Top =
Width =
End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Dim arr_data(, ) As String
Dim conn As ADODB.Connection Dim rs As ADODB.Recordset
Private Function getpassword(ByVal values As String) As String
Dim i As Integer
Dim str As String
Dim str_1 As String
Dim str_2 As String
Dim len_str_2 As Integer
Dim len_str_2_1 As Integer
Dim password As String
i =
len_str_2_1 =
str = Replace(values, " ", "□")
Text3.Text = str
Do While Len(str) >
i = i +
str_1 = Left(str, i)
If GetPass(str_1) <> "" Then
str_2 = Right(str, Len(str) - i + )
str = Right(str, Len(str) - i)
password = password & GetPass(str_1)
i =
End If
If i > Then
len_str_2 = Len(str_2)
If len_str_2_1 = len_str_2 Then
If str_2 <> "□□" Then
password = "密码为:" & password & "注意:剩下的" & str_2 & "找不到匹配数据,请输入正确的数据"
End If
' password = "密码为:" & password & Chr(13) & Chr(10) & "注意:剩下的" & str_2 & "找不到匹配数据,请输入正确的数据"
Exit Do
Else
len_str_2_1 = len_str_2
End If
str = str_2
i =
'Exit Do
End If
DoEvents
Loop
getpassword = password
End Function
Private Function GetPass(ByVal values As String) As String
Dim i As Integer
Dim ReValues As String
For i = To
If arr_data(i, ) = values Then
ReValues = arr_data(i, )
Exit For
End If
Next
GetPass = ReValues
End Function
Private Sub Command1_Click()
Text2.Text = getpassword(Right(Text1.Text, Len(Text1.Text) - )) End Sub Private Sub Command2_Click()
'OpenCn Text4.Text, Text6.Text, "sa", Text5.Text
Dim sql As String
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
sql = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;password=" & Text5.Text & ";Initial Catalog=" & Text6.Text & ";Data Source=" & Text4.Text '如果不用这个模块也行可以,这一句便是常用的引擎。 Debug.Print sql
conn.ConnectionString = sql
'
conn.Open
'
'
rs.Open " select * from t_user where fsid is not null and len(fsid)>50", conn, , If rs.RecordCount > Then
MSFGrid_dsj.Rows = rs.RecordCount +
MSFGrid_dsj.Cols =
MSFGrid_dsj.TextMatrix(, ) = "序号"
MSFGrid_dsj.TextMatrix(, ) = "用户id"
MSFGrid_dsj.TextMatrix(, ) = "用户名称"
MSFGrid_dsj.TextMatrix(, ) = "描述"
MSFGrid_dsj.TextMatrix(, ) = "用户密码" For i = To rs.RecordCount
MSFGrid_dsj.TextMatrix(i, ) = i
MSFGrid_dsj.TextMatrix(i, ) = rs.Fields("fuserid")
MSFGrid_dsj.TextMatrix(i, ) = rs.Fields("fname")
MSFGrid_dsj.TextMatrix(i, ) = getpassword(Right(rs.Fields("fsid"), Len(rs.Fields("fsid")) - )) rs.MoveNext
Next i
Else
MSFGrid_dsj.Rows =
MSFGrid_dsj.Cols =
MSFGrid_dsj.TextMatrix(, ) = "序号"
MSFGrid_dsj.TextMatrix(, ) = "用户id"
MSFGrid_dsj.TextMatrix(, ) = "用户名称"
MSFGrid_dsj.TextMatrix(, ) = "描述"
MSFGrid_dsj.TextMatrix(, ) = "用户密码"
End If
End Sub Private Sub Form_Load()
'初始化密码字典
arr_data(, ) = "□P□"
arr_data(, ) = "□Q□"
arr_data(, ) = "□R□"
arr_data(, ) = "□S□"
arr_data(, ) = "□T□"
arr_data(, ) = "□U□"
arr_data(, ) = "□V□"
arr_data(, ) = "□W□"
arr_data(, ) = "□X□"
arr_data(, ) = "□Y□"
arr_data(, ) = "!A□"
arr_data(, ) = "!B□"
arr_data(, ) = "!C□"
arr_data(, ) = "!D□"
arr_data(, ) = "!E□"
arr_data(, ) = "!F□"
arr_data(, ) = "!G□"
arr_data(, ) = "!H□"
arr_data(, ) = "!I□"
arr_data(, ) = "!J□"
arr_data(, ) = "!K□"
arr_data(, ) = "!L□"
arr_data(, ) = "!M□"
arr_data(, ) = "!N□"
arr_data(, ) = "!O□"
arr_data(, ) = "!P□"
arr_data(, ) = "!Q□"
arr_data(, ) = "!R□"
arr_data(, ) = "!S□"
arr_data(, ) = "!T□"
arr_data(, ) = "!U□"
arr_data(, ) = "!V□"
arr_data(, ) = "!W□"
arr_data(, ) = "!X□"
arr_data(, ) = "!Y□"
arr_data(, ) = "!Z□"
arr_data(, ) = "!!□"
arr_data(, ) = "!" & Chr() & "□"
arr_data(, ) = "!#□"
arr_data(, ) = "!$□"
arr_data(, ) = "!%□"
arr_data(, ) = "!&□"
arr_data(, ) = "!'□"
arr_data(, ) = "!(□"
arr_data(, ) = "!)□"
arr_data(, ) = "!*□"
arr_data(, ) = "!+□"
arr_data(, ) = "!,□"
arr_data(, ) = "!-□"
arr_data(, ) = "!.□"
arr_data(, ) = "!/□"
arr_data(, ) = "!0□"
arr_data(, ) = "!1□"
arr_data(, ) = "!2□"
arr_data(, ) = "!3□"
arr_data(, ) = "!4□"
arr_data(, ) = "!5□"
arr_data(, ) = "!6□"
arr_data(, ) = "!7□"
arr_data(, ) = "!8□"
arr_data(, ) = "!9□"
arr_data(, ) = "!:□"
arr_data(, ) = "□A□"
arr_data(, ) = "□!□"
arr_data(, ) = "□C□"
arr_data(, ) = "□D□"
arr_data(, ) = "□E□"
arr_data(, ) = "!>□"
arr_data(, ) = "□F□"
arr_data(, ) = "□J□"
arr_data(, ) = "□H□"
arr_data(, ) = "□I□"
arr_data(, ) = "!?□"
arr_data(, ) = "□K□"
arr_data(, ) = "□]□"
arr_data(, ) = "□M□"
arr_data(, ) = "!;□"
arr_data(, ) = "!=□"
arr_data(, ) = "![□"
arr_data(, ) = "!]□"
arr_data(, ) = "□[□"
arr_data(, ) = "□Z□"
arr_data(, ) = "□B□"
arr_data(, ) = "□G□"
arr_data(, ) = "□L□"
arr_data(, ) = "□N□"
arr_data(, ) = "□_□"
arr_data(, ) = "!<□"
arr_data(, ) = "!\□"
arr_data(, ) = "□0□"
arr_data(, ) = "!@□"
arr_data(, ) = "!^□"
arr_data(, ) = "□\□"
arr_data(, ) = "□^□"
arr_data(, ) = "#□□"
arr_data(, ) = "#$□"
arr_data(, ) = "#(□"
arr_data(, ) = "#,□"
arr_data(, ) = "#0□"
arr_data(, ) = "#4□"
arr_data(, ) = "#8□"
arr_data(, ) = "#<□"
arr_data(, ) = "#@□"
arr_data(, ) = "#D□"
arr_data(, ) = "&$□"
arr_data(, ) = "&(□"
arr_data(, ) = "&,□"
arr_data(, ) = "&0□"
arr_data(, ) = "&4□"
arr_data(, ) = "&8□"
arr_data(, ) = "&<□"
arr_data(, ) = "&@□"
arr_data(, ) = "&D□"
arr_data(, ) = "&H□"
arr_data(, ) = "&L□"
arr_data(, ) = "&P□"
arr_data(, ) = "&T□"
arr_data(, ) = "&X□"
arr_data(, ) = "&\□"
arr_data(, ) = "'□□"
arr_data(, ) = "'$□"
arr_data(, ) = "'(□"
arr_data(, ) = "',□"
arr_data(, ) = "'0□"
arr_data(, ) = "'4□"
arr_data(, ) = "'8□"
arr_data(, ) = "'<□"
arr_data(, ) = "'@□"
arr_data(, ) = "'D□"
arr_data(, ) = "'H□"
arr_data(, ) = "$$□"
arr_data(, ) = "$(□"
arr_data(, ) = "$,□"
arr_data(, ) = "$0□"
arr_data(, ) = "$4□"
arr_data(, ) = "$8□"
arr_data(, ) = "$<□"
arr_data(, ) = "$@□"
arr_data(, ) = "$D□"
arr_data(, ) = "$H□"
arr_data(, ) = "$L□"
arr_data(, ) = "$P□"
arr_data(, ) = "$T□"
arr_data(, ) = "$X□"
arr_data(, ) = "$\□"
arr_data(, ) = "%□□"
arr_data(, ) = "%$□"
arr_data(, ) = "%(□"
arr_data(, ) = "%,□"
arr_data(, ) = "%0□"
arr_data(, ) = "%4□"
arr_data(, ) = "%8□"
arr_data(, ) = "%<□"
arr_data(, ) = "%@□"
arr_data(, ) = "%D□"
arr_data(, ) = "%H□"
arr_data(, ) = Chr() & "$□"
arr_data(, ) = "$□□"
arr_data(, ) = Chr() & ",□"
arr_data(, ) = Chr() & "0□"
arr_data(, ) = Chr() & "4□"
arr_data(, ) = "%X□"
arr_data(, ) = Chr() & "8□"
arr_data(, ) = Chr() & "H□"
arr_data(, ) = Chr() & "@□"
arr_data(, ) = Chr() & "D□"
arr_data(, ) = "%\□"
arr_data(, ) = Chr() & "L□"
arr_data(, ) = "#T□"
arr_data(, ) = Chr() & "T□"
arr_data(, ) = "%L□"
arr_data(, ) = "%T□"
arr_data(, ) = "'L□"
arr_data(, ) = "'T□"
arr_data(, ) = "#L□"
arr_data(, ) = "#H□"
arr_data(, ) = Chr() & "(□"
arr_data(, ) = Chr() & "<□"
arr_data(, ) = Chr() & "P□"
arr_data(, ) = Chr() & "X□"
arr_data(, ) = "#\□"
arr_data(, ) = "%P□"
arr_data(, ) = "'P□"
arr_data(, ) = Chr() & " \ Chr(34) & "
arr_data(, ) = "&□□"
arr_data(, ) = "'X□"
arr_data(, ) = "#P□"
arr_data(, ) = "#X□"
arr_data(, ) = "□,0"
arr_data(, ) = ",0□"
arr_data(, ) = ",@□"
arr_data(, ) = ",P□"
arr_data(, ) = "-□□"
arr_data(, ) = "-0□"
arr_data(, ) = "-@□"
arr_data(, ) = "-P□"
arr_data(, ) = ".□"
arr_data(, ) = ".0□"
arr_data(, ) = ""
arr_data(, ) = "8@"
arr_data(, ) = "8P"
arr_data(, ) = "9□"
arr_data(, ) = ""
arr_data(, ) = "9@"
arr_data(, ) = "9P"
arr_data(, ) = ":□"
arr_data(, ) = ":0"
arr_data(, ) = ":@"
arr_data(, ) = ":P"
arr_data(, ) = ";□"
arr_data(, ) = ";0"
arr_data(, ) = ";@"
arr_data(, ) = ";P"
arr_data(, ) = "<□"
arr_data(, ) = "<0"
arr_data(, ) = "<@"
arr_data(, ) = "<P"
arr_data(, ) = "=□"
arr_data(, ) = "=0"
arr_data(, ) = "=@"
arr_data(, ) = "=P"
arr_data(, ) = ">□"
arr_data(, ) = ">0"
arr_data(, ) = ">@"
arr_data(, ) = ""
arr_data(, ) = "0@"
arr_data(, ) = "0P"
arr_data(, ) = "1□"
arr_data(, ) = ""
arr_data(, ) = "1@"
arr_data(, ) = "1P"
arr_data(, ) = "2□"
arr_data(, ) = ""
arr_data(, ) = "2@"
arr_data(, ) = "2P"
arr_data(, ) = "3□"
arr_data(, ) = ""
arr_data(, ) = "3@"
arr_data(, ) = "3P"
arr_data(, ) = "4□"
arr_data(, ) = ""
arr_data(, ) = "4@"
arr_data(, ) = "4P"
arr_data(, ) = "5□"
arr_data(, ) = ""
arr_data(, ) = "5@"
arr_data(, ) = "5P"
arr_data(, ) = "6□"
arr_data(, ) = ""
arr_data(, ) = "6@"
arr_data(, ) = "(0"
arr_data(, ) = "0□"
arr_data(, ) = "(P"
arr_data(, ) = ")□"
arr_data(, ) = ")0"
arr_data(, ) = "7@"
arr_data(, ) = ")@"
arr_data(, ) = "*@"
arr_data(, ) = "*□"
arr_data(, ) = "*0"
arr_data(, ) = "7P"
arr_data(, ) = "*P"
arr_data(, ) = "/0"
arr_data(, ) = "+0"
arr_data(, ) = "6P"
arr_data(, ) = ""
arr_data(, ) = ">P"
arr_data(, ) = "?0"
arr_data(, ) = ".P"
arr_data(, ) = ".@"
arr_data(, ) = "(@"
arr_data(, ) = ")P"
arr_data(, ) = "+□"
arr_data(, ) = "+@"
arr_data(, ) = "/P"
arr_data(, ) = "7□"
arr_data(, ) = "?□"
arr_data(, ) = "+P"
arr_data(, ) = "8□"
arr_data(, ) = "?@"
arr_data(, ) = "/□"
arr_data(, ) = "/@"
arr_data(, ) = "□,□□"
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = "a"
arr_data(, ) = "b"
arr_data(, ) = "c"
arr_data(, ) = "d"
arr_data(, ) = "e"
arr_data(, ) = "f"
arr_data(, ) = "g"
arr_data(, ) = "h"
arr_data(, ) = "i"
arr_data(, ) = "j"
arr_data(, ) = "k"
arr_data(, ) = "l"
arr_data(, ) = "m"
arr_data(, ) = "n"
arr_data(, ) = "o"
arr_data(, ) = "p"
arr_data(, ) = "q"
arr_data(, ) = "r"
arr_data(, ) = "s"
arr_data(, ) = "t"
arr_data(, ) = "u"
arr_data(, ) = "v"
arr_data(, ) = "w"
arr_data(, ) = "x"
arr_data(, ) = "y"
arr_data(, ) = "z"
arr_data(, ) = "A"
arr_data(, ) = "B"
arr_data(, ) = "C"
arr_data(, ) = "D"
arr_data(, ) = "E"
arr_data(, ) = "F"
arr_data(, ) = "G"
arr_data(, ) = "H"
arr_data(, ) = "I"
arr_data(, ) = "J"
arr_data(, ) = "K"
arr_data(, ) = "L"
arr_data(, ) = "M"
arr_data(, ) = "N"
arr_data(, ) = "O"
arr_data(, ) = "P"
arr_data(, ) = "Q"
arr_data(, ) = "R"
arr_data(, ) = "S"
arr_data(, ) = "T"
arr_data(, ) = "U"
arr_data(, ) = "V"
arr_data(, ) = "W"
arr_data(, ) = "X"
arr_data(, ) = "Y"
arr_data(, ) = "Z"
arr_data(, ) = "!"
arr_data(, ) = "@"
arr_data(, ) = "#"
arr_data(, ) = "$"
arr_data(, ) = "%"
arr_data(, ) = "^"
arr_data(, ) = "&"
arr_data(, ) = "*"
arr_data(, ) = "("
arr_data(, ) = ")"
arr_data(, ) = "_"
arr_data(, ) = "+"
arr_data(, ) = "="
arr_data(, ) = "-"
arr_data(, ) = "["
arr_data(, ) = "]"
arr_data(, ) = "{"
arr_data(, ) = "}"
arr_data(, ) = ";"
arr_data(, ) = ":"
arr_data(, ) = Chr()
arr_data(, ) = "'"
arr_data(, ) = ","
arr_data(, ) = "."
arr_data(, ) = "?"
arr_data(, ) = "\"
arr_data(, ) = "|"
arr_data(, ) = "/"
arr_data(, ) = "`"
arr_data(, ) = "~"
arr_data(, ) = "<"
arr_data(, ) = ">"
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = "a"
arr_data(, ) = "b"
arr_data(, ) = "c"
arr_data(, ) = "d"
arr_data(, ) = "e"
arr_data(, ) = "f"
arr_data(, ) = "g"
arr_data(, ) = "h"
arr_data(, ) = "i"
arr_data(, ) = "j"
arr_data(, ) = "k"
arr_data(, ) = "l"
arr_data(, ) = "m"
arr_data(, ) = "n"
arr_data(, ) = "o"
arr_data(, ) = "p"
arr_data(, ) = "q"
arr_data(, ) = "r"
arr_data(, ) = "s"
arr_data(, ) = "t"
arr_data(, ) = "u"
arr_data(, ) = "v"
arr_data(, ) = "w"
arr_data(, ) = "x"
arr_data(, ) = "y"
arr_data(, ) = "z"
arr_data(, ) = "A"
arr_data(, ) = "B"
arr_data(, ) = "C"
arr_data(, ) = "D"
arr_data(, ) = "E"
arr_data(, ) = "F"
arr_data(, ) = "G"
arr_data(, ) = "H"
arr_data(, ) = "I"
arr_data(, ) = "J"
arr_data(, ) = "K"
arr_data(, ) = "L"
arr_data(, ) = "M"
arr_data(, ) = "N"
arr_data(, ) = "O"
arr_data(, ) = "P"
arr_data(, ) = "Q"
arr_data(, ) = "R"
arr_data(, ) = "S"
arr_data(, ) = "T"
arr_data(, ) = "U"
arr_data(, ) = "V"
arr_data(, ) = "W"
arr_data(, ) = "X"
arr_data(, ) = "Y"
arr_data(, ) = "Z"
arr_data(, ) = "!"
arr_data(, ) = "@"
arr_data(, ) = "#"
arr_data(, ) = "$"
arr_data(, ) = "%"
arr_data(, ) = "^"
arr_data(, ) = "&"
arr_data(, ) = "*"
arr_data(, ) = "("
arr_data(, ) = ")"
arr_data(, ) = "_"
arr_data(, ) = "+"
arr_data(, ) = "="
arr_data(, ) = "-"
arr_data(, ) = "["
arr_data(, ) = "]"
arr_data(, ) = "{"
arr_data(, ) = "}"
arr_data(, ) = ";"
arr_data(, ) = ":"
arr_data(, ) = Chr()
arr_data(, ) = "'"
arr_data(, ) = ","
arr_data(, ) = "."
arr_data(, ) = "?"
arr_data(, ) = "\"
arr_data(, ) = "|"
arr_data(, ) = "/"
arr_data(, ) = "`"
arr_data(, ) = "~"
arr_data(, ) = "<"
arr_data(, ) = ">"
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = ""
arr_data(, ) = "a"
arr_data(, ) = "b"
arr_data(, ) = "c"
arr_data(, ) = "d"
arr_data(, ) = "e"
arr_data(, ) = "f"
arr_data(, ) = "g"
arr_data(, ) = "h"
arr_data(, ) = "i"
arr_data(, ) = "j"
arr_data(, ) = "k"
arr_data(, ) = "l"
arr_data(, ) = "m"
arr_data(, ) = "n"
arr_data(, ) = "o"
arr_data(, ) = "p"
arr_data(, ) = "q"
arr_data(, ) = "r"
arr_data(, ) = "s"
arr_data(, ) = "t"
arr_data(, ) = "u"
arr_data(, ) = "v"
arr_data(, ) = "w"
arr_data(, ) = "x"
arr_data(, ) = "y"
arr_data(, ) = "z"
arr_data(, ) = "A"
arr_data(, ) = "B"
arr_data(, ) = "C"
arr_data(, ) = "D"
arr_data(, ) = "E"
arr_data(, ) = "F"
arr_data(, ) = "G"
arr_data(, ) = "H"
arr_data(, ) = "I"
arr_data(, ) = "J"
arr_data(, ) = "K"
arr_data(, ) = "L"
arr_data(, ) = "M"
arr_data(, ) = "N"
arr_data(, ) = "O"
arr_data(, ) = "P"
arr_data(, ) = "Q"
arr_data(, ) = "R"
arr_data(, ) = "S"
arr_data(, ) = "T"
arr_data(, ) = "U"
arr_data(, ) = "V"
arr_data(, ) = "W"
arr_data(, ) = "X"
arr_data(, ) = "Y"
arr_data(, ) = "Z"
arr_data(, ) = "!"
arr_data(, ) = "@"
arr_data(, ) = "#"
arr_data(, ) = "$"
arr_data(, ) = "%"
arr_data(, ) = "^"
arr_data(, ) = "&"
arr_data(, ) = "*"
arr_data(, ) = "("
arr_data(, ) = ")"
arr_data(, ) = "_"
arr_data(, ) = "+"
arr_data(, ) = "="
arr_data(, ) = "-"
arr_data(, ) = "["
arr_data(, ) = "]"
arr_data(, ) = "{"
arr_data(, ) = "}"
arr_data(, ) = ";"
arr_data(, ) = ":"
arr_data(, ) = Chr()
arr_data(, ) = "'"
arr_data(, ) = ","
arr_data(, ) = "."
arr_data(, ) = "?"
arr_data(, ) = "\"
arr_data(, ) = "|"
arr_data(, ) = "/"
arr_data(, ) = "`"
arr_data(, ) = "~"
arr_data(, ) = "<"
arr_data(, ) = ">"
arr_data(, ) = ""
End Sub
 密码对照字典
1、纯数字类对照表如下:
代码一位二位三位四位五位六位
0□P□#□□,□□P□#□□,□□
1□Q□#$□,0□Q□#$□,0□
2□R□#(□,@□R□#(□,@□
3□S□#,□,P□S□#,□,P□
4□T□#0□-□□T□#0□-□□
5□U□#4□-0□U□#4□-0□
6□V□#8□-@□V□#8□-@□
7□W□#<□-P□W□#<□-P□
8□X□#@□.□□X□#@□.□□
9□Y□#D□.0□Y□#D□.0□
2、小字母类对照表如下:
代码一位二位三位四位五位六位
a!A□&$□80!A□&$□80
b!B□&(□8@!B□&(□8@
c!C□&,□8P!C□&,□8P
d!D□&0□9□!D□&0□9□
e!E□&4□90!E□&4□90
f!F□&8□9@!F□&8□9@
g!G□&<□9P!G□&<□9P
h!H□&@□:□!H□&@□:□
i!I□&D□:0!I□&D□:0
j!J□&H□:@!J□&H□:@
k!K□&L□:P!K□&L□:P
l!L□&P□;□!L□&P□;□
m!M□&T□;0!M□&T□;0
n!N□&X□;@!N□&X□;@
o!O□&/□;P!O□&/□;P
p!P□'□□<□!P□'□□<□
q!Q□'$□<0!Q□'$□<0
r!R□'(□<@!R□'(□<@
s!S□',□<P!S□',□<P
t!T□'0□=□!T□'0□=□
u!U□'4□=0!U□'4□=0
v!V□'8□=@!V□'8□=@
w!W□'<□=P!W□'<□=P
x!X□'@□>□!X□'@□>□
y!Y□'D□>0!Y□'D□>0
z!Z□'H□>@!Z□'H□>@
3、大写字母对照表如下:
代码一位二位三位四位五位六位
A!!□$$□00!!□$$□00
B!"□$(□0@!"□$(□0@
C!#□$,□0P!#□$,□0P
D!$□$0□1□!$□$0□1□
E!%□$4□10!%□$4□10
F!&□$8□1@!&□$8□1@
G!'□$<□1P!'□$<□1P
H!(□$@□2□!(□$@□2□
I!)□$D□20!)□$D□20
J!*□$H□2@!*□$H□2@
K!+□$L□2P!+□$L□2P
L!,□$P□3□!,□$P□3□
M!-□$T□30!-□$T□30
N!.□$X□3@!.□$X□3@
O!/□$/□3P!/□$/□3P
P!0□%□□4□!0□%□□4□
Q!1□%$□40!1□%$□40
R!2□%(□4@!2□%(□4@
S!3□%,□4P!3□%,□4P
T!4□%0□5□!4□%0□5□
U!5□%4□50!5□%4□50
V!6□%8□5@!6□%8□5@
W!7□%<□5P!7□%<□5P
X!8□%@□6□!8□%@□6□
Y!9□%D□60!9□%D□60
Z!:□%H□6@!:□%H□6@
4、符号对照表如下:
代码一位二位三位四位五位六位
!□A□"$□(0□A□"$□(0
@□!□$□□0□□!□$□□0□
#□C□",□(P□C□",□(P
$□D□"0□)□□D□"0□)□
%□E□"4□)0□E□"4□)0
^!>□%X□7@!>□%X□7@
&□F□"8□)@□F□"8□)@
*□J□"H□*@□J□"H□*@
(□H□"@□*□□H□"@□*□
)□I□"D□*0□I□"D□*0
_!?□%/□7P!?□%/□7P
+□K□"L□*P□K□"L□*P
=□]□#T□/0□]□#T□/0
-□M□"T□+0□M□"T□+0
[!;□%L□6P!;□%L□6P
]!=□%T□70!=□%T□70
{![□'L□>P![□'L□>P
}!]□'T□0!]□'T□0
;□[□#L□.P□[□#L□.P
:□Z□#H□.@□Z□#H□.@
"□B□"(□(@□B□"(□(@
'□G□"<□)P□G□"<□)P
,□L□"P□+□□L□"P□+□
.□N□"X□+@□N□"X□+@
 □_□#/□/P□_□#/□/P
/!<□%P□7□!<□%P□7□
|!/□'P□!/□'P□
/□0□"/+P□0□"/+P
`!@□&□□8□!@□&□□8□
~!^□'X□@!^□'X□@
<□/□#P□/□□/□#P□/□
>□^□#X□/@□^□#X□/@
05-04 08:25