![](/forum/profile/get-photo.asp?memberid=27&type=profile&rnd=376) Elite Veteran
Beiträge: 860
![500](http://www.donkarl.com/forum/images/decorations/multiple/500.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![100](http://www.donkarl.com/forum/images/decorations/multiple/100.gif) ![25](http://www.donkarl.com/forum/images/decorations/multiple/25.gif) ![25](http://www.donkarl.com/forum/images/decorations/multiple/25.gif) Ort: Wien | Hallo, Alex!
lagalex - 09.05.16
...
Set qdf = DB.CreateQueryDef(strPassThrough)
...
.Connect = strVerbindungszeichenfolge
.SQL = "EXEC " & strStoredProcedure & " " & strParameter
...
Das Unterformular bekommt dann einfach
Me.UBlatt_Ergebnis.Form.RecordSource = SPRecordsourceParam("Schema.spSuche", Verbindungszeichenfolge, SQLKrit)
...
Eine einfache Lösung wäre:
- du speicherst die PT-Abfrage samt Verbindungszeichenfolge
- in der Eigenschaft "Herkunftsobjekt" des UFo-Steuerelementes wählst du kein Formular aus, sondern direkt die PT-Abfrage
- vor dem Öffnen des UFos schreibst du die SQL-Eigenschaft der PT auf den neuen Parameterwert um
Damit sind Spaltennamen und -anzahl egal.
Die einzige Voraussetzung dafür, eine PT als Herkunftsobjekt verwenden zu können, ist, dass das UFo nicht mit dem Hauptformular verknüpft ist. Sonst bockt Access.
----- Servus
Karl
*********
Access-Entwickler-Konferenz: https://www.donkarl.com/?aek
Access DevCon Vienna: https://www.donkarl.com/devcon
Access Forever: https://www.accessforever.org
Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy... |