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.
Intenta poner el:
Set cFtp = New FtpSend
Antes de que empezes a utilizar sus métodos y funciones, o sea, luego del "Private Sub Form_Load".
Saludos ;)
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.