Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
DB-Modell fuer Freiwillige Feuerwehr
Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12  Weiter
zurück: Datensatz inklusive 1:n Beziehungen an andere DB übergeben weiter: Access runtime 2013 Datenbank startet mit Fehlermeldung Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
SleepWalker86
Anfänger :-)


Verfasst am:
02. Sep 2010, 17:58
Rufname:

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

SleepWalker86 am 02. Sep 2010 um 17:55 hat folgendes geschrieben:
Das ist ja schonmal super aber ein problem besteht noch:
WEnn ich im Formularkopf auf "Alle Einsätze anzeigen klicke" dann eine suche Starte. Also die suche auf alle drei Stadtgebiete dann zeigt er mir ein Fehler an.
"Unzulässige Verwenudung von Null"
Das slebe ist auch im Frm Dienste.

Es macht den anschein als würde die Case funktion im Butten "suchen" und "alle" nicht richtig klappen oder?
blackoutNO
SQL-Server Consultant


Verfasst am:
02. Sep 2010, 18:42
Rufname: Jörn
Wohnort: Ilmenau


AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

Okay, habs grad mitbekommen. Werd aber heute leider nicht mehr damit fertig werden. Ich mach das Ganze dann morgen Nachmittag ok?
_________________
Cheers, Jörn
Microsoft Studentpartner
Manchen kann ich helfen, weil mir andere geholfen haben und dafür bin ich sehr dankbar!!!
SleepWalker86
Anfänger :-)


Verfasst am:
03. Sep 2010, 16:46
Rufname:

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

SleepWalker86 am 02. Sep 2010 um 19:08 hat folgendes geschrieben:
Das ist kein problem bin ja froh das du mir hilfst......das was ich selber hinbekomme mache ich auch aber da bin ich mit meinem wissen schon lange am ende Smile

Danke Gruß Sascha

So ich habe mal ein wenig rum gebastelt und habe die Casefunktion wie folgt geändert:
Code:
    Select Case Nz(Me!cbostadtteil_waehlen, 0)
      Case 0
so hat es bei mir geklappt hier die aktuelle Version zum drüber schauen....
Das listenFeld macht manchmal noch probleme in beiden Frms
Code:
Private Sub lstEinsaetze_AfterUpdate()
    Dim rs As DAO.Recordset
       
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[ein_id] = " & Str(Nz(Me![lstEinsaetze], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
    Me!Text95 = Me![frmEinsatz_ufo_Fahrzeuge].Form.RecordsetClone.RecordCount
    Me!Text90 = Me![frmEinsatz_ufo_Personen].Form.RecordsetClone.RecordCount
derArb hat gesagt ich sollte diese Zeile löschen:
Code:
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
aber dann aktualisiert sich das listenfeld beim klick nicht mehr.

Hattest du auch schonmal den Fehler das wenn du im Formularkopf die stadt offt geändert hast das ein Fehler auftrat?

Gruß Sascha



feuerwehr-v31_blackoutNO.rar
 Beschreibung:

Download
 Dateiname:  feuerwehr-v31_blackoutNO.rar
 Dateigröße:  144.87 KB
 Heruntergeladen:  12 mal


feuerwehr-v32_blackoutNO.rar
 Beschreibung:

Download
 Dateiname:  feuerwehr-v32_blackoutNO.rar
 Dateigröße:  144.87 KB
 Heruntergeladen:  19 mal

blackoutNO
SQL-Server Consultant


Verfasst am:
03. Sep 2010, 20:29
Rufname: Jörn
Wohnort: Ilmenau

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

Hallo,
Code:
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
zu löschen sorgt dafür, dass der Datensatz, der im Recordset gefunden wurde im Frm angezeigt wird. Also ist das Löschen dieser Zeile nicht richtig.

Wann tritt denn der Fehler genau auf? Ich konnte ihn nicht reproduzieren.
Habe noch eine kleine Änderung eingefügt, damit das Kombifeld für Einsatzsuche auch wieder alles anzeigt, wenn die Stadt entfernt wird.

_________________
Cheers, Jörn
Microsoft Studentpartner
Manchen kann ich helfen, weil mir andere geholfen haben und dafür bin ich sehr dankbar!!!



