Mrb.arkadaşlar..
Yapmış olduğum bir çalışma ile ilgili bir sorum olacak,
Konu şu form üzerinde "MÜNFERTİT" ve "ACENTA" seçeneklerini gösteren Rezervasyon formunda bir adet onay (EVET/HAYIR)kutusu var.
Münferit seçtiğimde münferite bağlı olarak Adı Soyadı vs.gelmekte,ACENTA yazdığımda ise ACENTA metin kutusu
firma ve acenta adı vs.gelmekte.Buraya kadar bir sorun yok.
Ancak seçeneklerden her hangi birine kayıt yapıyorum ,ancak tekrar o kaydı açtığımda her iki seçenek birlikte açılıyor,
burada yapılmasını istediğim olay hangi seçeneğe göre kayıt girildiyse o kaydın gelmesi.
Ayrıca Rezerve yapılan oda listesinde hangi odanın hangi seçeneğe göre rezerve edildiğinin gösterilmesi.
(Örnek:Münferit ise Münferit,acente ise acente yazması)

Formun vb sayfasında en alta aşağıdaki kodu ekle.

Sub MunferitAcenta()



If Me.Rezyapan.Value = "-1" Then



Me.Metin265 = ""

    Me.Metin265.Visible = True

    Me.MÜNFERİT.Visible = True

    Me.ACENTA.Visible = False

    Me.Metin267.Visible = False

    Me.Metin265 = "MÜNFERİT"

    Me.Tckimlikno.Visible = True

    Me.Adisoyadi.Visible = True

    Me.Tel2.Visible = True

    Me.sehir1.Visible = True

Me.firmaacentaadı.Visible = False

Me.yetkılıkısı.Visible = False

Me.tel.Visible = False

Me.tel1.Visible = False

Me.adresi.Visible = False

Me.sehir.Visible = False

Me.odasayısı.Visible = False

Else

 

 Me.Metin267 = ""

    Me.Metin267.Visible = True

    Me.MÜNFERİT.Visible = False

    Me.ACENTA.Visible = True

    Me.Metin265.Visible = False

    Me.Metin267 = "ACENTA"

    Me.firmaacentaadı.Visible = True

    Me.yetkılıkısı.Visible = True

    Me.tel.Visible = True

    Me.tel1.Visible = True

    Me.adresi.Visible = True

    Me.sehir.Visible = True

    Me.odasayısı.Visible = True

Me.Tckimlikno.Visible = False

Me.Adisoyadi.Visible = False

Me.Tel2.Visible = False

Me.sehir1.Visible = False

End If

End Sub

Onay Kutusunun güncelleştirme sonrasında olayına yazılan tüm kodu sil, yerine

call MunferitAcenta

kodu ekle,

formun geçerli olduğunda olayınada aşağıdaki kodu ekle

call MunferitAcenta

Hocam emeğinize sağlık Ekledim yalnız eksik bir durum var hocam,kayıt yoksa seçeneklerina çılmaması gerekmezmi
birde Rezerve yapılan odaları gösteren Liste 278 de Rezyapan alana Evet Hayır yerine Münferitmi Acentamı olduğunun gösterilmesi.

Sadece Tablo ve Formu ekliyorum. Kendi uygulamanızdaki tablo ve formu silip dış veri al ile veritabanına aktarırsın.

Hocam çok tşk.ederim,emeğinize sağlık.Sorum çözülmüştür.