ارسال المعلومات اوتوماتيكيا للقاعدة البيانات

[Ben.Ja]

يبل

PHP كود :

var
i:integer;
for i := 0 to memo1.Lines.Count -1 do
begin
      ADOQuery1.SQL.Clear;
      ADOQuery1.SQL.Add('insert into info values ('+QuotedStr(memo1.Lines[i])+') ');
      ADOQuery1.ExecSQL;
end; 


---

آسف هكذا, هكذا سيكون كل سطر من الmemo في سجل وحده في الجدول

PHP كود :

Var
i:integer;

Begin
for i := 0 to memo1.Lines.Count -1 do
begin
     ADOQuery1.SQL.Clear;
     ADOQuery1.SQL.Add('insert into info values ('+QuotedStr(memo1.Lines[i])+') ');
     ADOQuery1.ExecSQL;
end; 
end;