それはお金を失う可能性がどのような状況の下で約3ポイントを再生します

[〓⑤⑦⑤⑥⑧③①②〓]招待馬] [①⑤⑧⑧①⑧⑧⑧公式サイトのhct728ポイントC0メートルqryStage.First、SQL Serverクエリ内の//リンク
qryProductivity.First; //外部SQL Serverのクエリへのリンク
しばらくないqryStage.EofまたはqryProductivity.Eof DO / /この文私はの考えに基づい.NET来るエラーがある場合は?
始まる
CDS_Output.Insertは、
CDS_Outputfac.Value:= 'ZD00';
CDS_Outputres.Value:=コピー(cbStage.Text、1、3);
そうでない場合(cbShift。 = TEXT '')を
始める
にStrToInt(cbStage.Textが)[010020030060]は次いで、IF
開始
CDS_Outputarea.Valueを:= '; DFZ-POWER-SMD'
エンド
他の
開始
:DFZ-POWER-SPI '; = CDS_Outputarea.Value'を
終了;
END;
CDS_Outputdate.Value :. = qryStage.fieldbyname( 'outputdate')AsInteger。
CDS_Outputshift.Value:= qryStage.fieldbyname( 'outputPeriod')AsString;
CDS_Outputline.Value:= qryStage.fieldbyname( 'ライン')AsString;。
CDS_Outputlinetype.Value:= qryStage.fieldbyname( 'ライン')AsString;。
CDS_Outputitem.Value:= qryStage.fieldbyname( 'BCNO')AsInteger;。
CDS_Outputmodel.Value:= qryStage.fieldbyname( 'bc_model')AsString;
CDS_Outputpn.Value:= qryStage.fieldbyname( 'bc_part_no')AsString;
CDS_Outputoutput.Value:= qryStage.fieldbyname( 'OutputQty')AsInteger;。

//提取外部服务器SQL资料并显示在グリッド上面
CDS_Outputmanpower.Value:= qryProductivity.fieldbyname( '人材')AsString;。
CDS_Outputlabor.Value:= qryProductivity.fieldbyname( '労働')AsString;
CDS_Outputqa1.Value:
CDS_Outputonoff1.Value:= qryProductivity.fieldbyname( 'ONOFF')AsString;
CDS_Output.Post;
qryStage.Next;
qryProductivity.Next;

終わり;

終わり;
手順Tproductivity.FormCreate(送信者:TObjectを);
開始
CDS_Output.CreateDataSetを。
終わり;

手順Tproductivity.FormClose(送信者:TObjectを、VARの処置:TCloseAction)。
開始
CDS_Output.Destroyを。
終わり;

終わり。


私はラインを分割しています-------- ---------

問題:メインのような場合は、私がしなければならないのである:外部SQLサーバー上のデータと結合されたローカルSQLサーバーの統合に関する情報を抽出することで、グリッドコントロールに表示されます

私は2つの接続、2クエリ、および2台のDSを過ごした。DTicketDatesetを共有。コードとして、問題は確かに存在している、初心者のため、それが問題を見つけることができません。コードの形式は少し問題ですが、また目の肥えたポインティングポインティングを依頼します。(私は上司を嫌いませんが、私はプロのプログラマーでない方法、。どちらか雪Daoshouに学ぶために、学習することはありません。)

おすすめ

転載: www.cnblogs.com/dasf/p/11717272.html