feuerwehr-v31_blackoutNO.rar
 Beschreibung:

Download
 Dateiname:  feuerwehr-v31_blackoutNO.rar
 Dateigröße:  145.02 KB
 Heruntergeladen:  18 mal

derArb
getting better


Verfasst am:
03. Sep 2010, 20:58
Rufname: derArb
Wohnort: Berlin


AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

hallo,

ich hatte diese Zeile auskommentiert, weil Sie eindeutig den Fehler provozierte.

MfG
derArb

p.s: Danke blackoutNO für die Übernahme

_________________
MfG
derArb

Scio me nihil scire...Εν οίδα οτι ουδέν οίδα... Ich weiss, dass ich nichts weiss (Sokrates)
Ich bevorzuge Beiträge mit korrekter deutscher Grammatik.
blackoutNO
SQL-Server Consultant


Verfasst am:
03. Sep 2010, 21:01
Rufname: Jörn
Wohnort: Ilmenau

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

Ich kann nur vermuten, da ich diesen Fehler nicht habe. Aber wie wäre es, wenn du nur
Code:
    Me.Bookmark = rs.Bookmark
verwendest. Das rs.eof ist hier nicht zwingend notwendig.

@Arb: keine Ursache ;)

_________________
Cheers, Jörn
Microsoft Studentpartner
Manchen kann ich helfen, weil mir andere geholfen haben und dafür bin ich sehr dankbar!!!
SleepWalker86
Anfänger :-)


Verfasst am:
04. Sep 2010, 17:40
Rufname:

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

Hast du das in der letzten Version schon geändert oder müssen wir das noch machen?
Code:
    Me.Bookmark = rs.Bookmark
Ansonsten klappt das soweit alles sehr gut....dann könnten wir zum nächsten Thema kommen? Smile

Lagerverwaltung?
Geräteverwaltung+ Wartungsintervalle?
Wartungsintervalle für die Fahrzeuge?
Einsatzstatistiken gesamt und für jeden Kameraden?

hmm wenn ich(wir) das so sehe habe ich noch vie vor mir Smile

Gruß Sascha
Nachtrag: SleepWalker86 am 04. Sep 2010 um 17:47 hat folgendes geschrieben:
Das mit dem :
Code:
    Me.Bookmark = rs.Bookmark
klappt nicht der fehler tritt immernoch hin und wieder auf. Den können wir denke ich aber erstmal vernachlässigen.
blackoutNO
SQL-Server Consultant


Verfasst am:
04. Sep 2010, 23:01
Rufname: Jörn
Wohnort: Ilmenau

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

Hi,

nenn mir doch mal bitte die fehlernummer, dann können wir den mit einer gezielten fehlerbehandlung einfach aussetzen.

_________________
Cheers, Jörn
Microsoft Studentpartner
Manchen kann ich helfen, weil mir andere geholfen haben und dafür bin ich sehr dankbar!!!
SleepWalker86
Anfänger :-)


Verfasst am:
06. Sep 2010, 10:12
Rufname:

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

So hier bin ich wieder....der Fehlercode lautet:
2115

Ich hoffe das hilft die weiter?
Gruß Sascha
blackoutNO
SQL-Server Consultant


Verfasst am:
06. Sep 2010, 17:15
Rufname: Jörn
Wohnort: Ilmenau

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

genau, dann müsste die Fehlerbehandlung etwa so aussehen:
Code:
On Error GoTo Fehler

    'Dein Code
    Exit Sub
Fehler:
    If Err.Number = 2115 Then
        'nichts machen
      Else
        Msgbox Err.Number & " " Err.Description
    End If

_________________
Cheers, Jörn
Microsoft Studentpartner
Manchen kann ich helfen, weil mir andere geholfen haben und dafür bin ich sehr dankbar!!!
SleepWalker86
Anfänger :-)


Verfasst am:
06. Sep 2010, 17:21
Rufname:

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

Hi..joa das sieht ganz gut aus aber bei der umsetzung scheitert es....wo muss der code gneau hin?
blackoutNO
SQL-Server Consultant


