Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Dim xmlhttp As New MSXML2.XMLHTTP
- xmlhttp.Open "GET", "http://192.168.0.10/switch_cammode.cgi?mode=shutter", True
- xmlhttp.Send
- xmlhttp.Open "GET", "http://192.168.0.10/exec_shutter.cgi?com=1st2ndpush", True
- xmlhttp.Send
- xmlhttp.Open "GET", "http://192.168.0.10/exec_shutter.cgi?com=2nd1strelease", True
- xmlhttp.Send
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement