Delphi 2010 ve Delpi XE2 aynı pc üzerinde kullanımı!
Destek talebi(Lütfen oy verelim!)
Sitemiz üye alımına kapatılmıştır!
! CODEBANK 2012 !
İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.
0 Üye ve 1 Ziyaretçi konuyu incelemekte.
procedure TWebForm1.Button1_Click(sender: System.Object; e: System.EventArgs);varFbBaglan: FbConnection;FbKomut: FbCommand;SqlCumlesi: String;begin FbBaglan:= FbConnection.Create(FbConStr); FbBaglan.Open; //SQL Cümlesi oluştur. SqlCumlesi:= 'INSERT INTO TBL_UYELER'+ ' (ADI, SOYADI, TARIH) VALUES '+ ' ('''+TextBox1.Text+ ''','+ ''''+TextBox2.Text+ ''', '''+ SYSTEM.DateTime.Today.ToShortDateString + ''');'; //Command nesnesini oluştur. FbKomut:= FbCommand.Create(SqlCumlesi, FbBaglan); FbKomut.ExecuteNonQuery; FbBaglan.Close;end;
procedure TWebForm1.Page_Load(sender: System.Object; e: System.EventArgs);varFbstr: FbConnectionStringBuilder;begin// bağlantı stringini oluştur.Fbstr:= FbConnectionStringBuilder.Create;Fbstr.DataSource:='localhost';Fbstr.Database:='C:\ILK_ASP.FDB';Fbstr.ConnectionTimeout:=20;Fbstr.UserID:='SYSDBA';Fbstr.Password:='masterkey';Fbstr.Dialect:=3;Fbstr.PacketSize:=4096;Fbstr.Role:= '';Fbstr.Charset:='wIN1254';Result:=FbStr.toString;end;
<connectionStrings><add name="dbim" connectionString="Server=localhost;User=SYSDBA;Password=masterkey;Charset=UNICODE_FSS;Database=F:\sitem\db\sitem.fdb" providerName="FirebirdSql.Data.FirebirdClient" /></connectionStrings>
procedure Tsayfa.b1_Click(sender: System.Object; e: System.EventArgs);vardb:FbConnection;calistir:FbCommand;sql:string;begindb:=FbConnection.Create(ConfigurationManager.ConnectionStrings['dbim'].ConnectionString);db.Open;sql:='INSERT INTO tablom (ALAN1,ALAN2) VALUES('+#39+ALAN1.TEXT+#39+','+#39+ALAN2.TEXT+#39+')';calistir:=FbCommand.Create(sql,db);calistir.ExecuteNonQuery;db.Close;end;