Se podra hacer esto en VFP???

29/07/2003 - 14:17 por Heberto Villavicencio | Informe spam
Necesito capturar la direccion de internet que el usuario escribe en el IE,
se que para IE se pueden escribir plugsin, pero no se si esto se podra hacer
en VFP, en especifico, necesito capturar la direccion y guardarla en una
tabla, pense hacerlo revisando el historial que maneja IE, pero este
historial puede ser borrado en cualquier momento por el usuario, esto no me
serviria,alguna idea para hacer esto?????
 

Leer las respuestas

#1 David Amador \(Davphantom\)
29/07/2003 - 14:57 | Informe spam
Claro que puedes hacerlo . mira esta función api que hace justo lo que
quieres


CLEA DLLS
DECLARE INTEGER FindWindowEx IN "user32" INTEGER, INTEGER, STRING, STRING
DECLARE INTEGER SendMessage IN "user32" INTEGER, INTEGER, INTEGER, STRING

#DEFINE wm_gettext 13
#DEFINE wm_gettextlength 14
hclass = "IEFrame"
ecaption = .NULL.
HWND = findwindowex(0, 0, hclass, ecaption)
hclass = ("WorkerA")
HWND = findwindowex(HWND, 0, hclass, ecaption)
hclass = ("ReBarWindow32")
HWND = findwindowex(HWND, 0, hclass, ecaption)
hclass = ("ComboBoxEx32")
HWND = findwindowex(HWND, 0, hclass, ecaption)
hclass = ("ComboBox")
HWND = findwindowex(HWND, 0, hclass, ecaption)
hclass = ("Edit")
HWND = findwindowex(HWND, 0, hclass, ecaption)
ntext = sendmessage(HWND, wm_gettextlength, 0, "")
BUFFER = SPACE(ntext)
sendmessage(HWND, wm_gettext, ntext + 1, @BUFFER)
IF EMPTY(ALLT(BUFFER)) then
MESSAGEBOX("Microsoft Internet Explorer no esta activo..." +SPACE(8),0 +
64,"Atención")
RETU
ELSE
MESSAGEBOX("La Url es: " + BUFFER + SPACE(8),0 + 64,"Atención")
ENDIF
CLEAR ALL
CLEAR DLLS
RETURN

David Amador Tapia
Webmaster de "La Web de Davphantom"
www.davphantom.cjb.net
Cartagena. Colombia
Tel (5) 6621502 - 6581523


"Heberto Villavicencio" escribió en el mensaje
news:
Necesito capturar la direccion de internet que el usuario escribe en el


IE,
se que para IE se pueden escribir plugsin, pero no se si esto se podra


hacer
en VFP, en especifico, necesito capturar la direccion y guardarla en una
tabla, pense hacerlo revisando el historial que maneja IE, pero este
historial puede ser borrado en cualquier momento por el usuario, esto no


me
serviria,alguna idea para hacer esto?????



Preguntas similares