Merhaba,
Şimdi ilk kodunuzu aşağıya alalım.
Kod: Tümünü seç
while not qsecilentable.Eof do
begin
with yenitable do
begin
close;
sql.Clear;
sql.add('insert into '+edit1.text+' ( stok_no , stok_adi,katalog_kodu , ');
sql.add('katalog_adi , kdvsiz_fiyat,para_birimi)');
sql.add('values('''+qsecilentable.FieldValues['B']+''',');
sql.add(''''+qsecilentable.FieldValues['F']+''',');
sql.add(''''+qsecilentable.FieldValues['A']+''',');
sql.add(''''+qsecilentable.FieldValues['A']+''',');
sql.add(''''+qsecilentable.FieldValues['H']+''',');
sql.Add(''''+qsecilentable.FieldValues['M']+''') ');
// sql.add(' '+qsecilentable.FieldValues['fiyat_degisim_tarihi']+')');
ExecSQL;
end;
qsecilentable.Next;
end;
buradaki
Kod: Tümünü seç
sql.add(''''+qsecilentable.FieldValues['F']+''',');
kodu yerine aşağıdaki kodu yazın.
Kod: Tümünü seç
sql.add(QUOTEDSTR(qsecilentable.FieldValues['F'])+',');
baştaki ve sondaki tırnakları sildik. Yukarıdakinin aynısını yaparsanız. Sarnırım sorununuz çözülmüş olur.
Burada tırnaklı olunca sanırım siz quotedstr nin quotedstrsini alıyorsunuz gibi bir şey oluyor.
Ayrıca bana gönderdiğiniz örneklerde siz tabloyu oluştururken küçük harfle oluşturuyorsunuz. O yüzden insert veya update yi küçük harfle kullanabiliyorsunuz.
Bana gönderdiğiniz programı kullanamadım. Çünkü farklı bileşenler vardı. Ama dosyanızı datapump ile sql servera atıp ben de sizinki gibi kaynak sql serverde yeni dosya c: de olacak şekilde ayarladım.
Kolay gelsin.
