Hoi Ihrs,
ich habe hier eine Accessanwendung die bisher wohl ohne Probleme funktioniert hat.
Wenn ich das mdb öffne und die Funktionen die auf die Tabellen zugreifen direkt nach dem öffnen nutzen möchte kommt "Lauftzeitfehler 3151" respekt. siehe Titel.
Ok dachte ich, mal fix die ODBC Datenquelle aktualiseren und die Tabellen neu verknüpfen. Aber das funktioniert leider doch nicht bzw irgendwas muss ich wohl übersehen haben oder falsch machen. Ich kenne mich damit nicht wirklich gut aus und hoffe das mir wer von euch helfen kann.
Was merkwürdig ist: Wenn ich das File öffne, dann im Datenbankfenster eine Tabelle öffne und DANACH die Funktionen des Programms aufrufe läuft es einwandfrei. Ebenso nachdem ich einfach nur die Tabellenverknüpfungen aktualisiere...
Hat jemand eine Idee was hier falsch läuft?
Grüssle
Marcel
edit sagt:
das ist der einizge Quelltext in dem Formular. in Zeile 12 rappelt es dann auch:
 Code: |
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
|
Private Sub cmdViewInitialDelivery_Click()
Dim strSQL As String
strSQL = "exec InOrders @InitialDeliveryID=" & Forms!frmMain.InitialversandID & "," & _
"@WeightLimit=" & Forms!frmMain.WeightLimit
Dim qDef As Object
Set qDef = CurrentDb.QueryDefs("execInDelivery")
qDef.SQL = strSQL
qDef.Close
DoCmd.OpenQuery "execInDelivery", acViewNormal
End Sub |
|
