输入输出的存储进程

请看以下存储进程：

/*SP2*/

CREATE PROCEDURE DBO.DELUSERALL

AS

SET NOCOUNT ON

BEGIN

DELETE FROM DBO.[USERINFO]

END

GO

该存储进程删去USERINFO表中的所有记录，没有任何输入及输出，调用方法与上面讲过的基本相同，只是不用取得记录集：

'**通过COMMAND对象调用存储进程**

DIM MYCOMM

SET MYCOMM = SERVER.CREATEOBJECT("MAND")

MYCOMM.ACTIVECONNECTION = MYCONSTR 'MYCONSTR是数据库连接字串

MANDTEXT = "DELUSERALL" '指定存储进程名

MANDTYPE = 4 '表明这是一个存储进程

MYCOMM.PREPARED = TRUE '要求将SQL命令先行编译

MYCOMM.EXECUTE '此处不必再取得记录集

SET MYCOMM = NOTHING

当然也可通过CONNECTION对象或RECORDSET对象调用此类存储进程，不过建立RECORDSET对象是为了取得记录集，在没有返回记录集的情况下，还是利用COMMAND对象吧。