Una vez instalada la edicion
Shareware de CGR WebDownload, encontrara en el Menu Programas de
Windows el codigo fuente en Visual Basic 6.0 de una completa aplicacion
para la descarga de archivos, demostrando todas las funcionalidades del
control.
Codigo de Ejemplo
With CGRWebDownload1
.ResumeMode True,
4
.GetFile "c:\cgrsendmail.zip", "http://cgrsoftware.com/activex/cgrsendmail.zip"
Do While Not .Ready
DoEvents ' Descargas Asincronicas
Loop
End With
If CGRWebDownload1.Error
<> 0 Then
Msgbox "Ha
ocurrido un error transfiriendo el archivo."
Else
Msgbox "Transferencia
Completada!"
End If