>Я честно говоря хочу ADP сделать.
Я в таких случаях делаю гибрид
создаю на локальной машине временный MDB
Set dbe = New DAO.DBEngine
On Error Resume Next
Kill CurrentProject.Path + "\__tmp.mdb"
Set db = dbe.Workspaces(0).CreateDatabase(CurrentProject.Path + "\__tmp.mdb", dbLangGeneral)
в нем запрос к серверу
Set q = db.CreateQueryDef("spq")
q.Connect = "ODBC;DRIVER={SQL Server};SERVER=" + GetServerName() + ";DATABASE=" + GetDBName() + ";Trusted_Connection=yes;dsn=;"


и сливаю его в локальную таблицу

q.SQL = "exec dbo.МояХП '" + DateFormat(dtGetDateBeg()) + "','" + DateFormat(dtGetDateEnd()) + "'"
q.Close
db.Execute "select * INTO TmpWr from spq"
На ней откравается DAO рекордсет
Set GetDAORowSourse = db.OpenRecordset("SELECT * FROM TmpWr")
а на нем форма в ADP
Set Me.Recordset = GetDAORowSourse

для любителей локальной фильтрации
с агрегирующими полями просто песня :)

> фишка должна стоять на открытии формы в ADP?
Да
Еще небольшой код для обновления с сохранением сортировок и фильтров
Если хочеш могу дать полный код
Поменяеш только имя источника и параметры.