System.mdw ???

[access97to2000]

Hi,
i want to add users to system.mdw file programatically from visual basic. how can i do that ?
any ideas?
i am trying to do this way.

dim mycat as new adox.catalog
strconnect - info about database.mdb and workgroup file
mycat.activeconn = stronnect
mycat.users.append username,password

its throwing an error at the last statement
any ideas please...

 

[cmmrfrds]

'- this works on my system using MDAC library 2.6 and with Access 2000.

Dim cg As New ADOX.Catalog
Set cg.ActiveConnection = CurrentProject.Connection
cg.Users.Append "sam", "abc"

Ideas.
Maybe need later version of mdac.
Maybe the connection string is not set up correctly.
Are username and password string variables.