а какая версия Акксесса?
если Access97 или Access2000(mdb) то это
через pass-through query - 2 способами : либо через .InputParameter
либо динамически собирать sql строку
в adp можно так писать exec spTest @=Forms!Tabel.GM ;
а где ты продуру вызываешь?

я в 97 вот так делаю:
Set qdf = DB.QueryDefs("Q_UpIturanSnif")
qdf.Connect = "ODBC;DSN=ITURAN;UID=" & UserName() & ";DATABASE=ITURAN;Network=DBMSSOCN;Trusted_Connection=Yes"
qdf.SQL = " "
qdf.SQL = " declare @DateM datetime" & Chr(13) & Chr(10)
qdf.SQL = qdf.SQL & " set @DateM="
qdf.SQL = qdf.SQL & "'" & QdfDateSQL & "'" & Chr(13) & Chr(10)
qdf.SQL = qdf.SQL & " exec dbo.GetSnifNew @DateM"
qdf.Execute
qdf.CLOSE
Set qdf = Nothing

это из-за того что параметр -дата
а для тебя
qdf.SQL = " "
qdf.SQL = " exec dbo.GetSnifNew" & [Forms]![tabel].[Ksp1]