iyi akşamlar arkadaşlar
kullanmış olduğum programımda,
aşağıdaki kodu kullanıyorum. bu kodda SURE_DK* '"& ME.PARTOPKG &"'
koduyla standart bir çarpma yapıyor.
benim burada istediğim SURE_TIPI eğer STANDART ise çarpma yapmayıp SURE_DK yı aynen yazacak, değilse SURE_DK*'"& ME.PARTOPKG &"' ile çarpacak.


CurrentDb.Execute "Insert Into husem(PARTI_NO,OPERASYON_KODU, OPERASYON_TIPI, KUMAS_TIPI, RENK_TONU, PROSES_TIPI, SURE_DK, SURE_TIPI,TOPLAM_SURE ) " & _
"SELECT '" & Me.PARTINO & "'," & Me.OPKODU & ", PROSES_TANIMLA.OPERASYON_TIPI,'" & Me.CINS & "', '" & Me.RT & "', PROSES_TIPI, SURE_DK, SURE_TIPI, SURE_DK * '" & Me.PARTOPKG & "' FROM PROSES_TANIMLA WHERE (((PROSES_TANIMLA.OPERASYON_KODU)=" & Me.OPKODU & ")) ORDER BY PROSES_TANIMLA.ID"

(10-01-2017 21:40)husem demiş ki:  aşağıdaki kodu kullanıyorum. bu kodda SURE_DK* '"& ME.PARTOPKG &"'
koduyla standart bir çarpma yapıyor.
benim burada istediğim SURE_TIPI eğer STANDART ise çarpma yapmayıp SURE_DK yı aynen yazacak, değilse SURE_DK*'"& ME.PARTOPKG &"' ile çarpacak.

CurrentDb.Execute "Insert Into husem(PARTI_NO,OPERASYON_KODU, OPERASYON_TIPI, KUMAS_TIPI, RENK_TONU, PROSES_TIPI, SURE_DK, SURE_TIPI,TOPLAM_SURE ) " & _
"SELECT '" & Me.PARTINO & "'," & Me.OPKODU & ", PROSES_TANIMLA.OPERASYON_TIPI,'" & Me.CINS & "', '" & Me.RT & "', PROSES_TIPI, SURE_DK, SURE_TIPI, iif(SURE_TIPI='STANDART', SURE_DK, SURE_DK * '" & Me.PARTOPKG & "') FROM PROSES_TANIMLA WHERE (((PROSES_TANIMLA.OPERASYON_KODU)=" & Me.OPKODU & ")) ORDER BY PROSES_TANIMLA.ID"
olabilir.

RAPORLAMA Yontemleri...SiparisTakip (Takvim=Resmi-Dini-Akti-Hafta sonu tatil**Renkli**)

Fonksiyon veya VBA kod arsivleme ACCESS-SQL kaynakli...ORTAK VERI TABANI (AVT Onarim-Tasarimi)

yardımınız için teşekkür ederim,
iyi çalışmalar.