Título: Tutorial Control Inet - Internet transfer Control Publicado por: programatrix en 27 Junio 2005, 11:37 am Se trata de un articulo de microsoft sobre este control traducido al español, las partes mas importantes, para este foro:
Sumario: Este artículo muestra dos ejemplos de como se usa el control internet transfer control que esta incluido en Microsoft Office Developer Edition 97. Mas información: Con el internet transfer control tu puedes acceder a internet y a la world wid web usando los dos protocolos mas comunes: Hiper text transfer control (protocolo de transferencia de hipertexto HTTP). Y el protocolo filer transfer protocol (protocolo de transferencia de ficheros FTP). Cuando tu usas Inet con http tu puedes obtener documentos http de una internet o intranet y cuando lo usas con ftp tu puedes enviar y recibir ficheros de un sitio ftp. El control soporta los mas comunes comandos en el lenguaje ftp como GET, DIR, DELETE y CD. Aunque si tu creas un cliente ftp desde el control winsock son comandos diferentes. Ejemplo 1: Usando el evento openurl para obtener una página html. El siguiente ejemplo descarga la web principal de microsoft al disco duro. Aqui vendrían las instrucciones de como añadirle en el formulario el control pero me las salto por ser un poco fáciles Necesitamos los siguientes controles: Citar Nombre formulario: frmOpenURL En un modulo de clase pondemos:-------------------------- Caption: OpenURL Form Boton: Name: cmdWriteFile Caption: Write to Disk Otro boton: Nombre: cmdGetHeader Caption: Get Header Código: Dim objInet as Inet Código: Private Sub Form_Load() El siguiente ejemplo usa el control inet con ftp y descarga de microsoft un fichero que se llama: Dirmap.txt. Nota: El control Inet no trabaja con algunos servidores proxy. Si tu no tienes una conexión directa a internet con un ISP, verifica que tu servidor proxy puede soportar conexiones ftp. Primero en este ejemplo vamos a usar: Citar Nombre del formulario: frmRetrieveFile En un módulo de clase ponemos:-------------------------- Caption: Retrieve FTP File Botón: Nombre: cmdGetFile Caption: Get FTP File Caja de texto: Nombre: txtFTPSite Caja de texto: Nombre: txtFileName Código: Dim objFTP as Inet Código: Private Sub Form_Load() Microsoft acces 97 Microfot visual basic 6.0 Fuente: La fuente es: http://support.microsoft.com/default.aspx?scid=kb;EN-US;q163653 por si se desea verlo mas completo. Yo me he limietado a copiar las partes mas interesantes y a traducirlo. |