使用ADOStoredProc鎖產生的錯誤訊息 |
|
缺席
|
|
BOSS
中階會員   發表：70 回覆：79 積分：64 註冊：2006-11-01 發送簡訊給我 |
請問各為大大
程式執行時會出現invalid variant type conversion
請問是哪出錯 sp.ProcedureName := 'sp_calcrspfee';
sp.Parameters.Clear;
sp.Parameters.CreateParameter('p1',ftString,pdInput,10,'');
sp.Parameters.CreateParameter('p2',ftString,pdInput,8,'');
sp.Parameters.CreateParameter('p3',ftString,pdInput,7,'');
sp.Parameters.CreateParameter('p4',ftString,pdInput,7,'');
sp.Parameters.CreateParameter('p5',ftString,pdInput,3,'');
sp.Parameters.CreateParameter('p6',ftString,pdInput,11,'');
sp.Parameters.CreateParameter('p7',ftBCD,pdInput,20,0);
sp.Parameters.CreateParameter('p8',ftBCD,pdInputOutput,20,0);
sp.Parameters.CreateParameter('p9',ftInteger,pdInputOutput,20,0); sp.Parameters.ParamByName('p1').Value := fMainCommon.FundId;
sp.Parameters.ParamByName('p2').Value := st05_2.Field.value;
sp.Parameters.ParamByName('p3').Value := st05_1.Field.value;
sp.Parameters.ParamByName('p4').Value := st05_34.Field.value;
sp.Parameters.ParamByName('p5').Value := st05_51.Field.value;
sp.Parameters.ParamByName('p6').Value := st05_3.Field.value;
sp.Parameters.ParamByName('p7').Value := st05_7.Field.value;
sp.Parameters.ParamByName('p8').Value :=0;
sp.Parameters.ParamByName('p9').Value :=0;
sp.ExecProc;
st05_8.Field.AsInteger := sp.Parameters.ParamByName('p8').Value;
st05_9.Field.AsFloat := sp.Parameters.ParamByName('p8').Value/st05_7.Field.Value*100;
sp.Close;
|
|
ko
資深會員 發表：28 回覆：785 積分：444 註冊：2002-08-14 發送簡訊給我 |
BOSS 你好:
引言: sp.Parameters.CreateParameter('@p1',ftString,pdInput,10,''); ... . sp.Parameters.ParamByName('@p1').Value := fMainCommon.FundId; ... . sp.ExecProc; st05_8.Field.AsInteger := sp.Parameters.ParamByName('@p8').Value; sp.Close;
------
====================== 昏睡~ 不昏睡~ 不由昏睡~ |
發表時間：2003-12-17 15:26:24
IP:61.218.xxx.xxx 未訂閱
系統時間：2024-07-03 2:59:43
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |