W
wangqinyun2000
Unregistered / Unconfirmed
GUEST, unregistred user!
主项数据
4753 人头马套餐
细项数据
4753 人头马一瓶
4753 果盘一份
4753 小吃一份
4753 纸巾一包
主项数据
4755 XO套餐
4756 sdfo
4786 sofsdf
用adoquery1,adoquery2,frDBDataSet1,frDBDataSet2,frReport1 做
在主数据ADOQuery1写了以下代码
procedure TForm1.ADOQuery1AfterScroll(DataSet: TDataSet);
VAR X:STRING;
begin
X:=ADOQUERY1.FieldByName('SNO').AsString;
FORM1.ADOQuery2.Close;
ADOQUERY2.SQL.Clear;
ADOQUERY2.SQL.Add('select SKC.SNO,SKC.SKC,SKC.SL from skc WHERE SKC.SNO='+#39+X+#39);
ADOQUERY2.Open;
end;
最后三条无法显示
4755 XO套餐
4756 sdfo
4786 sofsdf
adoquery2 明细表中没有数据
那位大哥帮忙看看
4753 人头马套餐
细项数据
4753 人头马一瓶
4753 果盘一份
4753 小吃一份
4753 纸巾一包
主项数据
4755 XO套餐
4756 sdfo
4786 sofsdf
用adoquery1,adoquery2,frDBDataSet1,frDBDataSet2,frReport1 做
在主数据ADOQuery1写了以下代码
procedure TForm1.ADOQuery1AfterScroll(DataSet: TDataSet);
VAR X:STRING;
begin
X:=ADOQUERY1.FieldByName('SNO').AsString;
FORM1.ADOQuery2.Close;
ADOQUERY2.SQL.Clear;
ADOQUERY2.SQL.Add('select SKC.SNO,SKC.SKC,SKC.SL from skc WHERE SKC.SNO='+#39+X+#39);
ADOQUERY2.Open;
end;
最后三条无法显示
4755 XO套餐
4756 sdfo
4786 sofsdf
adoquery2 明细表中没有数据
那位大哥帮忙看看