我在应用服务器写了一个函数其作用是执行存储过程，如附件1 请教各位大哥，怎么 parameters 的 type 没有 string 呢？ 一般是要用哪个 类型代替 string 呢？ 但是我在客户端执行时出现了如附件2的错误（invalid variant operation)，请问我是错在那里呢？ //////////这是应用层的函数 procedure Tlshtest4.procinserttestdbgrid1(sno, name, bz: OleVariant); begin ADOStoredProc1.Close; ADOStoredProc1.ProcedureName:='procinserttestdbgrid'; ADOStoredProc1.Parameters.Refresh; ADOStoredProc1.Parameters.ParamByName('@sno').Value:=sno; ADOStoredProc1.Parameters.ParamByName('@name').Value:=name; ADOStoredProc1.Parameters.ParamByName('@bz').Value:=bz; ADOStoredProc1.Prepared:=true; ADOStoredProc1.ExecProc; end; //////////这是应用层的函数 //////////这是客户端的调用 procedure TForm1.Button1Click(Sender: TObject); begin DataModule2.DCOMConnection1.AppServer.procinserttestdbgrid1(edit1.Text,edit2.Text,edit3.Text); end; //////////这是客户端的调用 谢谢各位大哥！ 發表人 - lsh998 於 2005/02/21 11:40:57

附件1

引言: 我在应用服务器写了一个函数其作用是执行存储过程，如附件1 请教各位大哥，怎么 parameters 的 type 没有 string 呢？ 一般是要用哪个 类型代替 string 呢？ 但是我在客户端执行时出现了如附件2的错误（invalid variant operation)，请问我是错在那里呢？

用WideString吧, 請自行Debug看看是到了哪一行報錯, 看是不是給的值有問題. <iFrame src="http://www.coss.com.tw/jieshu/sign.htm" width=400 height=105 scolling="NO" border="0"></iFrame> 震江系統(股)公司: http://www.coss.com.tw/ 捷舒軟體設計坊: http://www.coss.com.tw/jieshu/

谢谢 jieshu 大哥，这个问题高定了！ 谢谢！

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.