I've got a VBscript that may perform this function, but I don't know how to rewrite it. What would the following look like in Kixtart?

code:
   
Set objWshNetwork = WScript.CreateObject("WScript.Network")
Set objWshShell = WScript.CreateObject("WScript.Shell")
set objADSysInfo = CreateObject("ADSystemInfo")
strComputerName = objWshNetwork.ComputerName
strComputerDN = objADSysInfo.computername

set objGroup = GetObject("LDAP://CN=GroupName,OU=GroupOU,DC=Domain,DC=com")

If objGroup.IsMember("LDAP://" & strComputerDN) Then
   WshShell.run "rundll32 printui.dll,PrintUIEntry /ga /c \\" & strComputerName & " /n <\\printserver\sharedprintername>" 
End If
Thanks!
Jason