sql de kayıt

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
aydogan46
Üye
Mesajlar: 115
Kayıt: 11 Haz 2003 02:59
Konum: ankara
İletişim:

sql de kayıt

Mesaj gönderen aydogan46 »

....
query2.sql.add('insert into bilgi,ders,not'),
hocam yapmak istediğim şu. bir formda edit kutuları var. bazı kutulardaki
veriler bilgi tablosuna , bazıları ders (bunlar örnektir) tablosuna kayıt edilmeli.( dbase ve sql kullanıyoum).
yukarıdaki gibi kod yazılabilir mi. olmadı da. ilgilenenler varsa sevinirim . hepinize kolya gele.
ayrıca Fahrettin abimize özel selamlarımı iletirim. keşke örnekleri biraz daha çogaltsaydı...
sair
Kıdemli Üye
Mesajlar: 288
Kayıt: 16 Haz 2003 04:41
Konum: Kastamonu
İletişim:

Mesaj gönderen sair »

Aşağıdaki yapıyı aynen kullanın.Sorunsuz çalışacaktır. Field Değerlerine dikkat edin. Params ile aldığını fieldın yapısı edit ile gönderdiğiniz yapıya uymalı. İki string ve bir tanede integer değer düşünerek nasıl yazılması gerektiğini anlattım aşağıda. Bu yapı delphinin tavsiye ettiği yapıdır. Try except bloklarını mutlaka kullanın ki Query bir hata döndürdüğünde program kilitlenmesin ve ne hata geldiğini görebilesiniz.
Sevgiler...

Try
Query2.Close;
Query2.Unprepare;
Query2.SQL.Clear;
Query2.SQL.Add('Insert into tablo_adı (adı,soyadı,telefonu)');
Query2.SQL.Add('Values(a1,a2,a3)');
Query2.Prepare;
Query2.Params[0].Asstring:=Edit1.Text;
Query2.Params[1].Asstring:=Edit2.Text;
Query2.Params[2].AsInteger:=StrToInt(Edit3.Text);
Query2.ExecSQL;
Except
On Except to raise;
End;
Geçip gideriz bizde ağızsız,dilsiz ve sorgusuz
İstanbul gibi düşeriz iki kıtaya birden...
En aşağılık düş, en büyük sevdadan belki
Erkek ölümler; bir uzun iç çekişle büyür göğsümüz
aydogan46
Üye
Mesajlar: 115
Kayıt: 11 Haz 2003 02:59
Konum: ankara
İletişim:

Mesaj gönderen aydogan46 »

tekürler de.
insert into dan sonnra iki (veya daha fazla)tane tablo adı var. örnegin edit1.text teki bilgi x tablosuna, edit2.text teki veride y tablosuna kaydedilmesi gerekiyor. bilmem biraz karışık mı oldu?..
sair
Kıdemli Üye
Mesajlar: 288
Kayıt: 16 Haz 2003 04:41
Konum: Kastamonu
İletişim:

Mesaj gönderen sair »

o zaman 2 Query koy iki tabloyada ayrı ayrı kaydet. bu yazdığım rutini 2 defa peşpeşe yaz iki ayrı tabloya ayrı ayrı kaydet.
Geçip gideriz bizde ağızsız,dilsiz ve sorgusuz
İstanbul gibi düşeriz iki kıtaya birden...
En aşağılık düş, en büyük sevdadan belki
Erkek ölümler; bir uzun iç çekişle büyür göğsümüz
Kullanıcı avatarı
zayfin
Üye
Mesajlar: 24
Kayıt: 19 Haz 2003 07:04
Konum: istanbul
İletişim:

Mesaj gönderen zayfin »

Try
Query2.Close;
Query2.Unprepare;
Query2.SQL.Clear;
Query2.SQL.Add('Insert into tablo_adı (adı,soyadı,telefonu)');
Query2.SQL.Add('Values(a1,a2,a3)');
Query2.Prepare;
Query2.Params[0].Asstring:=Edit1.Text;
Query2.Params[1].Asstring:=Edit2.Text;
Query2.Params[2].AsInteger:=StrToInt(Edit3.Text);
Query2.ExecSQL;
Except
On Except to raise;
End;
***
sair kardeş
zannedersem yukardaki kod da bir hata var
çünkü parametrelerden önce : (iki nokta) konması gerekmiyormu.
:?:
teşekkürler
sağlıcakla kalın
sair
Kıdemli Üye
Mesajlar: 288
Kayıt: 16 Haz 2003 04:41
Konum: Kastamonu
İletişim:

Mesaj gönderen sair »

Ha evet... Doğru teşhis. Her zaman unuturum o uyuz iki noktayı zaten. :!:
Geçip gideriz bizde ağızsız,dilsiz ve sorgusuz
İstanbul gibi düşeriz iki kıtaya birden...
En aşağılık düş, en büyük sevdadan belki
Erkek ölümler; bir uzun iç çekişle büyür göğsümüz
Cevapla