Getting a Dispatch Pointer message -

USING:

WMIQUERY()
LOGGER()
UDFs

Code:

CLS

BREAK ON

Dim $Container

Dim $ContainerName

Dim $Computer

$ContainerName = "domain"

$Container = GetObject("WinNT://" + $ContainerName)

$Container.Filter = "Computer"

For Each $Computer in $Container

IF LEFT($Computer.Name,4)='ABC0'

IF RIGHT($Computer.Name,4)>1300

$state = WMIQuery("SerialNumber","Win32_BaseBoard",CHR(34)+$Computer.Name+CHR(34))

?$COMPUTER

?$STATE

;$logfile='H:\compstatus.csv'

;$logdata=$Computer + ',' $state + @CRLF

;LOGGER($logfile,$logdata)

ENDIF

ENDIF

Next

GET $K


Thanks,

Kent


Edited by kdyer (2004-02-05 01:36 AM)
_________________________
Utilize these resources:
UDFs (Full List)
KiXtart FAQ & How to's