【文件属性】：
文件名称：VB6.0远程开机的实现.rar
文件大小：3KB
文件格式：RAR
更新时间：2022-07-30 11:45:59
VB源码-网络相关
基于VB的远程开机程序，好像远程关机的见到比较多，远程开机见的并不多，一台电脑要想实现网上远程开机，其主板和网卡必须都支持远程唤醒功能，然后还得进入BIOS设置COMS，至于如何设置，不同的主板设置方法也可能不一样，请参考有关资料 设置好COMS后就可以用本程序发送远程开机命令了,如果想要广域网远程开机，那么除了设置COMS外，还得对路由器进行一定的设置。
'新建一个工程，在Form1上添加三个Text控件，三个标签控件，一个命令按钮和一个Winsock1控件，然后复制下面的代码到Form1
Dim myMAC(0 To 5) As Byte '欲唤醒的主机的MAC地址
Private Sub StrToMAC(ByVal myStrMAC As String) '将MAC地址的字符串形式转化为十六进制数值保存在数组myMAC里
Winsock1.SendData MagicPacket '发送魔术包(不管是在局域网还是在广域网，只要一台电脑检测到对应MAC的魔术包就会自动唤醒)
Winsock1.Protocol = sckUDPProtocol'使用UDP协议
Text1.Text = "010203ABCDEF" '欲唤醒的电脑的MAC地址，MAC地址的格式要求这样填(数值之间没有其它字符)
Text2.Text = "225.225.225.255" '广播地址(因为远程电脑已关机，没有IP地址，所以只能以广播形式找到要打开的电脑，广域网的话填路由器的IP)
Text3.Text = "0" '端口号，在局域网里的话就为0吧，广域网的话就看你的路由器开放哪个端口了！
【文件预览】：
codesc.net
----远程开机的实现()
--------Form1.frm(4KB)
--------工程1.vbp(756B)
--------MSSCCPRJ.SCC(190B)
--------工程1.vbw(50B)