Здравствуйте, samodelkin, Вы писали:
S>Нужен пример рекордсета, работающего с параметрическим запросом ...
С какой базой-то работаете? С Access'ом?
Dim db As Database, rs As Recordset
Dim qq As QueryDef, Var1 as Integer
Set db = CurrentDb
Set qq = db.QueryDefs("qrtWithParametr")
qq.Parameters("parNumber1") = 1
Set rs = qq.OpenRecordset
var1 = r.Fields(0)
Set rs = Nothing
Set qq = Nothing
Set db = Nothing
Если работаете с ADO, то смотрите в MSDN'e "Command Object Properties, Methods, and Events", "Parameter Object Properties, Methods, and Events".
Успехов, Привет Карандашу, Буратино, Незнайке и другим веселым человечкам
Здравствуйте, Аноним, Вы писали:
А>С какой базой-то работаете? С Access'ом?
С ним родимым. Через MFCшный СRecordset
А>А> Dim db As Database, rs As Recordset
А> Dim qq As QueryDef, Var1 as Integer
А>
А> Set db = CurrentDb
А>
А> Set qq = db.QueryDefs("qrtWithParametr")
А> qq.Parameters("parNumber1") = 1
А> Set rs = qq.OpenRecordset
А> var1 = r.Fields(0)
А>
А> Set rs = Nothing
А> Set qq = Nothing
А> Set db = Nothing
А>
Проблема в том, что есть запрос с параметром в базе данных. Инструкция SQL выглядит примерно так
А>PARAMETERS IntParam Short;
SELECT ExampleTable.IntField, ExampleTable.TextField, ExampleTable.DateField, ExampleTable.FloatField
FROM ExampleTable
WHERE (((ExampleTable.IntField)=[IntParam]))
WITH OWNERACCESS OPTION;
А>
Когда я вызываю его, то инструкция WHERE в код результирующего запроса не включается. Приходится использовать фильтр m_strFilter, что не всегда удобно.
Притом, что когда я делаю {call [Query1] (?)} запись не может быть получена. Поэтому хочется посмотреть, как все это работает на конкретном примере...