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.
|