VB6.0实现远程开机.rar

简介：
本资源提供利用Visual Basic 6.0编程实现远程开启计算机的方法和源代码，适用于需要进行网络管理或自动化办公的用户。 基于VB的远程开机程序相对较少见，大多数情况下人们更常使用的是远程关机功能。要想实现网上远程开启一台电脑的功能，该电脑的主板及网卡必须支持唤醒功能，并且需要进入BIOS设置CMOS。由于不同型号的主板其具体设定步骤可能有所差异，请参考相关资料进行相应的调整和配置。 完成以上操作后，就可以通过本程序发送远程开机指令了。若希望在广域网上实现这一目标，则除了上述设置外还需对路由器做一些特定的设定。 首先，在VB环境中创建一个新的工程，并于主窗体（Form1）上添加三个文本框控件、三个标签以及一个命令按钮和Winsock控件，随后将以下代码粘贴到该窗体内： ```vb Dim myMAC(0 To 5) As Byte 欲唤醒的主机的MAC地址 Private Sub StrToMAC(ByVal myStrMAC As String) 将字符串形式的MAC地址转换为十六进制数值并存储在数组myMAC中。 End Sub Winsock1.SendData MagicPacket 发送魔术包，无论是在局域网还是广域网上，只要目标电脑检测到与自身匹配的MAC地址信息就会自动启动。 Winsock1.Protocol = sckUDPProtocol 使用UDP协议 Text1.Text = 010203ABCDEF Text框中的值为欲唤醒的目标计算机的MAC地址。注意格式要求（数值之间不应有其他字符）。 Text2.Text = 255.255.255.255 广播地址，因为目标电脑处于关闭状态时没有IP地址，所以只能采用广播形式来寻找需要启动的机器；如果是在广域网环境下，则应填写路由器的IP地址。 Text3.Text = 0 Text框中的值为端口号，在局域网上默认设为“0”，而在广域网情况下则需参考你的具体设置。 ``` 以上便是基于VB语言实现远程开机功能的基本步骤与代码示例。