Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Windows XP SP1, User unter VB in MS Access 2002 ermitteln

Mitglied: Turbothomas

Turbothomas (Level 1) - Jetzt verbinden

17.06.2005, aktualisiert 18.06.2005, 9840 Aufrufe, 2 Kommentare

Hallo zusammen, ich bin neu hier und habe mit der Suchfunktion und mit Stöbern in den Foren nichts zu meiner Frage gefunden.

Im Büro im täglichen Arbeitsleben nutze ich MS-Access 2002. Die Datenbank-Anwendung die ich geschrieben habe, verzichtet auf die Nutzerverwaltung der Datenbank (ich begreife nicht wie das funktioniert).
Stattdessen wird ein Anmeldeformular geöffnet, indem der User seine Arbeitspaltzbezeichnung auswählen kann. Passwortabfrage erfolgt keine.
Anhand der ausgewählten Arbeitsplatzbezeichnung erfolgt auf dem Hauptformular die Sichtbarmachung verschiedener Schaltflächen zur Nutzung der Anwendung über Programmcode in dem Hauptformular.

Nachdem der Userkreis immer größer wird und ich den Anwendern größeren Komfort geben möchte, suche ich ein Routine, die als Programm in Access läuft.

Die Routine soll folgendes tun:
Beim Start der MS-Access-Datei mit Doppelklick schaut die Routine nach welcher XP-User sich am PC angemeldet hat und übergibt den Wert in die Tabelle erf-Dat.

Hat jemand eine Idee wie das geht?

Hinweis:
Es wird der englischsprache VB verwendet und es kann nicht hinzugefügt werden an dll, oder sonstiger Software

Grüßle

Thomas
Mitglied: 7036
17.06.2005 um 10:42 Uhr
Tach Turbothomas,

also am Besten Du schaust dir mal folgende Links an...

Angemeldeten Benutzernamen ermitteln:
http://www.vbarchiv.net/archiv/tipp_details.php?pid=27

und

Angemeldete Benutzer ermitteln (ADO)
http://www.vbarchiv.net/archiv/tipp_details.php?pid=581


Funktioniert beides wunderbar in Access und in VB...


Gruß Siggi
Bitte warten ..
Mitglied: Turbothomas
18.06.2005 um 06:57 Uhr
Hallo Siggi Danke für die Tipps bin später am gestrigen Tag noch woanders fündig geworden:

Dim testobjekt, testobjekt_1 As Object
Dim anwender, rechner, haus As String

Sub user_ermitteln()

Set testobjekt = CreateObject("WScript.Network")

MsgBox "Im Moment ist der User " & testobjekt.Username & " angemeldet.", , "Angemeldeter User"

Set testobjekt_1 = CreateObject("WScript.Network")
anwender = testobjekt.Username
rechner = testobjekt.ComputerName
haus = testobjekt.Userdomain
MsgBox "Im Moment ist der PC" & rechner & " der Domäne " & haus & " mit dem User " & anwender & " angemeldet.", , "Angemeldeter User"



End Sub

und schon ist alles griffbereit.

Trotzdem Danke.

Grüßle Thomas
Bitte warten ..
Ähnliche Inhalte
Windows XP
WPA2 unter Windows XP SP1 nutzen?
gelöst Frage von bestelittWindows XP10 Kommentare

Hallo zusammen, ich habe Windows XP Home Edition SP1 auf meinem Rechner und einen WPA2 fähigen WLAN USB Stick. ...

Windows XP

SP3 für Windows XP Embedded Version 2002

Frage von Michael-24Windows XP4 Kommentare

Hallo Gemeinde, ich bräuchte für Windows XP Embedded Version 2002 das Servicepack 3 zum download? Hat jemand von euch ...

Datenbanken

Hilfe in MS Access

Frage von endadaDatenbanken2 Kommentare

Hey alle zusammen, ich habe folgendes Problem: Ich versuche eine Datenbank mit Access zu erstellen, die wie im Screenshot ...

Datenbanken

MS Access Datenbank

gelöst Frage von endadaDatenbanken18 Kommentare

Hey alle zusammen, ich habe folgendes Problem: Ich versuche eine Datenbank mit Access zu erstellen, die wie im Screenshot ...

Neue Wissensbeiträge
Utilities
Teamviewer 14 Verbindungsprobleme mit Proxy
Tipp von PeterleB vor 12 StundenUtilities

Nach dem Umstieg von Version 13 auf 14 wollte sich TV nicht mehr mit dem Netz verbinden, ignorierte offenbar ...

Administrator.de Feedback
Unsere Datenbank wurde umgestellt
Information von Frank vor 15 StundenAdministrator.de Feedback5 Kommentare

Hallo User, ich habe in der Nacht unsere Datenbank umgestellt. D.h. neue Version (MySQL 8) und andere Örtlichkeit. Sollte ...

Sonstige Systeme
Es war einmal ein BeOS - Wer erinnert sich noch?
Information von BassFishFox vor 3 TagenSonstige Systeme6 Kommentare

Hallo, Bin gerade ueber Haiku gestolpert, von dessen Existenz als "Nachfolger des BeOS" ich wusste nur mich nie wirklich ...

Datenschutz

Microsoft und DSGVO - ob das wohl jemals klappt (Probleme beim Datenabfluss für Office Pro Plus)?

Tipp von VGem-e vor 3 TagenDatenschutz5 Kommentare

Servus Kollegen, siehe Aber wer setzt schon MS Office Pro Plus ein? Wie dann der Stand beim "normalen" MS ...

Heiß diskutierte Inhalte
Windows 10
Programm unter Windows 10 automatisch mit administrativen Rechten starten
Frage von GrafmulderWindows 1018 Kommentare

Hallo zusammen! Zur Situation: Ich benutze Windows 10 Pro für Workstations (Build 1803) mit zwei Konten. Einem Administratorkonto und ...

LAN, WAN, Wireless
Empfehlung Powerline Adapter
Frage von AgilolfingerLAN, WAN, Wireless16 Kommentare

Hallo Zusammen, ich brauche eine Empfehlung von euch. Ich möchte in einem privaten Haushalt eine Powerline Lösung einrichten. Allerdings ...

Vmware
Gebrauchten ESXi- Server verkaufen: Festplatten DSGVO-konform löschen?
Frage von l.scheperVmware12 Kommentare

Hallo, wir möchten einen gebrauchten FUJITSU Server verkaufen. Auf dieser Maschine ist noch ein installiertes ESXi 5.1 und ne ...

Netzwerke
Server: Sporadische Netzwerk-Aussetzer
Frage von ennveeNetzwerke9 Kommentare

Liebe Community, in einer Konfiguration mit einem Windows 2016-Server (s.u.) und 8 Clients beobachten wir unregelmäßige kurze Aussetzer - ...