MERHABA ÜSTADLAR

ŞU ŞEKİLDE KOD HAZIRLADIM


Private Sub Komut52_Click()
On Error Resume Next
CurrentDb.Execute "update 2_c)_SORMALZEME_MONTAJ set malzeme_yüzdeli = malzeme_birim_tl + malzeme_birim_tl/1000*" & Me.Metin58
Me.Refresh
End Sub

2_c)_SORMALZEME_MONTAJ ' TABLOMUN ADI

malzeme_yüzdeli ' YÜZDESİ ALINDIKTAN SONRA KAYDEDİLECEK YER AYNI TABLODA
malzeme_birim_tl ' YÜZDESİ ALINAN VERİ AYNI TABLODA

FAKAT KOD İŞLEMİYO. HATAYI BUKLMAADIM
YARDIMCI OLABİLİR MİSİNİZ


SAYGILARIMLA

Merhaba hatayı bulamadım ama bence güncelleştirme sorgusuyla yaparsan daha kolay olur kodla uğraşmamış olursun.

(21-04-2010, 12:39)dreamt demiş ki: Merhaba hatayı bulamadım ama bence güncelleştirme sorgusuyla yaparsan daha kolay olur kodla uğraşmamış olursun.

GÜNCLLEŞTİRME SORGUSU HAKKINDA ÖRNEK VEREBİLİR MİSİNİZ

Merhaba; örneği ekliyorum...

merhaba ilginiz için teşekkürler inceliyorum




saygılar

KOLAY GELSİN ÜSTADLAR

ACCESS İN YENİ BİR YANINI KAŞFETTİM ACABA OLMUYOR MU YOKSA BENDE Mİ HATA VAR.

BİR SORGUM VAR TABLODAN VERİ ALIP FORMDAKİ AÇILAN KUTUDAN VERİ SÜZDÜRÜYO. BU SORGU ÜZERİNDEN UPDATE YAPTIRIYORUM BİR SÜTUNDAKİ VERİYİ ALIP % EKLEYİP YAN SÜTUNA YAPIŞTIRIYO. DERDİM EĞER SORGUYA SÜZDÜRME YAPTIRIRSAM BU SORGU UPDATE YAPMIYO SÜRDÜRME YAPTIRMADAN SADECE SORGU OLURSA YAPIYO. KOD BURDA NEDENİ NİDİR YAPTIRMANIN Bİ YOLU VARMI. İLGİNİZİÇİN TEŞEKKÜRLER.

Private Sub Komut52_Click()
On Error Resume Next
CurrentDb.Execute "update sorgu1 set yüzde = fiyat + fiyat/1000*" & Me.Metin58
Me.Refresh
End Sub

SORGU DAKİ TÜR BÖLÜMÜNE
Like "*" & [Forms]![ARONİZAM]![Açılan Kutu29] & "*"
YANİ SADECE TÜRÜNÜ SECTİĞİM FİYATLARIN % SİNİ DEĞİŞTİRSİN.

SANIYORUM ANLATABİLDİM.
BUNU YAPABİLİRSEM ASIL PROGRAMIM NERDEYSE BİTMİŞ OLACAK.