关于asp调用oracle存储过程的问题

关于asp调用oracle存储过程的问题

oracle存储过程如下

create or replace procedure PROC_GIFT_TEST(v_charge out varchar2)
is

begin
  select mame into v_charge from gift_type where gift_id=1001 ;
end PROC_GIFT_TEST;

在PL/SQL中测试返回:

sql>variable aaa varchar2(100);
sql>exec proc_gift_test(:aaa);

PL/SQL procedure successfully completed
aaa
---------
奖励

sql>print aaa;

aaa
---------
奖励


asp中调用脚本（adovbs.inc已包含在asp中）   
〈%
    Dim aaa
        
    set theconn=server.createobject("adodb.connection")
    connstr="Provider=OraOLEDB.Oracle;data source=ora;user id=gift;password=gift;"
   
    theconn.open connstr

    set cmd=server.createobject("adodb.command")
    cmd.activeconnection=theconn
    CMD.CommandType=4
   
    cmd.commandtext="PROC_GIFT_TEST"
    cmd.parameters.append cmd.createparameter(v_charge,adVarChar,AdParamOutput,100)
  
   
    cmd.execute ,,adExecuteNoRecords  
   
   
    aaa=cmd.parameters(v_charge)
   
    CMD.ActiveConnection=Nothing
    set cmd=nothing     
     
    theconn.close
  %〉

现在我的目的是通过asp将proc_gift_test过程的输出参数送到变量aaa中（得到aaa=奖励），在调试aaa=cmd.parameters(v_charge)时，老是出错，提示：

Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

ADODB.Command 错误 '800a0cc1'

项目在所需的名称或序数中未被发现。

/out.asp，行30


请教高手，我该如何操作该过程的输出参数应用到asp中来，急求赐教。谢谢！！！