title image


Smiley Dazu müsstest Du, sobald Du in Training einen neuen Datensatz ...
Hallo Klaus,



... anlegst, (halb-)automatisch anhand der Teamdaten in Deiner "Kombinationstabelle" die neuen Datensätze mit einem Default-Status aufbauen,

z.B. per Button in Deinem Hauptformular ...







Private Sub ButtonTeamAufbauen_Click()

  Dim sSQL As String

  sSQL = "INSERT INTO KombiTabelle (TrainingID, SpielerID, StatusID) " & _

    "SELECT " & Me.TrainingID & " AS TrainingID, SpielerID, 0 AS StatusID FROM Team;"

  CurrentDb.Execute sSQL, dbFailOnError

End Sub





Code eingefügt mit Syntaxhighlighter 4.0





Die Anfügeabfrage nimmt die aktuelle TrainingID aus dem Hauptformular und fügt diese, zusammen mit den Daten aus der Team-Tabelle und einem Default-Status 0 (z.B. für "offen") in die Kombitabelle ein. Ggf. müsstest Du dann noch ein Requery auf das UF ausführen.



Gruss
scotty

I´m an admin. If you see me laughing, you should better have a backup.
Einen Fehler machen und ihn nicht korrigieren - das erst heisst wirklich einen Fehler machen.
Konfuzius


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: