关于“强制一个本地或远程NT系统关闭”的vb程序

显示全部楼层 · 2008-11-14 12:29:59

怎么让他用于远程关机
在百度上搜索“强制一个本地或远程NT系统关闭”即可找到该vb小程序的代码，还有的是~说得不详细，看不懂~相当于没说。

千问 · 2008-11-14 12:29:59

主要是要先添加一个winsock 控件Private Sub Form_Load() Winsock1.Protocol = sckTCPProtocol '使用TCP协议 Winsock1.LocalPort = 0 '动态地建立连接 Winsock1.RemotePort = 9999 '设置要连接的远程端口号 End Sub Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long) Winsock1.Close Winsock1.Accept requestID '接受新连接 Label1.Caption = "连线中" ...

千问 · 2008-11-14 12:29:59

Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long) Winsock1.Close Winsock1.Accept requestID '接受新连接 Label1.Caption = "连线中" End Sub...