Home Office-Hilfe.com - Wir lösen Ihr Problem mit Microsoft Excel, Word, Outlook, PowerPoint, Access gratis Forum Impressum

  Speichern Abfrage
Neues Thema eröffnenNeue Antwort erstellen
Autor Nachricht
Blackmore
Newbie
Newbie


Anmeldedatum: 24.10.2006
Beiträge: 8

BeitragVerfasst am: 24.10.2006, 08:51 Nach oben

Office 2000

Guten Morgen an alle,

ich hab folgendes Problem:

Genau beschrieben... ich habe ein Formular in dem per Button ein anderes Formular geöffnet wir in dem Datensätze erstellt und verändert werden können. Diese Datensätze greifen natürlich auf Tabellen zu. Nun möchte ich aber das beim Schliesen des Formulars erst eine Abfrage kommen sollen mit " Soll es gespeichert werden Ja oder Nein" bei Ja einfach ganz normal das Formular verlassen und speicher bei nein sollen die Datensätze wieder auf den ursprünglichen Wert zurückgestellt werden.

Code:
Private Sub Form_BeforeUpdate(Cancel As Integer)
    If Me.Dirty Then
        If MsgBox("Änderungen speichern?", vbYesNo, "Speichern") = vbNo Then
            Me.Undo
        End If
    End If
End Sub


ich habs damit probiert aber es funktioniert nicht die Datensätze werden überschrieben und es kommt nicht mal das Dialog Fenster.

Vielen Dank schon mal im voraus für hilfe
Benutzer-Profile anzeigenPrivate Nachricht senden
freaky
Moderator
Moderator


Anmeldedatum: 11.04.2006
Beiträge: 751
Wohnort: im Norden

BeitragVerfasst am: 24.10.2006, 12:51 Nach oben

Hi,

wenn das beim Schießen ausgeführt werden soll, warum benutzt Du dann nicht auch dieses Ereignis (sollte ja ein Button bei Dir sein). Dort kommt dann Dein Code rein.

Das mit dem "Update" des Formulares wird wohl nicht ausgeführt...!

_________________
Gruß
freaky
----------------------------------------------------------------
Windows 2000, Windows XP
Office 97, Office 2000, Office 2003 und Office 2007
_____________________________________________
Feedback nicht vergessen....
---------------------------------------------------------------
Benutzer-Profile anzeigenPrivate Nachricht senden
Blackmore
Newbie
Newbie


Anmeldedatum: 24.10.2006
Beiträge: 8

BeitragVerfasst am: 24.10.2006, 14:04 Nach oben

hi,

nene ich habe keinen schliessen Button der Dialog soll kommen wenn das Formular durch das normale windows "x" geschlossen wird.
Benutzer-Profile anzeigenPrivate Nachricht senden
Blackmore
Newbie
Newbie


Anmeldedatum: 24.10.2006
Beiträge: 8

BeitragVerfasst am: 24.10.2006, 14:18 Nach oben

Komischer weise .... wenn ich einen Button in dem Formular erstelle dem ich den Befehl

Form.Undo

gebe, das funktioniert auch nicht die daten kehren nicht in ihren ursprünglichen wert zurück. oder stimmt das so nicht?
Benutzer-Profile anzeigenPrivate Nachricht senden
freaky
Moderator
Moderator


Anmeldedatum: 11.04.2006
Beiträge: 751
Wohnort: im Norden

BeitragVerfasst am: 24.10.2006, 14:28 Nach oben

Hi,

noirmalerweise wäre das so schon ok. Beim Schlißen ein Undo. Das hilft aber nur dann, wenn es davor keinen Speichervorgang - welcher Art auch immer - gegeben hat. Access kann nur die "temporären" Änderungen verwerfen.

Da ich nicht weiß, wie Dein Formular aufgebautr ist udn was dort genau wo passiert - kann ich dazu nicht viel sagen.

_________________
Gruß
freaky
----------------------------------------------------------------
Windows 2000, Windows XP
Office 97, Office 2000, Office 2003 und Office 2007
_____________________________________________
Feedback nicht vergessen....
---------------------------------------------------------------
Benutzer-Profile anzeigenPrivate Nachricht senden
Blackmore
Newbie
Newbie


