Recent content by dm4ever

Have you tried? (\d*\.\d*\.\d*\.\d*:\d+)$ -------------------------------------------------------------------------------- dm4ever My philosophy: K.I.S.S - Keep It Simple Stupid

This worked just fine for me Option Explicit Main() Sub Main() Const HKLM = &H80000002 Const HKCU = &H80000001 Const HKUS = &H80000003 Dim strComputer : strComputer = "xxxx" Dim objReg : Set objReg = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv") Dim...

The only thing I could find close to this was an AutoIT script that basically moved the mouse to the sys tray location to get rid of any orphaned icons. -------------------------------------------------------------------------------- dm4ever My philosophy: K.I.S.S - Keep It Simple Stupid

When you hover over these stale icons...do they disappear? If so, I've seen a AutoIt script that moves the mouse automatically through the tray area making the icons "disappear" -------------------------------------------------------------------------------- dm4ever My philosophy: K.I.S.S -...

You might have to do something similar to what is discussed here: http://technet.microsoft.com/en-us/library/bb456991.aspx create a compatibility db and send that out to your client machines and register it --------------------------------------------------------------------------------...

Dim RegEx : Set RegEx = New RegExp RegEx.Pattern = "^\d+$" Dim strInput : strInput = InputBox("Enter a number", "Enter Number", "0") If RegEx.Test(strInput) Then WScript.Echo "you entered a number" Else WScript.Echo "you didn't enter a number" End If...

How about a regular expression then... pattern if you only expect whole numbers: ^\d+$ -------------------------------------------------------------------------------- dm4ever My philosophy: K.I.S.S - Keep It Simple Stupid

Use the IsNumeric function to only proceed if a number is entered. -------------------------------------------------------------------------------- dm4ever My philosophy: K.I.S.S - Keep It Simple Stupid

That is interesting...if I do a TypeName for the value it shows as currency so I think guitarzan assumptions may be correct. Create a Schema.ini file in the same place as your CSV file and put this as the content: [bad.csv] Format=CSVDelimited Col1=FILELOCATION TEXT Col2=FILENAME TEXT...

Use the creation date property of Win32_Process to help you close the newest processes. -------------------------------------------------------------------------------- dm4ever My philosophy: K.I.S.S - Keep It Simple Stupid

WMI will only show you those applications installed via an MSI so if you need something to perform an uninstall of applications installed with a different installer you will need to have you script/app look in the registry and pull out the pertinent information...

The dictionary defines what printers you want to be present after your script has executed...you still need to enumerate your currently mapped printers to see what is already there...by using the dictionaries Remove method we modify the content of the dictionary to only contain those printers...

This pattern may be better suited for paths with sub folders: "([A-Z]+:.+?\\(\w+)\s(\w+)\s(\w+)\s(\w+)\.\w+)" -------------------------------------------------------------------------------- dm4ever My philosophy: K.I.S.S - Keep It Simple Stupid

Just a thought...an the regular expression can probably be simplified (not an expert with it) Option Explicit Main() Sub Main() Dim RegEx : Set RegEx = New RegExp RegEx.Pattern = "([A-Z]+:\\(\w+)\s(\w+)\s(\w+)\s(\w+)\.\w+)" RegEx.IgnoreCase = True Dim strTemp : strTemp = "E:\F2MA...

Look at the example I posted about half way down in this thread: http://www.tek-tips.com/viewthread.cfm?qid=1383515&page=1 -------------------------------------------------------------------------------- dm4ever My philosophy: K.I.S.S - Keep It Simple Stupid