Rachel,

I have posted a new drop (V 7.0.2383.27208) which includes few bug fixes
and a Samples\VBScript directory with couple of VBS samples. You might
want to pick this (or newer) drop and see if it works better for you.
The specific sample for GetListEntryWithFields is as follows:

>>>>>>>>>>>>>>>>>>
Dim arserver
Set arserver = CreateObject("BMC.ARSystem.Server")
arserver.Login "localhost", "Demo", "", ""
formname = "User"
qualification = "1=1"
Dim entryListFieldList
Set entryListFieldList = CreateObject("BMC.ARSystem.EntryListFieldList")
entryListFieldList.AddField 1, 50, ""
entryListFieldList.AddField 8, 50, ""
Dim entryListFieldValues
Set entryListFieldValues = arserver.GetListEntryWithFields(formName,
qualification, entryListFieldList, 0, 0)
Dim entry
For Each entry in entryListFieldValues
        entryId = entry.EntryId
        WScript.Echo "Entry : " & entryId
        Dim fieldValues
        Set fieldValues = entry.FieldValues
        For Each fieldId In fieldValues.Fields
            WScript.Echo " Field " & CLng(fieldId) & " = " &
fieldValues.Item(fieldId)
        Next
Next
<<<<<<<<<<<<<<<<<<

Regards
Appajee Papolu

_______________________________________________________________________________
UNSUBSCRIBE or access ARSlist Archives at http://www.wwrug.org

Reply via email to