Anmeldedatum: 24.10.2006
Beiträge: 8

BeitragVerfasst am: 24.10.2006, 14:45 Nach oben

Genau das ist das Problem ich weiss selber nicht "ganz genau" wie es aufgebaut ist. Und leider ist VBA für mich auch noch Neuland. ( Ich bin grade im ersten Ausbildungsjahr und hab das grad als Aufgabe bekommen... )
Benutzer-Profile anzeigenPrivate Nachricht senden
freaky
Moderator
Moderator


Anmeldedatum: 11.04.2006
Beiträge: 751
Wohnort: im Norden

BeitragVerfasst am: 24.10.2006, 15:09 Nach oben

Hi,

Du könntest natürlich auch ein Beispiel hochladen...dann sieht man klarer....

_________________
Gruß
freaky
----------------------------------------------------------------
Windows 2000, Windows XP
Office 97, Office 2000, Office 2003 und Office 2007
_____________________________________________
Feedback nicht vergessen....
---------------------------------------------------------------
Benutzer-Profile anzeigenPrivate Nachricht senden
Blackmore
Newbie
Newbie


Anmeldedatum: 24.10.2006
Beiträge: 8

BeitragVerfasst am: 24.10.2006, 15:13 Nach oben

hmm ok ich glaube ich hab das Problem erkannt...

das hier:

Code:
If Me.Dirty Then
        If MsgBox("Änderungen speichern?", vbYesNo, "Speichern") = vbNo Then
            Me.Undo
        End If
    End If


klappt aber leider komischerweisse nur bei den einzelnen feldern in die ich daten eingebe. d.h. ich musste den code in jedes einzelne feld eingeben und der dialog würde dann bei jedem wechseln kommen...
Woran kann das liegen das es NICHT für das ganze Formular klappt...
Benutzer-Profile anzeigenPrivate Nachricht senden
Blackmore
Newbie
Newbie


Anmeldedatum: 24.10.2006
Beiträge: 8

BeitragVerfasst am: 24.10.2006, 15:37 Nach oben

Ok danke für die Hilfe mein Problem ist gelöst
In dem Formular gabs noch unterformulare wo die einzelnen Eingabefelder waren und es ging als ich bei den drei unterformularen jeweils beim before update das mit dem dirty abfrug.
Also denke ich mal das es daran lag!?!?!
Benutzer-Profile anzeigenPrivate Nachricht senden
Beiträge der letzten Zeit anzeigen:      
Neues Thema eröffnenNeue Antwort erstellen


Ähnliche Beiträge
Thema Autor Forum Antworten Verfasst am
Keine neuen Beiträge Mappe schliesst sich automatisch beim... Doernte Microsoft Excel Hilfe 0 18.07.2008, 12:21 Letzten Beitrag anzeigen
Keine neuen Beiträge alte Aufagben und Termine auf der Fes... Anna20 Microsoft Outlook Hilfe 0 09.07.2008, 14:04 Letzten Beitrag anzeigen
Keine neuen Beiträge DBF Dateien nach Bearbeitung speicher... qnap Microsoft Excel Hilfe 2 01.07.2008, 11:33 Letzten Beitrag anzeigen
Keine neuen Beiträge Datenmenge erhöht sich drastisch beim... b&b_ag Microsoft Word Hilfe 0 24.06.2008, 16:37 Letzten Beitrag anzeigen
Keine neuen Beiträge Datenbanken verknüpfen und Abfrage er... gogo Microsoft Access Hilfe 1 20.06.2008, 13:47 Letzten Beitrag anzeigen


 Gehe zu:   



Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Haftungsausschluss/Disclaimer


SMS kostenlos versenden | Battle-Dream | Tuning Forum | Join the YoungGeneration | krankenversicherungsvergleich | Kalorienarme Rezepte!
Versicherungsvergleich | Bürobedarf | Papier | Betten

Ranking-Hits



Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de