 |
| 文件: |
全自动扫描漏洞利用工具GOLDSWORD.zip |
| 大小: |
4048KB |
| 下载: |
下载 | |
text1.Text = " GOLDSWORD是一款全自动扫描漏洞利用工具，主要是利用用户名为Administrator，密码为空的远程主机。仅仅用于交流学习，请勿用于非法用途!" _
+ " 1,绿色软件，不向别的目录和注册表写入任何数据。" _
+ " 2,无法判断NTscan扫描是否完成，所以务必手动关闭它，否则程序将一直等待!"
text2.Text = "本版本主要更新如下:" _
+ " 1,更新ftpwmi135,httpwmi135,tftpwmi135核心代码,成功率更高。" _
+ " 2,更新RTCS批量溢出代码,当远程主机telnet开启时不再关闭。" _
+ " 3,增加了IPC批量135,先默认共享c盘,然后复制执行文件。" _
+ " 4,增加自动获取内网和公网IP功能。" _
+ " 5,增加关闭S扫描器的功能。" _
+ " 6,优化代码，解决占用cpu高的问题。"
For i = 1 To 8
If (i = 1) Then
Label11.Caption = "绿岛批量135，先S扫描135，然后NTSCAN过滤弱口令，最后让绿岛下载运行程序."
ElseIf (i = 2) Then
Label12.Caption = "RPMD批量135：利用的RPMD.VBE脚本来实现下载运行程序。"
ElseIf (i = 3) Then
Label13.Caption = "FTPWMI135:先连接远程主机然后登陆FTP服务器下载程序运行。"
ElseIf (i = 4) Then
Label11.Caption = "HTTPWMI135:利用wmi在远程主机写入脚本下载者然后运行。"
ElseIf (i = 5) Then
Label11.Caption = "TFTPWMI135：利用WMI在远程主机执行TFTP命令来下载运行程序。"
ElseIf (i = 6) Then
Label11.Caption = "1433批量溢出：扫描出1433后用sqlhello.exe溢出得到shell。"
ElseIf (i = 7) Then
Label11.Caption = "42批量溢出：扫描出42后用ms.exe溢出得到shell。"
ElseIf (i = 8) Then
Label11.Caption = "RTCS批量溢出:利用RTCS.vbe批量开telnet。"
End If
Next i
End Sub
