#[HOTKEY][EXT]F9
#HideTitleOnCompile
#USE 大漠.ser
function main
obj=COMCreateObject("Wscript.Shell")
ret = COMInvoke(obj, "run", "str","regsvr32 dm.dll /s")
wait(1500)
obj = COMCreateObject("dm.dmsoft")
print(VER())
If len(ver()) = 0 Then
MsgBox("创建对象失败....", 0)
exit function
End If
handle = FaqCapture(100,100,200,200,50,100,3000)
dm_ret = FaqPost("192.168.1.100:12345",handle,1,60 * 1000)
end function