minicrispie: Access 2007: Datensatz erzeugen

Beitrag lesen

Hallo,

Den Rest machste dann mal ganz allein. Viel Spass beim Auseinandersetzen mit dem Scheiss.

ich hab das jetz mal ausprobiert mit dem Script:
folgende Tabellen bestehen:

+--------------------------------+
|             T_USER             |
+----+---------+----------+------+
| ID |UserName | passwort | mail |
+----+---------+----------+------+
ID ist ein Autowert.

Dann hab ich ein Formular namens 'F_NeuerBenutzer'. Dieses hat folgenden Aufbau:

+---------------------------------------------+
|                                             |
| Benutzername: [Textfeld:input_benutzername] |
| Passwort:     [Textfeld:input_passwort]     |
| E-Mail:       [Textfeld:input_email]        |
|                                             |
| [Button:addbtn]                             |
|                                             |
+---------------------------------------------+

In den Textfeldern steht von Anfang an "Ungebunden" drin.
Dann habe ich folgendes VBA-Script:

Private Sub addbtn_Click()
On Error GoTo Err_addbtn_Click

Dim db As Database
  Dim rs As Recordset
  Set db = CurrentDb()
  Set rs = db.OpenRecordset("T_User")

rs.AddNew
  rs!UserName = Forms.F_NeuerBenutzer.input_benutzername.Value
  rs!passwort = Forms.F_NeuerBenutzer.input_passwort.Value
  rs!mail = Forms.F_NeuerBenutzer.input_email.Value
  rs.Update

Exit_addbtn_Click:
    Exit Sub

Err_addbtn_Click:
    MsgBox Err.Description
    Resume Exit_addbtn_Click

End Sub

Sobald ich also auf "Registrieren" klicke, soll ein neuer Datensatz in der Tabelle T_User eingefügt werden und dieser mit den Daten befüllt werden. Nur ich kann so oft auf den Button klicken wie ich will. Da passirt einfach nix. Aber Warum?

MfG. Christoph Ludwig

--
Wo die Sprache aufhört, fängt die Musik an...
Selfcode:  sh:) fo:) ch:° rl:( br:^ n4:} ie:{ mo:} va:) js:| de:] zu:) fl:( ss:| ls:~
Go to this