Mehr Datenbanken können nicht geöffnet werden (2)
Bolkon
Gesendet: 03.12.13 12:11
Betreff: RE: Mehr Datenbanken können nicht geöffnet werden (2)


New user

Beiträge: 4

Ort: Hamburg
Danke! für Deine Mühen.
Jetzt meine:
Access-Version: zuletzt MO Prof 2010
Windows-Version: Windows 7 Home Premium mit 2 GB Arbeitsspeicher.
Hat die Anwendung vorher funktioniert? Sicherungsdatei funktioniert immer noch.
Andere Access/Win-Version: Nein. Alles in einer Datei: Ja.
Versuche herauszufinden, ab welchem Moment an "System-" Änderung die Probleme auftreten. Bin dabei.

Datenherkunft des Formulares: Hauptformular mit 1 Datenbank, 2 Kombifeldern, 22 Listenfeldern, 16 Textfeldern und 3 Unterformulare; alle mit je einer Abfrage macht 43 Abfragen!

Beispiel SQL-Text:
Private Function Kaskade() As Byte
Dim i As Byte
Dim j As Byte
i = 0
Do While i < 16
i = i + 1
If Forms!Tafel!("IDLISTE" & i - 1).Value = Null Then
Do While i <= 16
strSQL = "UPDATE Tafelkriterium " _
& "SET Tafelkriterium." & ("IDLISTE" & i + 1) & " = Null"
DoCmd.RunSQL strSQL
i = i + 1
Loop
End If
strSQL = "UPDATE (Tafelkriterium INNER JOIN AbfGeneal " _
& "ON TafelKriterium." & ("IDLISTE" & i - 1) & " = AbfGeneal.IDKURZ) " _
& "SET Tafelkriterium." & ("IDLISTE" & i) & " = AbfGeneal!IDKIND1"
DoCmd.RunSQL strSQL
Loop
EndKask:
byKaska = i
End Function

Teste, ob du die Abfrage direkt ohne Probleme öffnen und editieren kannst. Die, die ich probiert habe, brachten alle den Fehler 3048.
Gruß F.
Top of the page Bottom of the page