Month: May 2013

Posted on: May 16, 2013 Posted by: admin Comments: 1

Logon Script depending on Windows Version

@echo off ver | find “6.1” > nul if %ERRORLEVEL% == 0 goto Win7 ver | find “5.1” > nul if %ERRORLEVEL% == 0 goto WinXP :Win7 echo Running Windows 7 Script goto exit :WinXP echo Running Windows XP Script goto exit :exit NT 5.1Windows XP XP 64-Bit Edition fr …

Posted on: May 12, 2013 Posted by: admin Comments: 0

Fileserver, Daten zwischen zwei lokalen Partitionen kopieren

Bei einem größeren SAN kann es vorkommen das LUN´s aus verschiedenen Storagesystemen zu einem dynamischen Datenträger gestückelt sind. Eine Herausforderung kann entstehen wenn eines der beteiligten Systemen offline geht. Dann ist die “Dynamic Disk” unbrauchbar 🤷🏻‍♂️ Aus diesem Grund sollte eine neue ausreichend große LUN anlegt werden und mittels robocopy …

Posted on: May 2, 2013 Posted by: admin Comments: 0

Manipulation des Attributes terminalserverprofilepath mittels VBS

In diesem Skript geht es um das Manipulieren des “terminalserverprofilepath” bei einer unbestimmten Anzahl von Benutzern durch das Einlesen einer Textdatei. Inhalt der  Datei: z.B.: phalbdel,\\server$\Userdata\phalbdel Set objFileToRead = CreateObject(“Scripting.FileSystemObject”).OpenTextFile(“C:dateiname.txt”,1) Dim strLine,mystring,user,path,stringsplit do while not objFileToRead.AtEndOfStream mystring = objFileToRead.ReadLine() stringsplit= Split(mystring,”,”,-1, 1) user = stringsplit(0) path = stringsplit(1) Set objUser …

Posted on: May 2, 2013 Posted by: admin Comments: 0

Auslesen des Attributes terminalserverprofilepath mittels VBS

über den Aufruf cscrip dateiname.vbs > datei.txt wird die Ausgabe in eine Textdatei umgelenkt.  Nun kann man diese manipulieren und wieder in das Active Directory schreiben. In diesem Skript geht es um das Auslesen des Attribut “terminalserverprofilepath” Option Explicit Dim objCommand, objConnection, strBase, strFilter, strAttributes, objUser Dim strQuery, objRecordset, strdistinguishedName, strTSPath, …