Here you go.. Converted code (untested).



$strComputer = "."
$objWMIService = GetObject("winmgmts:\\" + $strComputer + "\root\cimv2")
$colItems = $objWMIService.ExecQuery("Select * from Win32_PrintJob",,48)
For Each $objItem in $colItems
    ?"Caption: " + $objItem.Caption
    ?"DataType: " + $objItem.DataType
    ?"Description: " + $objItem.Description
    ?"Document: " + $objItem.Document
    ?"DriverName: " + $objItem.DriverName
    ?"ElapsedTime: " + $objItem.ElapsedTime
    ?"HostPrintQueue: " + $objItem.HostPrintQueue
    ?"InstallDate: " + $objItem.InstallDate
    ?"JobId: " + $objItem.JobId
    ?"JobStatus: " + $objItem.JobStatus
    ?"Name: " + $objItem.Name
    ?"Notify: " + $objItem.Notify
    ?"Owner: " + $objItem.Owner
    ?"PagesPrinted: " + $objItem.PagesPrinted
    ?"Parameters: " + $objItem.Parameters
    ?"PrintProcessor: " + $objItem.PrintProcessor
    ?"Priority: " + $objItem.Priority
    ?"Size: " + $objItem.Size
    ?"StartTime: " + $objItem.StartTime
    ?"Status: " + $objItem.Status
    ?"StatusMask: " + $objItem.StatusMask
    ?"TimeSubmitted: " + $objItem.TimeSubmitted
    ?"TotalPages: " + $objItem.TotalPages
    ?"UntilTime: " + $objItem.UntilTime
Next



HTH,

Kent
_________________________
Utilize these resources:
UDFs (Full List)
KiXtart FAQ & How to's