Nach Ordnungsbegriffen durchsuchen

verschiedene Unterordner abfragen und inhalte löschen

Hallo erstmal Ich wurde vor folgende aufgabe gestellt: Ich soll in einem Übungsnetzwerk (ca 100 user) nach einer Übung die Homelaufwerke(also d:\home\%username%) der User auf einen einheitlichen Stand bringen und alle anderen Dateien und Unterordner löschen. Aber auch einen Ordner auzuschließen sollte...

Erstellt in VB Script (Forum) von Morgenstern am 06-08-2010
XML Datei auslesen

Hallo zusammen, ich versuch mich geradeam Auslesen einer XML-Datei und komm nicht so ganz weiter. Hier erstmal ein Beispiel zum aufbau der Datei: <?xml version="1.0" encoding="UTF-7"?> <Ofen> <Name>Ofen1</Name> <Zonen>15</Zonen> <MaxTemp>1350<...

Erstellt in VB Script (Forum) von E.Burg am 05-19-2010
VB Sript zum import einer .CSV in öffentliche Ordner (Exchange 2007)

Hallo VB-Gemeinde, es soll in regelmäßigen Abständen ein automatischer Import von Adressdaten in die Öffentlichen Ordner (Public Folders) im Exchange 2007 geschaffen werden. Die Adressdaten stehen in Form einer CSV-Datei zur Verfügung. Nun würde ich gerne mit Hilfe eines Scripts (am besten VBS) den Import...

Erstellt in VB Script (Forum) von saltfm am 05-07-2010
AW: Druckermenü Anzeigen

Ich habe einen anderen Ansatz gefunden, die vorhandenen Drucker auszulesen: const HKEY_LOCAL_MACHINE = &h80000002 const PRINTER = "SOFTWARE\Microsoft\Windows NT\CurrentVersion\Print\Printers\" Set WshShell = WScript.CreateObject("WScript.Shell") Set objWmi = GetObject("winmgmts...

Erstellt in VB Script (Forum) von Mecki am 04-29-2010
Dateiauswahl per VBS

Bisher (einschließlich WINDOWS XP) sah eine Dateiauswahl bei mir z.B. so aus: ExcelDatei = BrowseForFile("C:\", "Excel-Dateien (*.xls)|*.xls") Function BrowseForFile(pstrPath, pstrFilter) Set objDialog = CreateObject("UserAccounts.CommonDialog") objDialog.Filter = pstrFilter...

Erstellt in VB Script (Forum) von Mecki am 04-22-2010
AW: Feldfunktion per vbs in Word einfügen

Jetzt habe ich auch herausbekommen wie man bei der Autonummerierung arabische Ziffern erzwingen und vor allem den Punkt hinter der Nummerierung vermeiden kann: "AUTONUM" ersetzen durch "AUTONUM \* Arabic\s "" """

Erstellt in VB Script (Forum) von Mecki am 04-03-2010
AW: Feldfunktion per vbs in Word einfügen

Vielen Dank für die prompte Antwort. Es funktioniert prima und ich habe auch das Prinzip verstanden. Gruß, Mecki

Erstellt in VB Script (Forum) von Mecki am 04-01-2010
AW: Feldfunktion per vbs in Word einfügen

So geht's: Du kannst in VBS keine wdxxxxx - Konstanten verwenden, ebenso keine Parameternamen wie Range:= sondern es kommt auf die Reihenfolge der Parameter an. Const wdFieldEmpty = -1 Set wrd = CreateObject("Word.Application") With wrd .Documents.Add () .Selection.InlineShapes.AddPicture...

Erstellt in VB Script (Forum) von Peter_Punkt am 03-31-2010
Feldfunktion per vbs in Word einfügen

Ich übertrage per vbs Bilder nach Word und möchte anschließend diese über die Feldfunktion {AUTONUM} nummerieren. Das Skript sieht etwa so aus: set word = CreateObject("Word.Application") with word .Documents.Add () .Selection.InlineShapes.AddPicture "D:\Eigene Dateien\Eigene Bilder\2010_03...

Erstellt in VB Script (Forum) von Mecki am 03-31-2010
Textfile editieren

Hallo zusammen Ich möchte ein Teil einer Text Zeile ersetzen mein Code sieht bis jetzt so aus. Set WshShell = WScript.CreateObject("WScript.Shell") StrMac = WshShell.ExpandEnvironmentStrings("%mac%") strFilename = "C:\MWDEV_Client.txt" Set objFSO = CreateObject("Scripting...

Erstellt in VB Script (Forum) von Herbert Mueller am 03-01-2010

Seite 1 von 4 (36 Treffer) 1 2 3 4 > Weiter