1

Konu: insert into kullanımı

herkese merhaba,
aşağıdaki gibi bir kod yazdım fakat   alias 'text8' is not found  hatası veriyor,
insert into komutunda hem bir cursorden hemde textboxlardan veri ekleyemezmiyim

WITH thisform
INSERT into crssevk ( kod,tanim,cikis,fiyat,isk1,isk2,isk3,;
netfiyat,kdv,grtutar,reskdv,grtoplam,;
resmiktar,restutar,restoplam,sipno,tarih,termin,ckod,kayit);
select kod,tanim,.text8.value,.text2.value,.text3.value,.text4.value,;
.text5.value,.text9.value,.text10.value,.text11.value,.text12.value,;
.text7.value,.text13.value,.text14.value,sipno,tarih,termin,ckod,kayit from crssec
ENDWITH

birde eski forumdaki konuların buraya aktarılması ile ilgili bir gelişme yokmu, bu yazmış olduğum konuyla ilgili birçok örnek vardı orda.but tür basit şeyler sorarak kimsenin vaktini almayalım

Kader, beyaz kağıda sütle yazılmış yazı
Elindeyse beyazdan, gel de sıyır beyazı. (NFK)

2

Re: insert into kullanımı

yanlış değilse böyle olması gerekiyor.

Visual Fox Pro
INSERT into crssevk ( kod,tanim,cikis,fiyat,isk1,isk2,isk3,;

netfiyat,kdv,grtutar,reskdv,grtoplam,;
resmiktar,restutar,restoplam,sipno,tarih,termin,ckod,kayit);
VALUES (crssec.kod,crssec.tanim,thisform.text8.value,thisform.text2.value,thisform.text3.value,thisform.text4.value,;
thisform.text5.value,thisform.text9.value,thisform.text10.value,thisform.text11.value,thisform.text12.value,;
thisform.text7.value,thisform.text13.value,thisform.text14.value,crssec.sipno,crssec.tarih,crssec.termin,crssec.ckod,crssec.kayit)
Bilmediğin Neyse Yanıldığındır.

3

Re: insert into kullanımı

o şekilde kullanmadım çünkü formda texboxların yanısıra grid de görüntülediğim bir cursor de bilgiler var onlarıda almalıyım o yüzden öyle yazdım

Kader, beyaz kağıda sütle yazılmış yazı
Elindeyse beyazdan, gel de sıyır beyazı. (NFK)

4 Son düzenleyen, taRKan (17.11.2006 18:33:16)

Re: insert into kullanımı

Merhaba,

Select komutu içinde obje kullanılmıyor diye biliyorum. Dolayısıyla thisform vb objeler kullanılığında onların birer cursor ya da table olduğunu varsayıyor. Bu yüzden text'lerin değerlerini bir değişkene aktarıp kullanabilirsin.

Visual Fox Pro
Local lcDeger1 As String, lnDeger2 As Double

 
With ThisForm
    m.lcDeger1 = .txtDeger1.Value
    m.lnDeger2 = .txtDeger2.Value
EndWith
 
Select *, ;
        Cast(m.lcDeger1 As C(20)) As cDeger1, ;
        Cast(m.lnDeger2 As B(2)) As nDeger2 ;
    From curVeri ;
    Into Cursor queSonuc
/o---------------------o\
     www.haser.com
\o---------------------o/

5

Re: insert into kullanımı

textboxları değişkene aktarınca sorun çözülüyor,
gerçi kodda hata yapmışım insert into komutunu bu şekilde kullanınca cursordeki tüm kayıtları ekliyor bunu unutmuşum smile kodu mrduyar'ın yazdığı şekle çevirdim

Kader, beyaz kağıda sütle yazılmış yazı
Elindeyse beyazdan, gel de sıyır beyazı. (NFK)