获取表单的信息通过ext调用规则插到数据库中去

前端的ext: 

function getRelate(){

                  var MoldCataNum = document . getElementById ( "MoldCataNum" ) . value ;
                  var MoldCataName = document . getElementById ( "MoldCataName" ) . value ;
                                  
     var url = "/bpm/linkey_workflow_engine.nsf/WF_RunRule?openagent&RuleNum=RUS010_0001" ;
          Ext . Ajax . request ( {
           url : url ,
           succss : function ( action , response ) {

                  alert ( "success" ) ;
               } ,
    
          failure : function ( ) { alert ( "URL Error." ) } ,
          params : {
                 MoldCataNum : MoldCataNum ,
                 MoldCataName : MoldCataName ,
                             }
         
        } )

  }

规则（lotuscript）

Sub Initialize
On Error Goto errormsg
        dim sql as string
        dim fldLst as new lcfieldList
        dim doc as notesdocument
        MoldCataNum=WF_Document.MoldCataNum(0)
        MoldCataName=WF_Document.MoldCataName(0)
                               
        sql="insert into S010_MoldCata(MoldCataNum,MoldCataName)values('"+MoldCataNum+"','"+MoldCataName+"')"  
  
                call rdb.Connect()
               call rdb.Connect()
       call WF_Con.execute(sql,fldLst) '对数据到数据集fldLst中去
         msgbox "插入成功"          
 
Exit Sub
errormsg:
Msgbox "Rule Error:" & Str(Erl) & "  " & Error
End Sub