WHS で Win APIが使える DynamicWrapper - Windows 2000 Blog

Windows Scripting Host 上で Windows API が使えるようになる Dynamic Wrapper というのを使ってみました リンク元が切れてるので、 dynawrapNt.zip で探してみてね Dim objDynaWrap Dim hWnd Dim CC Set objDynaWrap = CreateObject("DynamicWrapper") objDynaWrap.Register "USER32.DLL", "FindWindow", "i=sl", "f=s", "r=h" objDynaWrap.Register "USER32.DLL", "FindWindowEx", "i=hhsl", "f=s", "r=h" hWnd = objDynaWrap.FindWindow("IEFrame", 0) If hWnd = 0 Then W