درج در بانک sql

من یک بانک در اس کیو ال درست کردم و با دلفی به اون وصل شدم .
با چه دستوراتی باید یک رکورد جدید به بانک اضافه کنم ؟

نقل قول:

---

نوشته شده توسط msda523

من یک بانک در اس کیو ال درست کردم و با دلفی به اون وصل شدم .
با چه دستوراتی باید یک رکورد جدید به بانک اضافه کنم ؟

---

با چه ابزار و چه روشی وصل شدی؟
یکی از روشهای اضافه کردن رکورد با ADO به شکل زیر است.

ADO.Insert;

ADO.FieldByName('FieldNamed').Asstring := Value;

ADO.Post;

می توانی از دستور Insert Into خود SQL هم استفاده کنی
موفق باشید

در ادامه صبحتهای آقای Syndrome استفاده از دستورات sql را میتوانید از کد زیر استفاده کنید.

with Adodataset do

    Begin

     Close;

     CommandText:='insert into tablename([id,name]) Values ('+QuotedStr(txtid.Text)+','+QuotedStr(txtname.Tex  t)+')';

     Execute;

    End;

در ضمن میتونی از Storeprocedure هم استفاده کنی.که اونم مفیده.

وبرای استفاده باید پروسجرتو در Sql بسازی و در دلفی با شی Adostoreproc با پروسیجرت ارتباط برقرار کنی.
یه نمونه از اون هم میزارم

with Adostoredproc1 do

    Begin

      Parameters.ParamByName('@id').Value:=trim(txtid.Te  xt);

      Parameters.ParamByName('@name').Value:=trim(txtnam  e.text);

      Parameters.ParamByName('@family').Value:=trim(txtf  amily.text);

      Parameters.ParamByName('@tel').Value:=trim(txttel.  text);

      ExecProc;

    End;

و این هم درج با شی Adoquery :

var

str1:string;



begin

str1:='insert into tbluser([id],[name],family,tel,mobile,[address],[time],[date]) values ('+QuotedStr(txtid.Text)+','+QuotedStr(txtname.Tex  t)+','+QuotedStr(txtfamily.Text)+','+QuotedStr(txt  tel.Text)+','+QuotedStr(txtmobile.Text)+','+Quoted  Str(txtaddress.Text)+','+QuotedStr(Time1)+','+Quot  edStr(Str3)+')';



  with Adoquery1 do

     begin

       Close;

       SQL.Text:=str1;

       ExecSQL;

     end;

end;

موفق باشید..............