Found a WinSock wrapper COM object called ActiveSocket that allows you to produce code like this:

code:
' *****************************************************
' Example4: Wake Up on LAN
'     Note: Use an existing MAC address
' (c) Copyright 2001 by ActiveXperts Software 
' http://www.activexperts.com
' *****************************************************

Set wObj = CreateObject("ActivXperts.WOL")

WScript.Echo "ActiveSocket " & wObj.Version & " demo."
WScript.Echo "Expiration date: " & wObj.ExpirationDate & vbCrLf

wObj.WakeUp "00-10-4B-BA-7A-51"
WScript.Echo "WakeUp: result = " & wObj.LastError
Costs money though, which kinda sucks.

-Shawn