Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
  		RegistrierenRegistrieren  LoginLogin

Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB.NET] Fragen - Antworten
Autor
Nachricht
klopower
Newbie
Newbie

Anmeldedatum: 07.07.2010
Beiträge: 5
Visual basic Problem
Verfasst am: 07.07.2010, 19:15
Moin leute bin neu hier im forum.. Also naja ich komm ma zur sache. Ich wollte eine Maus und Tastatursperre machen..
Nun das klappt gut nur ich wollte es so haben " Wenn ich meinen pc sperren will muss ich ein Passwort eingeben. Wenn ich den wieder freigeben will muss ich ebenfalls ein anderes pw eingeben. Die maus und tastatur darf aber nicht in der Form gesperrt sein.
Und genau da liegt mein problem!
Ich kriege es nur hin das maús und tastatur gesperrt sind aber nicht das mit dem desktop
Bitte helft mir!
Souce code:
Code:
Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Public Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long



    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If TextBox1.Text = ("roflmao") Then
            Timer1.Start()
        End If




    End Sub

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

        If TextBox1.Text = ("doktorbob") Then
            Timer1.Stop()
        End If


    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If TextBox1.Text = ("roflmao") Then
            BlockInput(True)

        End If


    End Sub

    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        If TextBox1.Text = ("roflmao") Then
            Timer3.Start()
        End If
    End Sub

    Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
        If TextBox1.Text = ("roflmao") Then
            BlockInput(False)




        End If
    End Sub
End Class

_________________
Programmiern macht spaß! Aber nur wenn man kein dummes script kiddie ist!!!
 
klopower
Newbie
Newbie

Anmeldedatum: 07.07.2010
Beiträge: 5

Verfasst am: 09.07.2010, 17:47
ist in diesen forum jem. überhaupt aktiv?
_________________
Programmiern macht spaß! Aber nur wenn man kein dummes script kiddie ist!!!
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB.NET] Fragen - Antworten
 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Passwort Generator 1526 08.07.2010, 00:32
Keine neuen Beiträge Passwort Schutz? 878 25.10.2007, 06:31
Keine neuen Beiträge Das passwort an die E-Mail von mir senden? 562 17.10.2007, 21:18
Keine neuen Beiträge Passwort Generator by sollniss 1267 28.11.2008, 17:03
Keine neuen Beiträge TUT zur Passwort abfrage 1011 10.08.2007, 15:06
 




[ Time: 0.1507s ][ Queries: 87 (0.0155s) ][ GZIP on - Debug on ]