online 1
gast (50)

/ Forum / Datenbanken

DatenbankenDatenbanken

Fragevon mathew1966 vom 11.03.2021, 11:07 Options

Datensatzänderung (acess) bestätigen lassen

Hallo,

meine Frage ist, ob und wenn ja wie es zu realisieren ist, wenn man eine Datensatzänderung in einem Formular erst speichert, wenn es durch ein OK Button bestätigt wurde?

Vielen Dank allen Freaks


Antwort schreiben

Antwort 1 von RalfH vom 11.03.2021, 11:49 Options

Hi,
klar geht das.
Im Formular bearbeiten zulassen auf Nein stellen.

Wenn dann ein Datensatz bearbeitet werden soll,
einen Button erstellen und folgenden VBA Code Bei Klick hinterlegen :

Dim Mldg, Titel, Voreinstellung, Wert1, stDocName
stDocName = "frmStart"
Mldg = "Bitte das erforderliche Kennwort eingeben"
Titel = "Kennwort Eingabe"
Voreinstellung = "*****"

Wert1 = InputBox(Mldg, Titel, Voreinstellung)

If Wert1 = "Dein Kennwort" Then
Me.AllowEdits = True
Farbcode.SetFocus
Else
MsgBox " Sie haben keine Berechtigung Daten in diesem Datenbanksystem zu verändern. Wenden Sie sich bitte an den Datenbank Administrator. "

DoCmd.Close


    DoCmd.OpenForm stDocName
    End If


Lass es Dir gutgehen,
Ralf

Antwort 2 von RalfH vom 11.03.2021, 13:06 Options

Kleiner Fehler im Code.
Bei Farbcode.Setfocus ändern in DeinTextfeldimFormular.Setfocus

Antwort 3 von RaHi vom 11.03.2021, 19:41 Options

Hallo,

falls du nur ein Popup-Meldung benötigst geht auch
Private Sub Form_BeforeUpdate(Cancel As Integer)
Cancel = MsgBox("Datensatz speichern?", vbYesNo + vbQuestion, "Frage") = vbNo
End Sub


Gruß
Ralf

Antwort 4 von mathew1966 vom 12.03.2021, 09:34 Options

Hi Ralf

ich danke dir für die schnelle und funktionierende Hilfe

Antwort 5 von RalfH vom 13.03.2021, 06:53 Options

Welcher Ralf ???? :)

Ähnliche Themen

acess problem
........  18.12.2007 - 75 Hits - 1 Antwort

Acess Dateneingabe ist auf 10 beschränkt
Hofmann  27.03.2008 - 46 Hits - 1 Antwort

Acess Datenbank erstellen - Anfänger
taco100  07.10.2008 - 18 Hits - 1 Antwort

Acess Datensätze ohne Duplikate zählen
Franki82  05.03.2009 - 707 Hits - 5 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Thu Jan 8 21:07:44 2026