Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

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

VBS - Wie Zugriff auf User Verzeichnis?

Frage Entwicklung VB for Applications

Mitglied: Fixu

Fixu (Level 1) - Jetzt verbinden

07.09.2009, aktualisiert 17:24 Uhr, 9449 Aufrufe, 2 Kommentare

Ich möchte via VB Script auf C:\Documents and Settings\Administrator\Local Settings\Application Data\Microsoft\Outlook\ zugreifen um das archive.pst sichern zu lassen. Jedoch brauche ich anstelle des "Administrator" eine Variable, da nicht immer dieser User angemeldet ist. Mit unten stehendem Teilskript habe ich probiert, dies zu bewerkstelligen - leider ohne Erfolg. Weiss jemand wo es happert, resp. gibt es keine einfachere Lösung?


Set fso = WScript.CreateObject("Scripting.FileSystemObject")
Source = "Z:\VBS\Move\uno\*"
Target = "C:\Documents and Settings\""%UserName%""\Local Settings\Application Data\Microsoft\Outlook\"

set WshShell = WScript.CreateObject("WScript.Shell")
Username = WshShell.ExpandEnvironmentStrings("%UserName%")
Wscript.Echo UserName
Mitglied: bastla
07.09.2009 um 17:57 Uhr
Auch Dir, Fixu, ein freundliches Hallo!

In der angegeben Reihenfolge kann's sowieso nix werden - abgesehen davon musst Du Textteile explizit mit "&" (oder zur Not auch mit "+") verknüpfen:
01.
Set WshShell = WScript.CreateObject("WScript.Shell") 
02.
Username = WshShell.ExpandEnvironmentStrings("%UserName%") 
03.
 
04.
Target = "C:\Documents and Settings\" & UserName & "\Local Settings\Application Data\Microsoft\Outlook\" 
05.
 
06.
WScript.Echo Target
Den Benutzernamen könntest Du auch auf andere Art und Weise erhalten, aber ich würde ohnehin empfehlen, gleich den Pfad zum Profilordner mit
UserProfile = WshShell.ExpandEnvironmentStrings("%UserProfile%")
auszulesen.

Grüße
bastla
Bitte warten ..
Mitglied: Fixu
07.09.2009 um 21:09 Uhr
Hach, wenn alles so einfach wäre! Danke
Bitte warten ..
Ähnliche Inhalte
VB for Applications
gelöst VBS Ordner erstellen - wenn nicht vorhanden! (1)

Frage von freshman2017 zum Thema VB for Applications ...

Windows Server
gelöst Powershell: Alle User anzeigen, die Zugriff auf einen Share haben (3)

Frage von bensonhedges zum Thema Windows Server ...

Server
gelöst Ubuntu: ftp user erstellen und Zugriff auf Webseite geben (7)

Frage von laster zum Thema Server ...

Windows Userverwaltung
gelöst Zugriff auf PC von Domain-User, ohne sein Passwort zu kennen? (12)

Frage von Lara22 zum Thema Windows Userverwaltung ...

Neue Wissensbeiträge
Windows Update

Novemberpatches und Nadeldrucker bereiten Kopfschmerzen

(14)

Tipp von MettGurke zum Thema Windows Update ...

Windows 10

Abhilfe für Abstürze von CDPUsersvc auf Win10 1607 und 2016 1607

(7)

Tipp von DerWoWusste zum Thema Windows 10 ...

RedHat, CentOS, Fedora

Fedora 27 ist verfügbar

Information von Frank zum Thema RedHat, CentOS, Fedora ...

Heiß diskutierte Inhalte
Server
Bilder aus dem Web mit CSV runterladen (30)

Frage von Yannosch zum Thema Server ...

Server-Hardware
Bestehendes Raid erweitern um 4 gleiche Platten! (Verständnis Fragen) (12)

Frage von Hendrik2586 zum Thema Server-Hardware ...

Windows Update
WSUS 4 (Server 2012 R2) - Windows 10 Updates nicht möglich (12)

Frage von c0d3.r3d zum Thema Windows Update ...