AccessTr.neT
formlar arası koşullu veri aktarımı - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: formlar arası koşullu veri aktarımı (/konu-formlar-arasi-kosullu-veri-aktarimi.html)



formlar arası koşullu veri aktarımı - mehmetb84 - 20/06/2011

MErhaba arkadaşlar;

Veritabanımda bulunan t_hambezgönderilen formunda bulunan;

"giden_hambezmt" alanına yazdığım verinin,aynı formda bulunan "geldigi yer" alanında "depo" yazması halinde; altformda bulunan "gelenmt" alanına aksi halde "gidenmt" alanına aktarılmasını istiyorum.

Bunun için "giden_hambezmt" nin güncelleştirme sonrasında olayına;

IIf([Forms]![t_hambezgönderilen]![t_musteriler alt formu1].Form![giden_geldigiyer] = "DEPO", [Forms]![t_hambezgönderilen]![t_musteriler alt formu1].Form![gelenmt] = Me.giden_hambezmt, [Forms]![t_hambezgönderilen]![t_musteriler alt formu1].Form![gidenmt] = Me.giden_hambezmt)

yazdım fakat, expected: = hatası veriyor, sanırım = ve sonrasına birşey yazmam gerekiyor,case kullanmayı bilmiyorum,yardımcı olursanız seviniirim,tşkler.







Cvp: formlar arası koşullu veri aktarımı - ercansahin - 20/06/2011

Güncelleştirme sonrasında kodunu;
Private Sub giden_hambezmt_AfterUpdate()
Select Case (Me.giden_geldigiyer)
Case "depo"
Forms![t_hambezgönderilen]![t_musteriler alt formu1].Form![gelenmt] = Me.giden_hambezmt
Case Else
Forms![t_hambezgönderilen]![t_musteriler alt formu1].Form![gidenmt] = Me.giden_hambezmt
End Select
End Sub
olarak değiştirin ve deneyin.


Cvp: formlar arası koşullu veri aktarımı - ozanakkaya - 20/06/2011

"giden_hambezmt" nin güncelleştirme sonrasında olayına aşağıdaki kodu kullan.

If Me.giden_geldigiyer = "DEPO" Then
[t_musteriler alt formu1].Form![gelenmt] = Me.giden_hambezmt
Else
[t_musteriler alt formu1].Form![gidenmt] = Me.giden_hambezmt
End If



Cvp: formlar arası koşullu veri aktarımı - mehmetb84 - 20/06/2011

Çok teşekkürler.