Home

Content

Purchase

Ready-to-use samples

Online resources

Forum

Links

Happy readers

Anonymous

login

Main topic: 64Kb barrier problem using ListAllocate, ListAddEntry and MailExpandNames functions

64Kb barrier problem using ListAllocate, ListAddEntry and MailExpandNames functions (by Andrew Luder, 06/29/2004 02:54:06 PM)

Perhaps future architecture will embrace DWORD for handles.

My work-a-round uses MailExpandNames by processing each member for the Recipient array individually and if it can't process, prompts a message to user asking for a smaller group that expands to less than 1500 members.

See code snippet below (anyway of keeping formatting?):

For w = 0 To Ubound(RecipientArray)

      Print "Checking " + RecipientArray(w)

      LAstatus = ListAllocate(0, 0, True, hList, pList,ListSize)

      If LAstatus = 0 Then

         noentries = ListGetNumEntries(plist,True)

         OSUnlockObject(hList)

         LAEstatus = ListAddEntry(hList, True,ListSize,noentries,RecipientArray(w),Len(RecipientArray(w)))

         If LAEstatus = 0 Then

            plist = OSLockObject(hList)

            MENstatus = MailExpandNames(hList,ListSize,RecipientList,OutputListSize,False,0)