Bundy Posted April 18, 2006 Posted April 18, 2006 (edited) I had little script, which was giving me my puplic IP (i'm in a little lan). It looked like this: $status = InetGet("http://dynupdate.no-ip.com/ip.php", "ip.htm") InetGet("http://www.no-ip.com/ip.php", "ip.htm") $LINE = FileReadLine("ip.htm", 1) ClipPut($LINE) FileDelete(@ScriptDir & "\ip.htm") IniWrite("getip.ini","Przeglad IP",@MDAY & "."& @MON & "." & @YEAR & "-" & @HOUR & ":" & @MIN, $LINE) MsgBox(0, "Obecne IP", $LINE & @CR & "status: " & $status) Now for some time it doesn't work. I don't remember now, but I haven't used InetGet(), but some old method which was working, now it's screwed up _GetIP doesn't work either... Edited April 18, 2006 by Bundy
Valuater Posted April 18, 2006 Posted April 18, 2006 maybe #include <Inet.au3> $PublicIP = _GetIP() MsgBox(0, "IP Address", "Your IP Address is: " & $PublicIP) 8)
Bundy Posted April 18, 2006 Author Posted April 18, 2006 As I wrote higher - it doesn't work, I get -1.
Valuater Posted April 18, 2006 Posted April 18, 2006 (edited) As I wrote higher - it doesn't work, I get -1.try it again... its working for me nowit wasn't earlier, maybe the site was down... dunno8) Edited April 18, 2006 by Valuater
exodius Posted April 19, 2006 Posted April 19, 2006 I had little script, which was giving me my puplic IP (i'm in a little lan). It looked like this: $status = InetGet("http://dynupdate.no-ip.com/ip.php", "ip.htm") InetGet("http://www.no-ip.com/ip.php", "ip.htm") $LINE = FileReadLine("ip.htm", 1) ClipPut($LINE) FileDelete(@ScriptDir & "\ip.htm") IniWrite("getip.ini","Przeglad IP",@MDAY & "."& @MON & "." & @YEAR & "-" & @HOUR & ":" & @MIN, $LINE) MsgBox(0, "Obecne IP", $LINE & @CR & "status: " & $status) Now for some time it doesn't work. I don't remember now, but I haven't used InetGet(), but some old method which was working, now it's screwed up _GetIP doesn't work either... Try this instead: #include <Inet.au3> $status = InetGet("http://dynupdate.no-ip.com/ip.php", "ip.htm") $LINE = FileReadLine("ip.htm", 1) FileDelete(@ScriptDir & "\ip.htm") IniWrite("getip.ini","Przeglad IP",@MDAY & "."& @MON & "." & @YEAR & "-" & @HOUR & ":" & @MIN, $LINE) MsgBox(0, "Obecne IP", $LINE & @CR & "status: " & $status)
Bundy Posted April 19, 2006 Author Posted April 19, 2006 Try this instead: #include <Inet.au3> $status = InetGet("http://dynupdate.no-ip.com/ip.php", "ip.htm") $LINE = FileReadLine("ip.htm", 1) FileDelete(@ScriptDir & "\ip.htm") IniWrite("getip.ini","Przeglad IP",@MDAY & "."& @MON & "." & @YEAR & "-" & @HOUR & ":" & @MIN, $LINE) MsgBox(0, "Obecne IP", $LINE & @CR & "status: " & $status)There is no saving page to file. But when I add it it's still the same
jjj Posted April 19, 2006 Posted April 19, 2006 There is no saving page to file. But when I add it it's still the same inetget has caching on by default. If you have:inetget(http... , filename, 1)it will force the download every time.
Bundy Posted April 19, 2006 Author Posted April 19, 2006 But in those script is only status, not getting file I still have no idea what to do.
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now