反向Telnet,Delphi实现【原创】

时间:2015-01-08 08:57:01
【文件属性】:

文件名称:反向Telnet,Delphi实现【原创】

文件大小:24KB

文件格式:RAR

更新时间:2015-01-08 08:57:01

反向 Telnet delphi socket

反向Telnet,反向连接 2008年以前用Delphi 7 写的小工具 当时在矿山使用 了我们开发的系统软件,没有宽带,使用GPRS无线数据上传 当时是为了维护方便,写了这个小工具! 分服务器端(主控端——swServer.dpr)和客户端(被控端——swClient2.dpr,安装在矿山电脑上), 公司有ADSL,但IP地址是动态的, 主控端启动后会在公司的网站(使用万网的主机)上登记IP,被控端启动后自动从公司网站获取IP, 然后主动连接主控端,主控端可以输入任何有效命令(包括DOS命令,或任何DOS程序),被控端接受 到指令后进行执行,并将执行结果返回主控端。 最值得注意的是客户端的程序,自认为技术含量很高!编译后才20多K!未使用Delphi的Form,而是使用类VC的 消息循环、winSocket、管道、重定向等,从Socket接受命令直接转到CMD执行,并将执行结果通过管道输出到Socket, 返回给主控端!


【文件预览】:
swServer.dpr
Unit1.ddp
swServer.cfg
swServer.dproj
Unit1.dfm
swClient2.dof
swServer.dof
swClient2.identcache
Winsock2.pas
swClient2.dproj.local
swServer.identcache
swClient2.cfg
readme.txt
swClient2.dproj
Unit1.pas
swClient2.dpr
swServer.res

网友评论

  • 参考一下,非常有用
  • 和我的需求差不多,我是调用数据库的,参考一下,感谢作者
  • delphi xe2下不兼容
  • 非常有用!!!