You should not expect VisualBasic behavior in Perl. You have to be
punctilious for each paranthesis and braces.
Try to create a separate scalar var for say $objParam like this (that saves
some typing):
$objParam = $objCmd->Parameters;
$objParam->Append($objCmd->CreateParameter("val", adChar,
adParamInput,25, "Dcitionnaire"));
Don't omit the direction parameter (adParamInput or adParamOutput or
adParamInputOutput etc).
-- Rex
> -----Original Message-----
> From: mb [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, February 13, 2002 5:00 PM
> To: [EMAIL PROTECTED]
> Subject: ADO syntax
>
>
> Hi all,
>
> can some one tells me what is wrong with that :
>
> $Conn->Execute("create procedure textproc \@val varchar(25)
> as select AR_Ref ,AR_Design from F_Article where AR_design
> like \@val");
> $cmd->{ActiveConnection} = $Conn;
> $cmd->{CommandText} = "{call textproc (?)}";
> $cmd->Parameters->Append $cmd->CreateParameter("val",
> adChar, ,25, "Dcitionnaire");
> $rs = $cmd->Execute();
> while (! $rs->EOF) {
> $XXX = $RS->Fields(0)->value;
> $YYY = $RS->Fields(1)->value;
> print $XXX;
> print $YYY;
> $rs->MoveNext;
> }
> it seem not apreciate the append to the command text.
>
> syntax error at c:/phpweb/cgi-bin/chercherlivre.cgi line 92,
> near "->Append $cmd"
>
> thanks a lot,
> asma
>
>
>
>
