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

gelöst Möchte ein Button zum Abmelden des Nutzers über VBP

Mitglied: Raven383

Raven383 (Level 1) - Jetzt verbinden

13.02.2007, aktualisiert 15.02.2007, 3933 Aufrufe, 4 Kommentare

*.vbp datei mit VB 6.0
Win 2K

Moin , Moin

Ich habe eine Datei erstellt mit Visual Basic 6.0 wo beim anmelden des PC die 10 Regeln zur IT sicherheit aufgehen und nun möchte ich einen Akzeptieren Button und einen Nicht Akzeptieren Button reinmachen.
Den ersten habe ich schon wo er dann das Fenster mit den Regen schließt aber jetz möchte ich wenn der Nutzer auf nicht akzeptieren klickt das er wieder abgemeldet wird. geht das ??

Hi hi und wenn möglich eine Möglichkeit den Rechnernamen noch mit in das Fenster der Regeln zu integrieren also das Fenster würde ich hin bekommen aber der Befehl das er mir den Rechnernamen reinschreibt kenn ich nicht.
Habe erst heute angefangen (so marke eigenbau - und selbststudium) mit Visual Basic 6.0.

Danke schon mal im Vorraus.
Martin
Mitglied: 22010
13.02.2007 um 16:47 Uhr
Also das Computernamen-Problem:

>SystemInformation.ComputerName.ToString

Wie sieht das Fenster genau aus???

---Edit---

Der Logoff Befehl:

Public Class Form1

Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Private Const EWX_FORCE = 4
Private Const EWX_LOGOFF = 0
Private Const EWX_REBOOT = 2
Private Const EWX_SHUTDOWN = 1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ExitWindowsEx(EWX_LOGOFF, 0)
End Sub

End Class
Bitte warten ..
Mitglied: Raven383
14.02.2007 um 08:37 Uhr
Erstmal dickes Danke,

Fenster:
Große Form und dann mehrere Labels wo ich den Text drin habe und unten Rechts jetz die zwei buttons.
Aber über nacht fiehl mir ein das ich ja dann den Befehl zur ausgabe auch mit in die große Form machen muß, damit er den Ausführt so einfach bei beschriftung %username% geht sicher nicht. zum Besseren überblick mal ein link zum Fenster und unter steht der Code
Aber wo füg ich dein Code denn ein???

EDIT: Hier ist der Code den ich bisher habe:

Private Sub Command1_Click()

End Sub



Private Sub Command2_click()

End
End Sub

Private Sub form_activate()
DoEvents
start = Timer
Do
Zeit = Timer - start
Loop Until Zeit >= 0.05

CurrentX = 8150
CurrentY = 9200
Print "Ihr Admin"
End Sub
und hier ein Bild vom Fenster:

http://www.filetarget.de/small/Pic/49c74849.JPG (wieso er den link hier nicht erkennt weiß ich nicht)
Bitte warten ..
Mitglied: 22010
14.02.2007 um 21:37 Uhr
Das Codefragment musst du direkt nach "Public Class Form1" einfügen (Noch vor Private Sub Command1_Click()).

Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Private Const EWX_FORCE = 4
Private Const EWX_LOGOFF = 0
Private Const EWX_REBOOT = 2
Private Const EWX_SHUTDOWN = 1

Den eigendlichen Befehl zum Herunterfahren... musst du dann unter dem Button_Click Event des "Ablehnen_Button" einfügen.

ExitWindowsEx(EWX_LOGOFF, 0)

Die Username sache geht so meines erachtens nicht! Du könntest aber probieren ein zweites Label an eine "Lücke" im Text zu positionieren.

Dann musst du den Code:

SystemInformation.UserName.ToString

unter "Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load" einfügen (Doppelklick auf das Fenster, dann wird der Code automa. erstellt)

Das sieht dann ungefehr so aus:

b4192046b679ba1503bf1e1eaa42eec5-vb - Klicke auf das Bild, um es zu vergrößern
Bitte warten ..
Mitglied: Raven383
15.02.2007 um 09:14 Uhr
Cool klappt super danke
Bitte warten ..
Ähnliche Inhalte
Windows Server

