Alle Beiträge von Don Matteo

lebt in der Schweiz, ist System Engineer MCP bei A-Enterprise GmbH. Mitglied des UNBLOG Knowledge Network. Author und Blogger zu den Themen, Tutorials für Linux und Open Source.

Verknüpfung erstellen mit VBScript

Visual Basic Script VBScript Verknüpfungen auf Desktop erstellen

VBScript create-shortcut.vbs erstellt eine Verknüpfung

VBScript können überall dort eingesetzt werden, wo automatisierte Aufgaben erforderlich sind. Die Anwendung von Batchdateien ist nicht immer das geeignete Mittel, und der Einsatz von Gruppenrichtlinien steht nicht überall zur Verfügung, hier kann ein Visual Basic Script diese Aufgabe übernehmen, beispielsweise um Verknüpfungen für Benutzer bereitzustellen, wodurch komplexe Aufrufe von Anwendungen auf einfache Weise ermöglicht wird.

Das folgende VBScript erstellt eine Verküpfung (shortcut) auf dem Desktop, hier zum Beispiel für den Windows Calculator.

Die VBScript Zeilen durch  Copy Paste in Notepad einfügen und als Datei create-shortcut.vbs speichern, und mit einem Doppelklick die Verknüpfung erstellen.
' VBScript to created shortcut
Const strProgramTitle = "Shortcut to Calculator"
Const strProgram = "%SystemRoot%\System32\calc.exe"
Const strWorkDir = "%USERPROFILE%"
Dim objShortcut, objShell
Set objShell = WScript.CreateObject ("Wscript.Shell")
strLPath = objShell.SpecialFolders ("Desktop")
Set objShortcut = objShell.CreateShortcut (strLPath & "\" & strProgramTitle & ".lnk")
objShortcut.TargetPath = strProgram
objShortcut.WorkingDirectory = strWorkDir
objShortcut.Description = strProgramTitle
objShortcut.Save
WScript.Quit

  Zu guter letzt, die Const Zeilen im Script können editiert werden, für beliebige weitere Anwendungen.

Die erstellte Verknüpfung nun ausführen

Die auf dem Desktop erstellte Verknüpfung nun ausführen um den Windows Calculator zu öffnen.

C:\> cscript //Nologo //B create-shortcut.vbs

Aus der Eingabeaufforderung oder aus einer Batch kann dieses VBScript mit cscript gestartet werden.

Nutzung von VBScript

Als Systemkomponente aller aktuellen Windows-Versionen wird VBScript von Microsoft nach wie vor unterstützt. Die Sprache selbst wird jedoch seit Längerem nicht mehr weiterentwickelt. Daher wird sie manchmal als „tote Sprache“ angesehen. Zudem bietet Microsoft diverse Nachfolgeprodukte und favorisiert deren Einsatz. Dies zeigt sich auch daran, dass Microsofts WSH-bezogene Webseiten verschwinden. Durch die vergleichsweise hohe Akzeptanz der alten Produkte und die große Verbreitung darauf basierender Lösungen werden diese jedoch noch geraume Zeit in Koexistenz verbringen.

Windows Scripting Host und VBScript unterstützen eine modulare Programmierung und sind daher durchaus für größere Projekte geeignet. Es existieren auch einige nützliche Entwicklungswerkzeuge, ihre Anzahl ist allerdings überschaubar. An erster Stelle sind Editoren zu nennen, die Quelltexte gemäß der VBS-Syntax mit farblichen Hervorhebungen darstellen können. Solche Programme werden zum Teil kostenlos angeboten (z. B. Notepad++). Auch von Microsoft wurden ein spezieller Script Editor sowie ein Script Debugger zur Unterstützung der Fehlersuche herausgegeben, wobei es sich um eher einfache Tools handelt.

Netzlaufwerk mapping aus PowerShell Script

Windows Netzlaufwerk verbinden mit PowerShell

PowerShell Scripts können genutzt werden um Netzlaufwerke zu Windows-Netzwerkfreigaben auf Server oder NAS Geräte zu erstellen. Dort wo die Batchverarbeitung nicht die geeignete Wahl ist, oder aber Gruppenrichtlinien nicht möglich sind, kann ein PowerShell Script diese Aufgabe erfüllen, beispielsweise bei der Ausführung von Login Scripts bei Remote Clients über VPN, oder Clients diese nicht Mitglied der AD Domäne sind.

PowerShell für Netzlaufwerk Mapping

Das PowerShell Script-Beispiel netdrive.ps1 erstellt die Windows-Netzwerkfreigabe zum Netzlaufwerk Z: für den Benutzer, dabei kann die Anmeldung als ein anderer Benutzer erfolgen, als mit dem man am Client authentifiziert ist.

$LogFile = "netdrive.log"
Get-Date -Format "dd/MM/yyyy HH:mm" | Out-File $LogFile -Force
Write-Host "`nGeben Sie Ihre Anmeldeinformationen ein, um Netzlaufwerke zuzuordnen oder um abzubrechen." -ForegroundColor Yellow
$Cred = Get-Credential -Message "Bitte geben Sie Ihre Anmeldeinformationen ein" -UserName "domain\username"
if ($Cred) {
    $sharePath = "\\server\share"
    $mapDrive = "Z"
    Write-Host "`nMapping network share.." -ForegroundColor White
    Add-Content $LogFile -Value "Mapping drive $mapDrive $sharePath"
    New-PSDrive -Name $mapDrive -Root $sharePath -Persist -Scope Global -PSProvider "FileSystem" -Credential $Cred | Out-File $LogFile -Append
} else {
    Add-Content $LogFile -Value "Es wurden keine Anmeldeinformationen angegeben, Netzlaufwerke werden nicht zugeordnet."
}

Die entsprechende Windows-Netzwerkfreigabe wird in Zeile 6 bei $sharePath definiert, das Laufwerk wird in Zeile 7 bei $mapDrive zugewiesen, in dem der jeweilige Platzhalter zwischen den Anführungs- und Schlusszeichen angepasst wird. Sollen weitere Netzlaufwerke erstellt werden, kann in der if Anweisung die Zeilen 6 – 10 für das nächste Netzlaufwerk kopiert werden, dabei die Variablen zu $sharePath1 und $mapDrive1 benennen.

Nach einfügen der Code Zeilen in eine Datei netdrive.ps1, zum Verzeichnis wechseln in diesem das Script sich befindet und es ausführen.

.\netdrive.ps1

Die Platzhalter domain\username durch die entsprechende Domäne und Benutzer ersetzen, ohne Domäne einfach leer lassen.

Windows-PowerShell Anmeldeinformationen

PowerShell Script aus Batch ausführen

Wird bereits eine Batchdatei zB. netlogon.bat eingesetzt, kann netdrive.ps1 aus der Batchdatei wie folgt ausgeführt werden:

start /wait "" powershell.exe -NoLogo -NoProfile -ExecutionPolicy Bypass -File netdrive.ps1

Nach erfolgreicher Anmeldung wird das Netzlaufwerk zur Windows-Netzwerkfreigabe erstellt. Zur Kontrolle wird die Laufwerkszuordnung in der Logdatei netdrive.log protokolliert.