I used kix before, but im not that experienced.. Some examples (especially the WMI stuff) are very welcome

Edit:
I found some code like:
Code:

Option Explicit
Dim objWMIService, objItem, colItems, strComputer, intPrinters

strComputer ="."
intPrinters = 1

Set objWMIService = GetObject _
("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery _
("SELECT * FROM Win32_Printer")

Call Wait() ' Goto Sub Routine at the end

' On Error Resume Next
For Each objItem In colItems
WScript.Echo "Location: " & objItem.Location & " Shared as: \\" & objItem.ShareName
intPrinters = intPrinters + 1
Next

sub Wait()
If strComputer = "." then
strComputer = "Local Host"
else strComputer = strComputer
end if

End Sub

WScript.Quit


But how can this be ported to KiX?

Edited by Sypher (2006-06-12 12:54 PM)