ورود

View Full Version : سوال: چگونه مي شود اطلاعات يك جدول را در جدول ديگر كپي كرد.



farhadkarimi
جمعه 14 مهر 1391, 09:59 صبح
سلام
چگونه مي شود اطلاعات يك جدول BDE را در جدول ديگر كپي كرد؟ من كد زير را نوشتم چرا جواب نمي دهد اگر راه بهتري هست راهنمايي كنيد؟

mkh2.open;
mkh2.edit;


while(not(mkh1.Eof))do
begin
mkh2.FieldValues['row']:=mkh1.FieldValues['row'];
mkh2.FieldValues['name']:=mkh1.FieldValues['name'];
mkh2.FieldValues['thickness']:=mkh1.FieldValues['thickness'];
mkh2.FieldValues['length']:=mkh1.FieldValues['length'];
mkh2.FieldValues['wide']:=mkh1.FieldValues['wide'];
mkh2.FieldValues['diameter']:=mkh1.FieldValues['diameter'];
mkh2.FieldValues['metraj']:=mkh1.FieldValues['metraj'];
mkh2.FieldValues['material']:=mkh1.FieldValues['material'];
mkh2.FieldValues['mass']:=mkh1.FieldValues['mass'];
mkh2.FieldValues['standard']:=mkh1.FieldValues['standard'];
mkh2.Next;
mkh1.Next;
end;

سعید صابری
جمعه 14 مهر 1391, 11:15 صبح
باید اینجوری بنویسی

mkh1.open;
mkh2.open;


while(not(mkh1.Eof))do
begin
mkh2.append;
.
.
.
mkh2.post
mkh1.Next;
end

fahimi
جمعه 14 مهر 1391, 16:58 عصر
از طریق SQL با Query زیر هم می توانی


ADOQuery.Close;
ADOQuery.Sql.Clear;
ADOQuery.Sql.Add(SELECT * INTO mkh2 FROM mkh1);
ADOQuery.ExecSQL;