[G.I.Joe]

http://www.tbee.de/mysql/
Lesen, lernen, verstehen, anwenden...

[Scout]

hy
danke dan lad ich mir mal es mysql runter und fang an zu lernen

ich hoff ich blick es,

wo bekomm ich jetzt m visual basic 6 her

auch übrigends mein pc ist ein amd k6 mhz ka und 128mb ram kein wunder das der ertwas lahm ist

[Scout]

hy
hier mein layout , etwsa bilig gemacht aber so ähnlich solle es noch aussehen


nur kommt noch vor dem programm ein feld des nach benutzter und passwort frägt

Angehängte Datei(en)

•  Urlaubverwaltunginternet.zip (35,44K)
  Anzahl der Downloads: 56

[Scout]

hy


frage was macht SendKeys "{Home}+{End}"


und was ist ander anmeldung falsch

die anwndung soll nach dem dritten einlogen flasch sich beende aber irgend wie zählt des Prgramm i nicht hoch

Option Explicit

Public LoginSucceeded As Boolean

Private Sub cmdCancel_Click()
'Globale Variable auf False setzen,
'um eine fehlgeschlagene Anmeldung zu kennzeichnen.
LoginSucceeded = False
Me.Hide
End Sub

Private Sub cmdOK_Click()
Dim i As Integer
'Auf korrektes Kennwort / Benutzername überprüfen

If txtPassword = "password" And txtUserName = "Benutzer" Then
'Geben Sie hier Code ein, um den Erfolg
'an die aufrufende Unterroutine weiterzuleiten.
'Setzen der globalen Variablen ist leicht.
Call FrmIndex.Form_Load
LoginSucceeded = True
'Me.Hide
Else
i = i + 1
If i > 3 Then
MsgBox "Es besteht Verdacht auf Missbrauch das Programm wird Beendet"
Unload Me
Else
MsgBox "Ungültiges Kennwort. Bitte versuchen Sie es noch einmal!", , "Anmeldung"
txtPassword.SetFocus
SendKeys "{Home}+{End}"
End If
End If

End Sub

[Scout]

hy
ich muss i einfach oben hin setzen, ich honk

Public LoginSucceeded As Boolean
Dim i As Integer

[Scout]

hy
hier ist jetzt mein fertiges er modell

Angehängte Datei(en)

•  er___modell_r.doc (20,5K)
  Anzahl der Downloads: 102

[G.I.Joe]

Zitat (Scout: 27.06.2005, 10:31)

hy
hier ist jetzt mein fertiges er modell
<{POST_SNAPBACK}>

Fehlt da nicht eine Tabelle welche Tage Urlaub sind und welche nicht? Oder willst du das in den Quellcode einbauen?