Just looked at my notes and wse had a problem with that routine getting past 
the firewall and ended up with this:

#define TIMEOUT 30  && timeout 30 seconds
 
o = createobject("internetexplorer.application")
 o.Navigate("http://www.atoutfox.org/ip.asp";)
 v_t = SECONDS()

 * DO WHILE o.busy() AND (seconds() -v_t) <= TIMEOUT
 DO WHILE o.ReadyState<>4 AND (seconds() -v_t) <= TIMEOUT
   DOEVENTS
 ENDDO
 IF o.ReadyState<>4
   v_ip = "0.0.0.0"
 else
   v_ip = o.document.nameprop()
 ENDIF
 RELEASE o
 
? "Your IP address is : ", v_ip


Hope it helps

Dave

-----Original Message-----
From: ProFox [mailto:[email protected]] On Behalf Of 
[email protected]
Sent: 27 May 2014 16:13
To: [email protected]
Subject: How to identify a person's IP address from your VFP app?

I'm wondering how to identify the user's IP address so we can apply tighter 
security.  (MySQL allows you to restrict access by IP address.)

How do you get the person's true IP (and not just the internal network IP)?  Do 
you do a TraceRt and someone glean it from that?

Thanks!

[excessive quoting removed by server]

_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: 
http://leafe.com/archives/byMID/profox/[email protected]
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to