Verfasst am:
06. Sep 2010, 17:46
Rufname: Jörn
Wohnort: Ilmenau

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

Servus,

ich hab dir doch ne Marke gesetzt. An der Stelle wo " 'dein Code " steht musst du deinen Code einfügen und natürlich den ganzen Spaß dann in die Prozedur schreiben.
Code:
Private Sub lstEinsaetze_AfterUpdate()
On Error GoTo Fehler
    Dim rs As DAO.Recordset
           
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[ein_id] = " & Str(Nz(Me![lstEinsaetze], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
    Me!Text95 = Me![frmEinsatz_ufo_Fahrzeuge].Form.RecordsetClone.RecordCount
    Me!Text90 = Me![frmEinsatz_ufo_Personen].Form.RecordsetClone.RecordCount
    Set rs = Nothing
    Exit Sub
Fehler:
    If Err.Number = 2115 Then
        'nichts machen
      Else
        Msgbox Err.Number & " " Err.Description
    End If
End Sub
So in etwa, insofern das hier der Ganze Code von dir ist ;)
_________________
Cheers, Jörn
Microsoft Studentpartner
Manchen kann ich helfen, weil mir andere geholfen haben und dafür bin ich sehr dankbar!!!
SleepWalker86
Anfänger :-)


Verfasst am:
06. Sep 2010, 19:01
Rufname:

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

Fehler beim Kompilieren Erwartet Anweisungsende:
Code:
        Msgbox Err.Number & " " Err.Description
Err.Description Das Err. nimmt er nicht an.
blackoutNO
SQL-Server Consultant


Verfasst am:
06. Sep 2010, 19:11
Rufname: Jörn
Wohnort: Ilmenau

AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

Upsi ^^
Code:
        Msgbox Err.Number & " " & Err.Description
Da hat ein & gefehlt Very Happy
_________________
Cheers, Jörn
Microsoft Studentpartner
Manchen kann ich helfen, weil mir andere geholfen haben und dafür bin ich sehr dankbar!!!
SleepWalker86
Anfänger :-)


Verfasst am:
06. Sep 2010, 19:13
Rufname:


AW: DB-Modell fuer Freiwillige Feuerwehr - AW: DB-Modell fuer Freiwillige Feuerwehr

Nach oben
       Version: Office 2007

Alles klar...ich werde berichten ob es klappt im moment tritt kein Fehler auf...und alles läuft wie es soll.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12  Weiter
Diese Seite Freunden empfehlen

Seite 8 von 12
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum 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 nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Sprachen in DB-Modell berücksichtigen 9 akdes 96 21. Jan 2014, 16:52
akdes Sprachen in DB-Modell berücksichtigen
Keine neuen Beiträge Access Formulare: mehrere 'freiwillige' kriterien für dasselbe abfrage feld 2 Rocahontas 257 21. Mai 2012, 23:58
Rocahontas mehrere 'freiwillige' kriterien für dasselbe abfrage feld
Keine neuen Beiträge Access Tabellen & Abfragen: Frage zu Tabellenerstellung (DB-Modell) 1 laterne123 185 17. Jul 2011, 14:18
derArb Frage zu Tabellenerstellung (DB-Modell)
Keine neuen Beiträge Access Tabellen & Abfragen: Informationsanalyse in ERM/DBModell 0 AlexS. 672 23. Okt 2009, 11:20
AlexS. Informationsanalyse in ERM/DBModell
Keine neuen Beiträge Access Tabellen & Abfragen: Hilfe bei DB-Modell ... BITTE 1 Kieni 342 31. Jul 2009, 19:18
Tina81 Hilfe bei DB-Modell ... BITTE
Keine neuen Beiträge Access Tabellen & Abfragen: Erstellen eines Turnier-DB ==> DB-Modell ---Boule---- 5 Gunter Endert 3324 01. Okt 2008, 15:41
g.endert Erstellen eines Turnier-DB ==> DB-Modell   ---Boule----
Keine neuen Beiträge Access Programmierung / VBA: DB-Modell? 1 FrankTheFox 465 09. Jun 2007, 10:43
Shai DB-Modell?
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Word VBA