HomeDir eines Nutzers heißt plötzlich Dokumente

Frage von Winfried-HHWindows Server16 Kommentare

Hallo Experten! Ich helfe gerade in einer anderen Schule aus, und dort haben wir ein sehr sehr sehr komisches ...

Windows Userverwaltung

Detaillierte Überwachung eines AD Nutzers

gelöst Frage von EvilmachineWindows Userverwaltung16 Kommentare

Guten Morgen Kollegen, folgendes Problem. Wir haben einen Mitarbeiter mit etwas höheren Rechten in der IT Infrastruktur der bei ...

Soziale Netzwerke

Wie bekommt man bei Facebook die Handynummer eine Nutzers ?

gelöst Frage von Aicher1998Soziale Netzwerke6 Kommentare

Hallo, ich habe das schon öfters erlebt. Wenn man das Profil auf Facebook öffnet und nach dessen Handynummer sucht, ...

Windows 7

Standby-Energiespar Button und Herunterfahren Button

Frage von hgshgsWindows 73 Kommentare

Hallo ihr Administratoren, ich bin neu hier und sage einfach mal hallo. :-) Folgendes Problem: Ich würde gerne unter ...

Neue Wissensbeiträge
Datenschutz

Die Datenkrake Google verlängert ihr Arme mal wieder ein wenig, automatische Anmeldung

Tipp von magicteddy vor 9 StundenDatenschutz

Benutzer mit einem Google Account und gespeicherten Zugangsdaten werden von chrome 69 automatisch bei Google angemeldet, natürlich alles zum ...

Verschlüsselung & Zertifikate
Meine Wissenssammlung zu Bitlocker
Erfahrungsbericht von DerWoWusste vor 1 TagVerschlüsselung & Zertifikate3 Kommentare

Die Motivation für diesen Beitrag waren die vielen Posts rund um dieses Thema, die deutlich machen, wie viele Einzelaspekte ...

E-Mail
Email-Apps und Verhalten bei Pop3
Erfahrungsbericht von kfranzk vor 3 TagenE-Mail11 Kommentare

Hallo Freunde, da mir mein diesbezüglicher Faden als gelöst markiert wurde, muss ich hier neu aufsetzen. Ich arbeite bewusst ...

Hyper-V

Optimiertes Ubuntu per Microsoft Hyper-V-Schnellerstellung verfügbar

Anleitung von Frank vor 3 TagenHyper-V1 Kommentar

Für Microsofts Virtualisierungssoftware Hyper-V ist ab sofort auch ein optimiertes Ubuntu 18.04.1 LTS verfügbar. In der "Hyper-V-Schnellerstellung" App, die ...

Heiß diskutierte Inhalte
Datenschutz
Gilt ein Ransomware-Befall als Datenpanne nach DSGVO?
Frage von MOS6581Datenschutz22 Kommentare

Moin Kollegen, wenn sich jemand Ransomware einfängt und dadurch bspw. Kundendaten verschlüsselt werden; gilt dies dann als meldepflichtige Datenpanne ...

Hardware
Sophos SG135 - Routing
gelöst Frage von Xaero1982Hardware22 Kommentare

Moin Zusammen, ich ersetze gerade nen alten Cisco DualWAN Router durch eine SG 135. Ich muss bestimmte Ziele über ...

E-Mail
Welche ist die beste E-Mail Groupware für die Zukunft?
Frage von ITCrowdSupporterE-Mail18 Kommentare

Guten Tag allerseits :) Ich möchte mich mit einer Frage heute mal an die Schwarmintelligenz wenden. Aktuell befasse ich ...

Netzwerke
Hilfe bei der Planung meines Heimnetzwerks
Frage von DHD082Netzwerke15 Kommentare

Hallo zusammen, wir bauen gerade ein Einfamilienhaus, welches ich mit einem Heimnetzwerk ausstatten möchte. Da ich zwar auch in ...