Get list of users in an MS-Access MDB

Using Office 2003 and Windows XP;

1) Is it possible to obtain the network user name of each user currently in
an MS-Access file using a .vbs file?

2) If possible, could someone please post example script to accomplish this?

Thanks much in advance.

ekkehard
Fri Apr 06 02:06:27 CDT 2007

Alexander Mueller schrieb:
> 05.04.2007 21:12, XP schrieb:
>> Using Office 2003 and Windows XP;
>>
>> 1) Is it possible to obtain the network user name of each user currently in
>> an MS-Access file using a .vbs file?
>>
>> 2) If possible, could someone please post example script to accomplish this?
>>
>> Thanks much in advance.
>
> google for Jet UserRoaster
>
> MfG,
> Alex
A kind of "thank you" for the valuable reference: *UserRoster* in
VBScript:

Dim sCS : sCS = _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\temp\nordwind1.mdb"
Dim oCNCT01 : Set oCNCT01 = CreateObject( "ADODB.Connection" )
Dim oCNCT02 : Set oCNCT02 = CreateObject( "ADODB.Connection" )

oCNCT01.Open sCS
oCNCT02.Open sCS

Const adSchemaProviderSpecific = -1 ' FFFFFFFF
Const sSchemaGUID = "{947bb102-5d43-11d1-bdbf-00c04fb92675}"
Dim oRS
Set oRS = oCNCT01.OpenSchema( adSchemaProviderSpecific, , sSchemaGUID )

WScript.Echo oRS.Fields(0).Name, oRS.Fields(1).Name, oRS.Fields(2).Name, oRS.Fields(3).Name

Do While Not oRS.EOF
WScript.Echo oRS.Fields(0).Value, oRS.Fields(1).Value, oRS.Fields(2).Value,
oRS.Fields(3).Value
oRS.MoveNext
Loop

oRS.Close
oCNCT02.Close
oCNCT01.Close

Joe
Fri Apr 06 02:03:49 CDT 2007

"Alexander Mueller" <millerax@hotmail.com> wrote in message
news:4615c66d$0$6440$9b4e6d93@newsspool2.arcor-online.net...
> 05.04.2007 21:12, XP schrieb:
>> Using Office 2003 and Windows XP;
>>
>> 1) Is it possible to obtain the network user name of each user currently
>> in
>> an MS-Access file using a .vbs file?
>>
>> 2) If possible, could someone please post example script to accomplish
>> this?
>>
>> Thanks much in advance.
>
> google for Jet UserRoaster
>
> MfG,
> Alex

I think you mean UserRoster although I'm sure UserRoaster would come in
handy at times :)


--

Joe Fawcett (MVP - XML)
http://joe.fawcett.name

ekkehard
Fri Apr 06 02:09:55 CDT 2007

Joe Fawcett schrieb:
> "Alexander Mueller" <millerax@hotmail.com> wrote in message=20
> news:4615c66d$0$6440$9b4e6d93@newsspool2.arcor-online.net...
>> 05.04.2007 21:12, XP schrieb:
>>> Using Office 2003 and Windows XP;
>>>
>>> 1) Is it possible to obtain the network user name of each user curren=
tly=20
>>> in
>>> an MS-Access file using a .vbs file?
>>>
>>> 2) If possible, could someone please post example script to accomplis=
h=20
>>> this?
>>>
>>> Thanks much in advance.
>> google for Jet UserRoaster
>>
>> MfG,
>> Alex
>=20
> I think you mean UserRoster although I'm sure UserRoaster would come in=
=20
> handy at times :)
>=20
>=20
Quote from

http://support.microsoft.com/kb/198755/de

Mit Microsoft Jet UserRoaster in Access 2000 pr=FCfen, wer an
Datenbank angemeldet ist.