вопрос по переменной?

Ruff32
Дата: 09.11.2009 08:29:08
Ситуация:
в таблице есть поле ID, есть blob-поле. База соединена через obdc с mysql, в котором есть хранимая процедура , задача которой сохранять значение blob-поля с полученный id в файл.
call zagruzka (p) и получаю нужный мне файл.
на форме есть кнопка, которая вызывает эту хнанимую процедуру.

вопрос: как мне получить для переменной p значение id и вызвать хранимую процедуру на серверу mysql?

пока имею вот что:
Private Sub load_Click()
On Error GoTo Err_load_Click
    Dim stDocName As String
    stDocName = "ur1" *ur1 это запрос в access вида call zagruzka() (пока без параметра, именно сюда надо передавать id)*
    DoCmd.OpenQuery stDocName, acNormal, acEdit
Exit_load_Click:
    Exit Sub
Err_load_Click:
    MsgBox Err.Description
    Resume Exit_load_Click
End Sub
П-Л
Дата: 09.11.2009 08:51:38
Запрос к серверу и CurrentDb.Execute ФЫ1
Ruff32
Дата: 09.11.2009 10:37:10
можно это кодом пояснить?
ё
Дата: 09.11.2009 10:54:29
Ruff32
можно это кодом пояснить?


запросто
Ruff32
Дата: 10.11.2009 08:15:29
CurrentDb.QueryDefs("ur1").SQL = "Call zagruz(1)"

*как правильно написать вместо 1 в вызове процедуры переменную p?*
mds_world
Дата: 10.11.2009 08:39:22
CurrentDb.QueryDefs("ur1").SQL = "Call zagruz(" & p & ")"
Ruff32
Дата: 10.11.2009 08:44:05
нет, так не меняет запрос...
Ruff32
Дата: 10.11.2009 08:49:57
в даный момет это имеет такой вид.
Private Sub btn_Click()
On Error GoTo Err_btn_Click
    Dim stDocName As String
    
    Dim rs2 As DAO.Recordset
    Dim p As Byte
    Set rs2 = CurrentDb.OpenRecordset("Ur")
    p = rs2.Fields("id")
    CurrentDb.QueryDefs("ur1").SQL = "Call zagruz(" & p & ")"
    
    stDocName = "ur1"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
Exit_btn_Click:
    Exit Sub
Err_btn_Click:
    MsgBox Err.Description
    Resume Exit_btn_Click
End Sub

Запрос выглядит так:
Call zagruz(1)

но почему-то текст запроса не меняется, хотя должен
mds_world
Дата: 10.11.2009 08:52:17
Ruff32
нет, так не меняет запрос...
Не меняет потому, что сам SQL-текст запроса неверный. Запрос должен включать в себя инструкции SQL, которых в вашем тексте нет.