Keydown İle Aynı Arama Listesinden 2 Ayrı Formdan Birine Veri Çekebildim. - 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ığı: Keydown İle Aynı Arama Listesinden 2 Ayrı Formdan Birine Veri Çekebildim. (/konu-keydown-ile-ayni-arama-listesinden-2-ayri-formdan-birine-veri-cekebildim.html) Sayfalar:
1
2
|
Keydown İle Aynı Arama Listesinden 2 Ayrı Formdan Birine Veri Çekebildim. - Oğuz Türkyılmaz - 30/01/2019 F_01_TeklifGiris formunda çalıştırdığım F7 fonksiyonu nu F_05_SiparisFormunda da çalıştırmak için nasıl bir revize yapmam gerekir. Teşekkürler. Cvp: Keydown İle Aynı Arama Listesinden 2 Ayrı Formdan Birine Veri Çekebildim. - berduş - 30/01/2019 emin değilim ama yanılmıyorsam "vbkeyreturn" kodu enter tuşuna basıldığında çalışır F7 ile çalışması için vbkeyreturn kodunu vbKeyF7 değiştirmeyi dener misiniz Cvp: Keydown İle Aynı Arama Listesinden 2 Ayrı Formdan Birine Veri Çekebildim. - Oğuz Türkyılmaz - 30/01/2019 (30/01/2019, 13:40)haliliyas yazdı: emin değilim ama yanılmıyorsam "vbkeyreturn" kodu enter tuşuna basıldığında çalışır F7 ile çalışması için vbkeyreturn kodunu vbKeyF7 değiştirmeyi dener misiniz Halil Bey F7 tuşu her iki formda da işlevini yerine getiriyor sorun F7 den sonra firma listesi ekranında arayıp bulduğunuz firmanın değerlerini enter tuşuyla forma çekmek istediğinizde teklif girişde bilgiler geliyor, SiparişGiriş formunda bilgileri getirmek mümkün olmadı. Cvp: Keydown İle Aynı Arama Listesinden 2 Ayrı Formdan Birine Veri Çekebildim. - berduş - 31/01/2019 "F_01_TeklifGiris" formu ile "F_05_SiparisGiris" formunun tuşa basılırken olayını aşağıdaki kodla değişirin _____________________________________________________________ Select Case KeyCode Case vbKeyF7 KeyCode = 0 DoCmd.OpenForm "F_03_FirmaListe", , , , , , Me.Name Case Else End Select _____________________________________________________________ "FirmaListeAF" formunun tuşa basılırken olayını aşağıdaki kodla değişirin _____________________________________________________________ Select Case KeyCode Case vbKeyReturn KeyCode = 0 If (Me.Parent.OpenArgs) = "F_01_TeklifGiris" Then Forms![F_01_TeklifGiris]![cboFirmaKodu] = Me.txtFirmaKodu Forms![F_01_TeklifGiris]![cboFirmaUnvan] = Me.txtFirmaUnvan Forms![F_01_TeklifGiris]![txtKisi] = Me.txtKisi Forms![F_01_TeklifGiris]![txtE_Mail] = Me.txtE_Mail Forms![F_01_TeklifGiris]![txtTelefonNo] = Me.txtTelefonNo Forms![F_01_TeklifGiris]![txtCepNo] = Me.txtCepNo Forms![F_01_TeklifGiris]![txtTedarikciFirma].SetFocus End If If (Me.Parent.OpenArgs) = "F_05_SiparisGiris" Then Forms![F_05_SiparisGiris]![cboFirmaKodu] = Me.txtFirmaKodu Forms![F_05_SiparisGiris]![cboFirmaUnvan] = Me.txtFirmaUnvan Forms![F_05_SiparisGiris]![txtKisi] = Me.txtKisi Forms![F_05_SiparisGiris]![txtE_Mail] = Me.txtE_Mail Forms![F_05_SiparisGiris]![txtTelefonNo] = Me.txtTelefonNo Forms![F_05_SiparisGiris]![txtCepNo] = Me.txtCepNo Forms![F_05_SiparisGiris]![txtHedef].SetFocus End If DoCmd.Close acForm, "F_03_FirmaListe" End Select _____________________________________________________________ Cvp: Keydown İle Aynı Arama Listesinden 2 Ayrı Formdan Birine Veri Çekebildim. - Oğuz Türkyılmaz - 31/01/2019 Halil bey Elinize Sağlık. Sorunum çözülmüş.Teşekkür ederim. Cvp: Keydown İle Aynı Arama Listesinden 2 Ayrı Formdan Birine Veri Çekebildim. - Oğuz Türkyılmaz - 31/01/2019 Me.Parent kodunun buradaki işlevi nedir Halil Bey. |