D
desertfox007
Unregistered / Unconfirmed
GUEST, unregistred user!
with qyMasterdo
begin
ParamByName('StartPeriodDate').AsString := AStartPeriodDate;
ParamByName('EndPeriodDate').AsString := AEndPeriodDate;
ParamByName('StartCustomerID').AsString := AStartCustomerID;
ParamByName('EndCustomerID').AsString := AEndCustomerID;
end;
上面这段程序是BDE 编写的 在 ADO 里可以写成下面这样吗
with qyMasterdo
begin
Parameters.ParamByName('StartPeriodDate').Value := AStartPeriodDate;
Parameters.ParamByName('EndPeriodDate').Value := AEndPeriodDate;
Parameters.ParamByName('StartCustomerID').Value := AStartCustomerID;
Parameters.ParamByName('EndCustomerID').Value := AEndCustomerID;
end;
这样可以吗 把 .AsString 换为Value 因为老说AsString没有定义。AsFloat 等等其他的类型
也可以这样赋给参数吗?[?][?]
begin
ParamByName('StartPeriodDate').AsString := AStartPeriodDate;
ParamByName('EndPeriodDate').AsString := AEndPeriodDate;
ParamByName('StartCustomerID').AsString := AStartCustomerID;
ParamByName('EndCustomerID').AsString := AEndCustomerID;
end;
上面这段程序是BDE 编写的 在 ADO 里可以写成下面这样吗
with qyMasterdo
begin
Parameters.ParamByName('StartPeriodDate').Value := AStartPeriodDate;
Parameters.ParamByName('EndPeriodDate').Value := AEndPeriodDate;
Parameters.ParamByName('StartCustomerID').Value := AStartCustomerID;
Parameters.ParamByName('EndCustomerID').Value := AEndCustomerID;
end;
这样可以吗 把 .AsString 换为Value 因为老说AsString没有定义。AsFloat 等等其他的类型
也可以这样赋给参数吗?[?][?]