Quantcast
Channel: Alla ämnen på Eforum
Viewing all articles
Browse latest Browse all 7687

Uppdatera en tabell

$
0
0
Har ett formulär med ett antal textrutor som emellanåt behöver uppdateras, i exemplet här under så kan jag via en knapp uppdatera en och en men jag skulle vilja uppdatera samtliga 15 texter i formuläret på samma gång..? Är det någon som kan hjälpa mej? Private Sub EtR_Click() If MsgBox("Vill du spara ändringen? ", vbYesNo) = vbNo Then Else SQLtext = "UPDATE tgranskning SET " _ & " R = '" & Me.tb19 & "'" & _ " WHERE tgranskning.Id = " & Me.tb0 DoCmd.SetWarnings False DoCmd.RunSQL SQLtext End If DoCmd.Close acForm, "fgransk", acSaveYes DoCmd.OpenForm "fgransk" End Sub

Viewing all articles
Browse latest Browse all 7687