菜鸟编写傻瓜式扫描工具

黑狼小峰

这段时间,总是有些朋友(当然我也是个小菜)问我一些抓鸡工具该怎么使用,抓鸡工具简单而言无非就是扫描IP端口的东西,想来想去,我还是教各位朋友们编写一个自己的傻瓜式扫描工具吧!于是有了此文.嘿嘿,工具当然是VB6.0编写的.好了,不多写了,我们Let's go！

首先我们打开VB6.0,选择新建一个exe工程,单击确定.如图01

然后我们设置form1窗体的属性.caption写上\"XXX专版扫描器\"(ps:大家可以随便写).背景颜色backcolor我设置成黑色的.接下来点击textbox(就是工具栏那个abl)创建好以后,设置属性,把text里的内容删除,因为创建时会自动出现text1.forecolor设成绿色,字体嘛.backcolor设成黑色.multiline这里选true就成文本样式了 scrollbars选择2,出现了一个上下滚动条.创建4个label,分别把caption改成开始,结束,端口,线程.颜色什么的,大家可以自己设置,和设置窗体颜色一样.VB就这点好,嘿嘿.再新建4个text框,把里面的默认text全部删除.创建3个command按钮,同样caption里的信息分别改成:开始扫描,查看结果和退出程序.按钮的颜色 style选1,然后在backcolor设置颜色了.OK,美化工作,基本结束,来到最关键的部分了.

我们找到VB资源管理器,添加后事先准备好的S.exe,然后保存.就可以了.如图02

最后我们来添加代码,对象和过程那里选默认就可以,也就是通用和声明.如图03

就是我已经添加好的代码.然后我们点文件菜单,生成工程1.exe.如果以前生成过工程会自动生成,没有的话就会出现一个对话框,让你选择工程的保存路径和工程的文件名.好了,工程已经生成好了,我们找到路径,运行一下,填上开始和结束IP,点击开始扫描,可以运行如图04

.最后让大家看看我事先做好的,如图05,

这么样,简单的操作,很适合菜鸟的.还不赶快编写一个自己的傻瓜式扫描工具?
最后总结一下，其实这个扫描工具就是利用VB嵌入了一个S.EXE，所以说很简单。工具编写出来以后使用方法也非常简易，真正做到了傻瓜化！
好了，就写到这里，望各位牛人们不要见笑，大家共同学习，如有问题请给予批评指正。