vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Erstellen von dynamischen Kontextmen?s - wann immer Sie sie brauchen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Ordner lokalisieren 
Autor: Doddy
Datum: 17.06.09 14:52

Hey ihr,
ich hab da mal wieder ein frage. Ich möchte einen Ordner lokalisieren.

Wenn der Ordner in "C:\programme\xyz\" vorhanden ist, dann ruf abc auf ; wenn der Ordner nicht vorhanden ist dann prüfe ob der da ist "C:\programm files\xyz\" ; sollte der nicht da sein gebe eine meldung aus mit "Das programm ist nicht vorhanden".

Nur weiß ich nicht wie ich das schreiben soll. Kann mir da einer behilflich sein?

Also die konkrete frage ist, wie prüfe ich ob ein Ordner existent ist?

Dim VerzeichnisA As String
Dim VerzeichnisB As String
Dim VerzeichnisSum As String

VerzeichnisA = "c:\programme\xyz\"
VerzeichnisB = "c:\programm files\xyz\"

'Programm starten
If VerzeichnisA = True Then
VerzeichnisSum = VerzeichnisA
Call Shell(VerzeichnisA + "programm.exe", ...)
Else If
VerzeichnisSum = VerzeichnisB
Call Shell(VerzeichnisB + "programm.exe", ....)
Else If
msgbox("Das Programm / der Ordner ist nicht vorhanden, bitte installieren Sie dieses zuerst.")
End If
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Ordner lokalisieren865Doddy17.06.09 14:52
Re: Ordner lokalisieren469Zardoz17.06.09 16:01
Re: Ordner lokalisieren442Doddy17.06.09 16:38
Re: Ordner lokalisieren486ModeratorDieter17.06.09 16:45

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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel