qq空间登录源码

在JS文件中,搜索md5就有了,很复杂的Private Sub Command1_Click()
If ValidQQNumber(Text1.Text) Then
WebBrowser1.Navigate "http://" & Text1.Text & ".qzone.qq.com/"
Else
MsgBox "请输入你正确的QQ号", vbExclamation
End If
End Sub

Private Sub Form_Resize()
If Me.WindowState = vbMinimized Then Exit Sub
WebBrowser1.Left = 0
WebBrowser1.Width = Me.ScaleWidth
WebBrowser1.Height = Me.ScaleHeight - WebBrowser1.Top
End Sub

Function ValidQQNumber(ByVal QQNum As String) As Boolean
Dim FoundMatch As Boolean
Dim myRegExp As Object
Set myRegExp = CreateObject("VBScript.RegExp")
myRegExp.IgnoreCase = True
myRegExp.Pattern = "^[1-9]\d{4,9}$"
FoundMatch = myRegExp.Test(QQNum)
ValidQQNumber = FoundMatch
End Function 赞同0| 评论密码是不可能靠JS就完成加密的~
加密函数也不是前台可以分析得到的~
真这样的话那QQ的密码安全还不是形同虚设了?死了这条心吧,腾讯的高手加密非常复杂,你水平还不够,不可能模拟的。把时间用在别的地方上吧,打好基础先。佩服,技术宅!
www.jdgytc.com 退化英文怎么说 显卡 小雕什么意思 www.ryjiaoyu.com cant help to do否定 nudix aspect 是什么意思啊 优客逸家怎么样 dnf2010劳动节称号 http www.xfa99.com 黄石公共就业服务网 氢储能 智慧建筑 有关于英语手抄报 小德张 小说 上海inspire learning 宙斯盾怎么用 通信协议 英文 小米gpu是什么型号 罗技 方向盘 ap裙子的码 一门到顶衣柜图片 叶黄素酯的作用 非常了得刘阳结婚了吗 疾风之刃时空术士 sleeping drugged secrets txt mac安装win黑屏 nonparent 索爱t628 上市价格 安监局 风险

Copyright 生活吧 Some Rights Reserved

如反馈或投诉等情况联系:une35498#163.com