Create Resource in GW

Question

So.. I can create users and distribution lists but resources are resisting me.
Has anyone got resources.add to work in VB.Net?
I'm receiving "an invalid argument was passed to the function call." and I'm just at a loss at what else to try. I've reviewed the example application and I'm not too far from it except for the vb version difference. I'm coping the distinguished name verbatim..
objResource = objResources.Add("TestResource","TestResource.GW.0 .CHP", objUser)
objUser is a AdminTypeLibrary.User, and I verified that the objects set and usable.. No duplicate entries... I've tried the optional bits with objects and strings but no help... All i can guess now is that GWResourceID is something different..
Anyone have ideas?

Answer 1

Your abruptness of response made me not read your latest response
either. Dude there are TWO examples of code in my original response. One
works and one doesn't
This one works for me with CSCRIPT test.vbs
>
> My code follows
>
> dim objAdminSystem
> set objAdminSystem = CreateObject("NovellGroupWareAdmin")
> dim objDomain
> setobjDomain = objAdminSystem.Connect("c:\pri")
> dim objResources
> set objResources = objAdminSystem.Resources
> dim objUsers
> set objUsers =objAdminSystem.Users
> dim objUser
> set objUser= objUsers.Item("jallchin","po","primary")
> Wscript.echo(objUser.DistinguishedName)
> dim objResource
> set objResource=objResources.Add("testResName",
>
> "turniphead.beginfinite",objUser)
Michael Bell wrote:
> Until I added the extra arguments I got the same error message you did.
> When I added them all was perfect. Did you try my code?
>
> I did miss your line performing a similar function. Sorry. You posted a
> very hard to read output. I posted my response the way I did because I
> was attempting to be pedagical - to allow you to think about the issue
> before giving the answer (which I did)
>
> However I note a crucial set of distinctions:
>
> 1. I passed STRINGS as the po and domain, you are passing the main objects.
> 2. You pass an empty string for the name of the resource, I pass
> testresname.
>
> My code follows
>
> dim objAdminSystem
> set objAdminSystem = CreateObject("NovellGroupWareAdmin")
> dim objDomain
> setobjDomain = objAdminSystem.Connect("c:\pri")
> dim objResources
> set objResources = objAdminSystem.Resources
> dim objUsers
> set objUsers =objAdminSystem.Users
> dim objUser
> set objUser= objUsers.Item("jallchin","po","primary")
> Wscript.echo(objUser.DistinguishedName)
> dim objResource
> set objResource=objResources.Add("testResName",
>
> "turniphead.beginfinite",objUser)
>
>
>
>
> mimason wrote:
>> Well, thanks for the **** sure attitude. I'm afraid you either couldn't
>> read my posted code, didn't read it, or just couldn't understand it.
>> Obviously the following line doesn't mention Post office or domain. Or
>> does it?
>> Code:
>> --------------------
>> objResource = objResources.Add("", "test" &
>> objUser.DistinguishedName, objUser, "zzz", objPO, objDom)
>> --------------------
>>
>> In any event, sending a string or a object caused the same error.
>> You're simple lill vb script returns *gasp* the same error.
>> and I re-quote...
>> "An invalid argument was passed in the function call."
>> If you where to forget something the error would be:
>> "Wrong number of arguments or invalid property assignment"
>>
>> By the way, if you read that same document I did, you'd recognize that
>> post office and domain where OPTIONAL (signified by them square
>> brackets)... Just a GroupWise lesson here... You don't get a choice
>> what post office the resource goes to because it'll be going to the same
>> post office as the user provided, it just saves the API code from
>> figuring it out for you.
>>
>>
>> I will thank you for nailing the coffin shut on getting good support
>> off this forum. It's becoming apparent that there are too many ****
>> sure tolls trying to get their rocks off here.
>> Politeness... I guess you put it best...
>>> did you reallly try?
>>
>> -Mike
>>
>>
>> +----------------------------------------------------------------------+
>> |Filename: untitled.JPG |
>> |Download: http://forums.novell.com/attachment....achmentid=2881 |
>> +----------------------------------------------------------------------+
>>