Error al compilar

[newbY]

Tengo un Form con el siguiente codigo:
Dim cFtp As FtpSend
Private Sub Form_Load()
cFtp.Usuario = Text1
cFtp.Pass = Text2
cFtp.Servidor = Text3
cFtp.Enviar Text4, Text5
CommonDialog1.ShowOpen
If CommonDialog1.FileName = "" Then Exit Sub
Text5 = CommonDialog1.FileName
Set cFtp = New FtpSend
End Sub
Private Sub Form_Unload(Cancel As Integer)
Set cFtp = Nothing
End Sub

Para este codigo utilicé un control llamado FTP.dll, el problema está en que al intentar compilar me salta el siguiente error:
Object variable or With block variable not set.

Y me marca cFtp.Usuario = Text1 en el debug.

¿Alguien me puede decir que ocurre?

Gracias, de antemano.

[HaDeS, -]

Intenta poner el:

Código (vb) [Seleccionar] Expandir


Set cFtp = New FtpSend

Antes de que empezes a utilizar sus métodos y funciones, o sea, luego del "Private Sub Form_Load".
Saludos

[newbY]

Gracias! Me sirvio, pero otra cosa, como podria hacer para que cuando suba el archivo, no se abra la ventanita de FTP Se subio el archivo correctamente!...

Gracias.