How can I find all the MS Access security groups in VBA -


how can find list of ms access security groups in application through vba?

i know can going tools->security->user , group accounts, i'd through vba (i'd automate of user creation routine).

i've considered adding dummy user assigned groups , pulling groups assigned user, there must cleaner way this.

found it!

dim curr_group group dim group_cnt long dim group_ndx long  dim strgroup string dim strgrouplist string      strgrouplist = ""     group_cnt = dbengine(0).groups.count     group_ndx = 0 group_cnt - 1         set curr_group = dbengine(0).groups(group_ndx)         strgroup = curr_group.name         if strgrouplist = ""             strgrouplist = strgroup         else             strgrouplist = strgrouplist & ";" & strgroup         end if     next group_ndx     me.lbxsysgroups.rowsource = strgrouplist 

Comments

Popular posts from this blog

Add email recipient to all new Trac tickets -

400 Bad Request on Apache/PHP AddHandler wrapper -

php - Change action and image src url's with jQuery -