急急急！！！lotus notes R6.5为何调用不了SQL2000的存储过程？？？

代码如下：
dim con As ODBCConnection
dim rs As ODBCResultSet
dim qry As ODBCQuery

set con = New ODBCConnection
set qry = New ODBCQuery
set result = New ODBCResultSet

if con.ConnectTo("Test") then
'  set qey.Connection = con
'  qry.SQL = "insert into jrno values('111111')"
'  set result.Query = qry
'  call result.Execute
   set rs.Connection = con
   call rs.ExecProcedure("aa")   '调用SQL2000的存储过程aa
end if
call rs.Close(DB_CLOSE)
call conn.Disconnect

SQL2000数据库存储过程aa内容如下：
insert into jrno values('111111')
go

请教各位大侠,为何调用存储过程不成功，但调用
'  set qey.Connection = con
'  qry.SQL = "insert into jrno values('111111')"
'  set result.Query = qry
'  call result.Execute
是成功的。
--------------------编程问答-------------------- 显示rs.GetErrorMessage提示的错误信息为：LS:DO-ODBC could not complete the requested operation.
--------------------编程问答-------------------- 有人知道吗？？？ --------------------编程问答-------------------- 有人知道吗？？？ --------------------编程问答-------------------- 好像没人做过这样的调用。 --------------------编程问答-------------------- call rs.ExecProcedure("aa")  '调用SQL2000的存储过程aa 
这句话有问题,
sql="insert into jrno values('111111')" 
直接用str1=exec sql
qry.sql=str1
set result.Query = qry 
  call result.Execute 
--------------------编程问答-------------------- 楼上，若SQL2000的存储过程不是insert into jrno values('111111')这么简单的话，那该如何处理？ --------------------编程问答-------------------- SetParameter
用这种方式可以，具体的代码你自己试试，我以前写过，不过找不到代码了。

补充：企业软件 ,  Lotus