Microsoft Access is een database- applicatie die u toelaat om rapporten en formulieren die interactie met de database tabellen te verdelen . Beheerders sla het bestand op een gedeelde map locatie en gebruikers kunnen inloggen op de database van overal op het netwerk . Microsoft biedt een script dat je kunt gebruiken om de lijst met gebruikers ingelogd zijn om de database te bekijken . Dit script moet in de databank worden ingevoerd en beheerd door de database administrator . Instructies
1 Dubbelklik op het MDB-bestand . Microsoft Access belastingen en de database automatisch wordt geopend . Voer uw beheerder gebruikersnaam en wachtwoord , als u eerder een wachtwoord beveiligd het bestand . Kopen van 2 Klik op de tab " Hulpmiddelen voor databases " . Klik op de knop "Invoegen" en selecteer " Module " uit het pop - up menu. Een nieuw venster wordt geopend waarin u de Microsoft- script in te voeren
Kopieer 3 en plak het volgende script aan het geopende venster : . Sub ShowUserRosterMultipleUsers
( ) op Dim con As New ADODB.Connection
Dim platen als Nieuwe ADODB.Recordset
Dim i , j As Long Set
con = CurrentProject.Connection
Stel platen = con.OpenSchema ( adSchemaProviderSpecific , , " { 947bb102 - 5d43 - 11d1 - bdbf - 00c04fb92675 } " ) Debug.Print records.Fields
( 0 ) . Naam , " " , records.Fields ( 1 ) . Naam , " " , records.Fields ( 2 ) . Naam , records.Fields ( 3 ) . Naam
Terwijl Niet records.EOF Debug.Print records.Fields
( 0 ) , records.Fields ( 1 ) , records.Fields ( 2 ) , records.Fields ( 3 ) records.MoveNext
Wend
End Sub
< br > 4 Klik op de knop "Opslaan" . In het pop - up dialoogvenster waarin u wordt gevraagd om een naam , typ " ShowUsers " en klik op "OK . " Het dialoogvenster wordt gesloten .
Druk op "Ctrl + G " 5 op een Access-venster commando te openen . Type " ShowUserRosterMultipleUsers " en druk op " Enter ". Het script wordt uitgevoerd en toont u de gebruikers aangemeld bij de database .
|
