Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Frage zum VBArchiv Workshop - "FTP TEIL 2"
Autor: Kabal
Datum: 07.02.03 13:49
Hallo Leute, also habe wieder Probleme mit dem FTP Workshop. Habe es mal gestartet, und als LOCALHOST: ne IP eingegeben (der ftp server existiert) USERNAME: anonymous PASSWORT: anonymous PORT: 21 gehe auf connecten und bekomme den Fehler: LAUFZEITFEHLER 5, ungültiger prozeduraufruf oder argument in dem Code abschnitt " ' dazwischenliegene Leerzeichen ausgrenzen" : Private Function KonvertDirList(ByVal DirData As String) As Variant Dim AllFiles() As String Dim TmpArray() As String Dim i As Long Dim k As Long Dim TmpPos As Long ' Vorabinforamtionen des Servers entfernen If StrConv(Left$(DirData, 5), vbLowerCase) = "total" Then _ DirData = Mid$(DirData, InStr(1, DirData, vbCrLf) + 2) If DirData = "" Then Exit Function ' Array dimensionieren AllFiles = Split(DirData, vbCrLf) ReDim TmpArray(0 To UBound(AllFiles) - 1, 3) ' Für jede Datei die entsprechenden Informationen ermitteln For i = 0 To UBound(AllFiles) - 1 ' Attribute separieren TmpArray(i, 0) = Trim$(Left$(AllFiles(i), InStr(1, AllFiles(i), " ") - 1)) AllFiles(i) = Trim$(Replace(AllFiles(i), TmpArray(i, 0), "", 1, 1)) ' dazwischenliegene Leerzeichen ausgrenzen For k = 0 To 2 TmpPos = InStr(1, AllFiles(i), " ") AllFiles(i) = Trim$(Mid$(AllFiles(i), TmpPos)) Next k ' Dateigröße TmpArray(i, 1) = Trim$(Left$(AllFiles(i), InStr(1, AllFiles(i), " ") - 1)) AllFiles(i) = Trim$(Replace(AllFiles(i), TmpArray(i, 1), "", 1, 1)) ' Datum TmpArray(i, 2) = Left$(AllFiles(i), 12) AllFiles(i) = Trim$(Replace(AllFiles(i), TmpArray(i, 2), "", 1, 1)) ' Dateiname TmpArray(i, 3) = Trim$(AllFiles(i)) Next i ' Array zurückgeben KonvertDirList = TmpArray End Function Sorry wenn ich hier den ganzen Code eingegeben habe. Weiß das jemand ? Danke Gruß

Frage zum VBArchiv Workshop - "FTP TEIL 2"	659	Kabal	07.02.03 13:49
Re: Frage zum VBArchiv Workshop - "FTP TEIL 2"	407	Dieter	08.02.03 00:54
Re: Frage zum VBArchiv Workshop - "FTP TEIL 2"	390	Kabal	08.02.03 09:21
Re: Frage zum VBArchiv Workshop - "FTP TEIL 2"	380	Dieter	08.02.03 09:45
Re: Frage zum VBArchiv Workshop - "FTP TEIL 2"	367	Kabal	08.02.03 09:48
Re: Frage zum VBArchiv Workshop - "FTP TEIL 2"	46	Lmartin	10.02.03 15:14
Re: Frage zum VBArchiv Workshop - "FTP TEIL 2"	390	Kabal	10.02.03 16:14

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen