Hallo zusammen,
bevor ihr mich steinigt ich hab schon Mr. Google bemüht aber ich steh, da ich blutiger Anfänger in Sachen DB bin, total auf dem Schlauch und bräuchte einen Denkanstoß.
Kurzum ich habe eine Form in Visual Studio erstellt in der auch Tableadapter für die entsprechenden Tabellen eingebunden sind. Das schreiben in die entsprechende Tabelle ist kein Problem nun wollte ich vor dem Schreiben prüfen lassen ob der Datensatz anhand der Felder Nr und d vorhanden ist aber irgendwie bekomm ich das nicht hin.
Hier das von mir gebastelte:
bevor ihr mich steinigt ich hab schon Mr. Google bemüht aber ich steh, da ich blutiger Anfänger in Sachen DB bin, total auf dem Schlauch und bräuchte einen Denkanstoß.
Kurzum ich habe eine Form in Visual Studio erstellt in der auch Tableadapter für die entsprechenden Tabellen eingebunden sind. Das schreiben in die entsprechende Tabelle ist kein Problem nun wollte ich vor dem Schreiben prüfen lassen ob der Datensatz anhand der Felder Nr und d vorhanden ist aber irgendwie bekomm ich das nicht hin.
Hier das von mir gebastelte:
VB.NET-Quellcode
- Dim d As Date
- Dim zeit As Integer
- Dim krank As Integer
- Dim frei As Integer
- Dim nr As Integer = limport.Text
- Dim t As Date
- Dim a As Integer
- Dim te As Integer
- If Not cvoll.Checked And Not chalb.Checked And Not ckrank.Checked And Not curlaub.Checked Then
- MessageBox.Show("Sie müssen eine Arbeitszeit Option wählen")
- Else
- If cvoll.Checked Then
- zeit = 24
- End If
- If chalb.Checked Then
- zeit = 12
- End If
- If ckrank.Checked Then
- krank = 1
- End If
- If Not curlaub.Checked Then
- frei = 0
- End If
- ' Für jedes slektierte Datum
- For i = 0 To DateDiff(DateInterval.Day, MonthCalendar1.SelectionRange.Start, MonthCalendar1.SelectionRange.End)
- d = MonthCalendar1.SelectionRange.Start.AddDays(i)
- Dim nz = ArbeitTableAdapter.Insert(nr, d, zeit, krank, frei)
- Next
- MessageBox.Show("Ihre Eingabe wurde verarbeitet")
- End If