Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Programmpfad auslesen bzw. Dateien suchen

Frage Entwicklung VB for Applications

Mitglied: skid

skid (Level 1) - Jetzt verbinden

07.11.2006, aktualisiert 08.11.2006, 9155 Aufrufe, 7 Kommentare

Hallo,

habe da mal ein kleines Problem.....

Suche eine Möglichkeit das mir beim Starten eines VB-Skriptes ausliest wo dieses sich gerade befindet d.h. welcher Programmpfad.

Es geht darum das ich ein Skript habe welches ein anderes mit dem einen oder anderen Tool zusammen aufruft.
Das Funktioniert aber nur wenn ich im Skript den Pfad eintrage wo sich die anderen benötigten Dateien befinden sollen.

Ich möchte dies aber gerne Variabel halten - egal in welchen Ordner oder Verzeichnis ich die Dateien kopiere soll das Skript nach diesen Dateien suchen und diese in eine Variable setzen so das das Programm wieder laufen kann.

Hoffe das jemand dazu eine Idee hat

Gruss
SKID
Mitglied: Biber
07.11.2006 um 14:11 Uhr
Moin skid,

sowas in der Art...?
01.
... 
02.
Function ScriptPath() 
03.
        Dim strSFN 
04.
        strSFN = WScript.ScriptFullName 
05.
        ScriptPath = Left(strSFN, InStrRev(strSFN, "\") - 1) 
06.
    End Function 
07.
...
Gruß
Biber
Bitte warten ..
Mitglied: skid
07.11.2006 um 14:41 Uhr
Gude Biber,

ganz genau sowas in der Art.

Habe gleich mal den Test gemacht - Funktioniert super!

und ich such den halben Tag........

Ach ja, nochwas.....

wie muss denn diese Zeile strSFN = WScript.ScriptFullName in VB heißen

Gruss
Skid
Bitte warten ..
Mitglied: bastla
07.11.2006 um 15:57 Uhr
Hallo Skid!

VB 6.0App.Path
VB 2005Application.StartupPath
VBAApplication.Path

... oder meintest Du ein anderes VB?

HTH
bastla
Bitte warten ..
Mitglied: skid
08.11.2006 um 07:31 Uhr
Moin bastla,

VB 6.0 passt schon

Bei strSFN = WScript.ScriptFullName bekomme ich die Meldung Laufzeitfehler 424 - Objekt erforderlich

Mit Deinen Vorschlägen siehts auch nicht anders aus.

Ich habe bestimmt nur eine Kleinigkeit vergessen - aber was nur ?

Gruss

SKID
Bitte warten ..
Mitglied: Biber
08.11.2006 um 09:21 Uhr
Moin skid,

bist Du in der Zeile verrutscht?

strSFN = App.Path

...bei VB 6.0, wenn bastla richtig recherchiert hat, wovon ich wie immer ausgehe.

Gruß
Biber
Bitte warten ..
Mitglied: skid
08.11.2006 um 09:43 Uhr
Moin Biber,

ja, irgendwie hab ich die ganze Zeit an was falschem rumgebastelt - schande....

aber jetzt funktionierts!

Gruss
SKID
Bitte warten ..
Mitglied: Biber
08.11.2006 um 10:04 Uhr
Freut mich,

dann setz doch diesen Thread bitte auf "Gelöst"...
...sonst schaffen wir unsere Quote hier nicht

Liebe Grüße zurück
Biber
Bitte warten ..
Ähnliche Inhalte
Neue Wissensbeiträge
Drucker und Scanner

Samsung SL-M4025ND, firmware update und (kompatible) Tonerkassetten

(1)

Erfahrungsbericht von markus-1969 zum Thema Drucker und Scanner ...

Router & Routing

PfSense auf Supermicro Intel Xeon D-15x8 SoC Bare Bone

Tipp von Dobby zum Thema Router & Routing ...

Windows Server

Exchange 2010 auf Windows Server 2016 und AD

(2)

Tipp von Herbrich19 zum Thema Windows Server ...

KVM

How to: Libvirt Port forwarding

(2)

Anleitung von fundave3 zum Thema KVM ...

Heiß diskutierte Inhalte
Router & Routing
über Vmware auf eine FritzBox mit IPv6 per VPN (16)

Frage von Zockervogel zum Thema Router & Routing ...

Windows Server
gelöst Netzlaufwerk RemoteApp auf Win 2012 R2 Terminalserver funktioniert nicht (12)

Frage von grenzde zum Thema Windows Server ...

Windows 7
Windows Client Anmeldung bei zwei identischen Domänen (11)

Frage von creeko zum Thema Windows 7 ...