同一个存储过程，在桌面下正常，在web service下却出错？

[kmfangxun]

同一个存储过程，在桌面下正常，在web service下却出错？

如下，其中strMemo为Text类型，数据库服务器为MS SqlServer2000。

出错提示：External exception EEFFACE

//------------------------------------------------------------------------
String sql= " Create Procedure GetMemoOfStudent "
" @Name varchar(100) as "
" select Name,strMemo from Student "
" Where =@Name ";

Query->Close();
Query->SQL->Text=sql;
Query->ExecSQL();


adoStoredProc->Close();
adoStoredProc->ProcedureName="GetMemoOfStudent";
adoStoredProc->Parameters->AddParameter();
adoStoredProc->Parameters->Items[0]->Name = "Name";
adoStoredProc->Parameters->Items[0]->DataType = ftString;
adoStoredProc->Parameters->Items[0]->Direction = pdInput;
adoStoredProc->Parameters->Items[0]->Value = "大刘";

String strMemo;
adoStoredProc->Prepared ;
adoStoredProc->Open();
strMemo=adoStoredProc->FieldByName("strMemo")->Value;
adoStoredProc->Close();

[Red_angelX]

怪异 帮顶

[constantine]

不懂，路过一下

[CEdward]

Web Service 下出什么错，有什么出错信息？
在两个程序下的调用方式都相同吗？数据库都相同吗？
你给的信息太少了。

[kmfangxun]

To: CEdward(桃树叶)

数据库都相同(Sql Server2000),表为：Student，比如有字段：id ,Name,strMemo;

建一个存储过程：
" Create Procedure GetMemoOfStudent "
" @Name varchar(100) as "
" select Name,strMemo from Student "
" Where Name=@Name ";


在桌面应用程序中一切正常：
void __fastcall TfrmClient::btnGetMemoClick(TObject *Sender)
{
adoStoredProc->Close();
adoStoredProc->ProcedureName="GetMemoOfStudent";
adoStoredProc->Parameters->AddParameter();
adoStoredProc->Parameters->Items[0]->Name = "Name";
adoStoredProc->Parameters->Items[0]->DataType = ftString;
adoStoredProc->Parameters->Items[0]->Direction = pdInput;
adoStoredProc->Parameters->Items[0]->Value = "大刘";

String strMemo;
adoStoredProc->Prepared ;
adoStoredProc->Open();
strMemo=adoStoredProc->FieldByName("strMemo")->Value;
adoStoredProc->Close();
ShowMessage(strMemo);
}

//建一个Web service,在Web服务程序的接口中，建一个接口的函数如下，那么在客户端调用该函数时出错，出错提示：External exception EEFFACE

String STDMETHODCALLTYPE TWebSrv::GetMemoOfStudent(String Name)
{
adoStoredProc->Close();
adoStoredProc->ProcedureName="GetMemoOfStudent";
adoStoredProc->Parameters->AddParameter();
adoStoredProc->Parameters->Items[0]->Name = "Name";
adoStoredProc->Parameters->Items[0]->DataType = ftString;
adoStoredProc->Parameters->Items[0]->Direction = pdInput;
adoStoredProc->Parameters->Items[0]->Value = Name;

String strMemo;
adoStoredProc->Prepared ;
adoStoredProc->Open();
strMemo=adoStoredProc->FieldByName("strMemo")->Value;
adoStoredProc->Close();

return strMemo;

}

[CEdward]

String strMemo;
...
return strMemo;

是不是这样return在函数内声名的字段有问题？

[FFSB]

adoStoredProc->Parameters->Items[0]->Value = Name;
try =>>adoStoredProc->Parameters->Items[0]->Value = WideString(Name);

[kmfangxun]

to :FFSB()...()


应该不是这个问题，调试时出错在

strMemo=adoStoredProc->FieldByName("strMemo")->Value; //strMemo为备注字段Text

经测试，即使把strMemo改为VarChar字段，同样也不行。

[FFSB]

adoStoredProc->RecCount是多少

[kmfangxun]

to :FFSB()...()

不好意思，说错了，

应该在 adoStoredProc->Open()就出错了;所以adoStoredProc->RecordCount没法得知。

[lurel]

关注一下，好久没碰BCB了。

[kmfangxun]

to: FFSB()...()

adoStoredProc->Parameters->Items[0]->Value = WideString(Name);
=================================================================

试过了，同样的不行。

[FFSB]

好的
adoStoredProc->Parameters->Items[0]->Value = Name;
try =>>adoStoredProc->Parameters->Items[0]->Value = WideString(Name);