[VB6] Inet e connessione ad una cartella remota tramite FTP

[x69asterix]

ciao,
non capisco il perchè se mi conneto ad un sito ftp esempio:

ftp://ftp.zyxel.it

Inet1.URL = "ftp://" & Text2.Text & ":" & Text3.Text & "@" & ftp.zyxel.it

con questo codice accedo alla dir principale poi da lì mi muovo:

Option Explicit
Public ID As String
Private Sub Command3_Click()
'CONNESSIONE
  Timer1.Enabled = True
  Inet1.Protocol = icFTP
  Inet1.URL = "ftp://" & Text2.Text & ":" & Text3.Text & "@" & Text1.Text
  ID = "DIR"
 ' Inet1.RequestTimeout = 60

Private Sub Timer1_Timer()
    ID = "DIR"
    Inet1.Execute Inet1.URL, "DIR "
    Timer1.Enabled = False
    ListView1.ListItems.Clear
    ListView1.ListItems.Add , , "Directory/"
    ListView1.ListItems.Add , , "../", 1, 1
    
     End Sub

Private Sub Inet1_StateChanged(ByVal State As Integer)
'VISUALIZZA LA LISTA DELLA DIR REMOTA
    Dim POSINVIO As Integer
    Dim RITORNO As String
    If (ID = "DIR") And (State = icResponseCompleted) Then
        RITORNO = Inet1.GetChunk(1024, icString)
        POSINVIO = InStr(1, RITORNO, vbNewLine)
        While POSINVIO > 0
            If Left(RITORNO, POSINVIO - 1) <> "" Then ListView1.ListItems.Add , , Left(RITORNO, POSINVIO - 1), 1, 1
            RITORNO = Mid(RITORNO, POSINVIO + 2)
            POSINVIO = InStr(1, RITORNO, vbNewLine)
           
        Wend
        ID = ""
       
        End If
       
End Sub

End Sub

ma se invece di entrare nella dir principale, digito esempio

ftp://ftp.zyxel.it/adsl/
Inet1.URL = "ftp://" & Text2.Text & ":" & Text3.Text & "@" & ftp.zyxel.it/adsl/

mi riporta sempre nella dir principale Perchè??

[x69asterix]

ok risolto..

   'Text5.Text = Nome della cartella'
    ID = "DIR"
    If Check1.Value = Checked Then
    Inet1.Execute "", "DIR """ & Text5.Text & """"
    Else
    Inet1.Execute "", "DIR"
    End If
    Timer1.Enabled = False
    ListView1.ListItems.Clear
    ListView1.ListItems.Add , , "Directory/"
    ListView1.ListItems.Add , , "../", 1, 1