Jedino do sad što sam uspeo jeste to da kod:
sam modifikovao u:
i na osnovu:
što je sastavni deo:
dobio sledeće u query.txt:
Koliko shvatam, sad je prihvatio punjenje ali neće da memoriše u tabelu. Kaže lepo:
A 'Osoba' je tabela u koju se treba memorisati?!!!
Code:
for i:=1 to FilterList.Count-1 do begin
if temp='' then
temp:=' '''+FilterList.Strings[i]+''' '
else
temp:=temp+', '''+FilterList.Strings[i]+''' ';
if temp1='' then
temp1:=' '''+eFieldsList[i].Text+''' '
else
temp1:=temp1+', '''+eFieldsList[i].Text+''' ';
for i:=1 to FilterList.Count-1 do begin
if temp='' then
temp:=' '''+FilterList.Strings[i]+''' '
else
temp:=temp+', '''+FilterList.Strings[i]+''' ';
if temp1='' then
temp1:=' '''+eFieldsList[i].Text+''' '
else
temp1:=temp1+', '''+eFieldsList[i].Text+''' ';
sam modifikovao u:
Code:
for i:=1 to UnosOsoba.FilterList.Count-1 do begin
if temp='' then
temp:=' '''+UnosOsoba.FilterList.Strings[i]+''' '
else
temp:=temp+', '''+UnosOsoba.FilterList.Strings[i]+''' ';
if temp1='' then
temp1:=' '''+UnosOsoba.eFieldsList[i].Text+''' '
else
temp1:=temp1+', '''+UnosOsoba.eFieldsList[i].Text+''' ';
end;
for i:=1 to UnosOsoba.FilterList.Count-1 do begin
if temp='' then
temp:=' '''+UnosOsoba.FilterList.Strings[i]+''' '
else
temp:=temp+', '''+UnosOsoba.FilterList.Strings[i]+''' ';
if temp1='' then
temp1:=' '''+UnosOsoba.eFieldsList[i].Text+''' '
else
temp1:=temp1+', '''+UnosOsoba.eFieldsList[i].Text+''' ';
end;
i na osnovu:
Code:
UnosOsoba.ADOOsobaUn.SQL.SaveToFile('query.txt');
UnosOsoba.ADOOsobaUn.SQL.SaveToFile('query.txt');
što je sastavni deo:
Code:
UnosOsoba.ADOOsobaUn.Close;
UnosOsoba.ADOOsobaUn.SQL.Clear;
UnosOsoba.ADOOsobaUn.SQL.Add('INSERT INTO Osoba (' + temp + ') VALUES (' + temp1 + ')');
UnosOsoba.ADOOsobaUn.SQL.SaveToFile('query.txt');
UnosOsoba.ADOOsobaUn.ExecSQL;
UnosOsoba.ADOOsobaUn.Close;
UnosOsoba.ADOOsobaUn.SQL.Clear;
UnosOsoba.ADOOsobaUn.SQL.Add('INSERT INTO Osoba (' + temp + ') VALUES (' + temp1 + ')');
UnosOsoba.ADOOsobaUn.SQL.SaveToFile('query.txt');
UnosOsoba.ADOOsobaUn.ExecSQL;
dobio sledeće u query.txt:
Citat:
INSERT INTO Osoba ( 'JMBG' , 'IME' , 'PREZIME' ) VALUES ( '2606981890046' , 'Pera' , 'Petrovic' )
Koliko shvatam, sad je prihvatio punjenje ali neće da memoriše u tabelu. Kaže lepo:
Citat:
Invalid Object name 'Osoba'
A 'Osoba' je tabela u koju se treba memorisati?!!!
Potpis
Someone's sitting in the shade today because someone planted a tree a long time ago.