Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: klappt leider nicht
Autor: georg-30
Datum: 16.10.02 11:20
Private Sub Command1_Click() Dim sFile As String Dim sPath As String ' Wichtig: exakte Pfadangabe mit abschließendem Backslash sPath = "c:\Dokumente und Einstellungen\Knight\Lokale Einstellungen\Anwendungsdaten\Microsoft\Outlook\" sFile = Dir$(sPath & "*.psi") Do While sFile <> "" If sFile <> "." And sFile <> ".." Then MsgBox "Erste gefundene Datei: " & sFile Exit Do End If sFile = Dir$ Loop End Sub dateien sind in dem ordner vorhander aber er zeigt nichts an

warum klapt * nicht	549	georg-30	15.10.02 18:34
Re: warum klapt * nicht	249	Stefan	15.10.02 18:36
Re: warum klapt * nicht	292	georg-30	15.10.02 18:41
Re: warum klapt * nicht	319	Stefan	15.10.02 18:46
Re: warum klapt * nicht	350	georg-30	15.10.02 18:56
Re: warum klapt * nicht	338	Stefan	15.10.02 19:06
Re: noch ein kleiner fehler	276	georg-30	16.10.02 10:19
in welcher Programmzeile	334	Dieter	16.10.02 10:25
Re: in welcher Programmzeile	307	georg-30	16.10.02 10:31
Re: in welcher Programmzeile	320	MrByte	16.10.02 10:37
Re: in welcher Programmzeile	277	Dieter	16.10.02 10:42
Re: klappt leider nicht	336	georg-30	16.10.02 11:20
Re: klappt leider nicht	294	georg-30	16.10.02 11:25

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