I would be disappointed when I read the content. I would be unable to help others read an easy language program. I would like to add this thing. In fact, this is my first time to modify and write a Easy Language program.
The code is as follows:
.Version 2 .Subprogram Get the external networkIP, Text type, public, Get the external networkIP .Local variables original, Text type .Local variables over, Text type, , "0" .Local variables IP, Text type original = To text (cometHTTPRead the file (“http:///”)) over = Split text (original, “YoursIPThe address is:[”, ) .if (Take the number of array members (over) < 2) return (“”) .otherwise .if结束 IP = Subtext replacement (over [2], “] </center></body></html>”, “”, , , Fake) return (IP)
The above is all the content of this knowledge point. Thank you for your support.