Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

if dir liefert fehler typen unverträglich

Forumthread: if dir liefert fehler typen unverträglich

if dir liefert fehler typen unverträglich
Heinzs
Hallo ihr wissenden,
in nachfolgendem Code erhalte ich in der Zeile if dir(gn_such) then Fehler 13, Typen unverträglich. Auch das Einfügen eines DIM gn_such as string brachte keine Abhilfe.
gn_such = "\\eudehil-dxp130\c$\autoexec.bat"
If Dir(gn_such) Then
...
else
...
endif
Sinn des Stamenets ist es zu prüfen, ob ein PC im Netzwerk existiert; Rechte existieren hierfür.
Hat jemand einen Tip?
Danke für Hilfe!
Heinz
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: if dir liefert fehler typen unverträglich
19.07.2010 12:33:31
Tino
Hallo,
Du must in der If eine Prüfung auf True oder False machen.
Gruß Tino
AW: if dir liefert fehler typen unverträglich
19.07.2010 12:37:31
Kawensmann
Hallo,
DIR liefert einen String zurück. Du testet auf Boolean.
If Dir(gn_such) "" Then
Gruß
Kawensmann
AW: if dir liefert fehler typen unverträglich
19.07.2010 12:44:32
Heinzs
Danke für Hilfe! das funktioniert nun!
Gruß Heinz
Anzeige
if dir liefert fehler typen unverträglich
19.07.2010 12:45:36
Anton
Hallo Heinz,
probier's so:
Code:

Sub b()
  Set fso = CreateObject("Scripting.FileSystemObject")  
  If (fso.FileExists("\\eudehil-dxp130\c$\autoexec.bat")) Then  
   '...
  Else
   '...
  End If  
  Set fso = Nothing  
End Sub  


mfg Anton
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige