Hola a todos,
Hasta ahora estaba compilado con la versi贸n 2.3 de Fivewin y me he actualizado a la versi贸n 7.01, de momento me va todo bien pero me he encontrado una dificultad.
Necesito saber si hay o no conexi贸n a internet para, si la hay, descargar un archivo del FTP usando la clase TFTP que me va bien.
Esto lo debo hacer porque si inicio la descarga y no hay conexi贸n a internet se me queda pillado el programa despu茅s de cerrarlo y si lo intentas volver a abrir te indica que solo se puede abrir una vez el programa, cosa l贸gica porque es lo que yo le mand茅.
Bien, para comprobar si tengo conexi贸n a internet hago lo siguiente:
IF TFTP():New( "ftp.microsoft.com", TInternet():New() ):hFTP>0
INTERNET=.T.
ENDIF
Es lo que se me ocurri贸 para poder saber si tengo conexi贸n, seguramente hay otra forma mejor de hacerlo pero esta me funcionaba hasta que me actualic茅.
Uso el ftp de microsoft porque no necesita autentificaci贸n, si uso el m铆o que si la necesita me da respuesta negativa y no me servia.
Cuando ejecuto mi programa copilado con FW 7.01 me da el siguiente error al compilar:
BLINKER : 1115 : FIVE.LIB(TFTP) : 'FILETIMETO' : unresolved external
BLINKER : 0 Warning error(s), 1 Fatal error(s)
Espero que me pod谩is ayudar, os agradezco de antemano vuestro inter茅s.
Hasta ahora estaba compilado con la versi贸n 2.3 de Fivewin y me he actualizado a la versi贸n 7.01, de momento me va todo bien pero me he encontrado una dificultad.
Necesito saber si hay o no conexi贸n a internet para, si la hay, descargar un archivo del FTP usando la clase TFTP que me va bien.
Esto lo debo hacer porque si inicio la descarga y no hay conexi贸n a internet se me queda pillado el programa despu茅s de cerrarlo y si lo intentas volver a abrir te indica que solo se puede abrir una vez el programa, cosa l贸gica porque es lo que yo le mand茅.
Bien, para comprobar si tengo conexi贸n a internet hago lo siguiente:
IF TFTP():New( "ftp.microsoft.com", TInternet():New() ):hFTP>0
INTERNET=.T.
ENDIF
Es lo que se me ocurri贸 para poder saber si tengo conexi贸n, seguramente hay otra forma mejor de hacerlo pero esta me funcionaba hasta que me actualic茅.
Uso el ftp de microsoft porque no necesita autentificaci贸n, si uso el m铆o que si la necesita me da respuesta negativa y no me servia.
Cuando ejecuto mi programa copilado con FW 7.01 me da el siguiente error al compilar:
BLINKER : 1115 : FIVE.LIB(TFTP) : 'FILETIMETO' : unresolved external
BLINKER : 0 Warning error(s), 1 Fatal error(s)
Espero que me pod谩is ayudar, os agradezco de antemano vuestro inter茅s.
