[VB6] Errore password non valida su collegamento FTP

[giustavalla]

Non viene evidenziato niente di anomalo

   Dim C As Integer
   For C = 1 To Len(PswFTP)
      Debug.Print C, Mid$(PswFTP, C, 1), Asc(Mid$(PswFTP, C, 1))
   Next C