AccessTr.neT

(05/12/2009, 19:09)ayhan2122 yazdı: [ -> ]Sn hezarfen70;
Dikkat edin, Isin_Turu alanında sayı saklıyorsunuz

Kod:

Select Case Nz(Isin_Turu, 0)
    Case 1
        Alt29.SourceObject = "Ambalaj"
        Alt29.LinkMasterFields = "Is_Kodu"   'Üst Formdaki Alan
        Alt29.LinkChildFields = "Is_Kodu"    'Alt Formdaki Alan
    
    Case 2
        Alt29.SourceObject = "Web"
        Alt29.LinkMasterFields = "Is_Kodu"   'Üst Formdaki Alan"
        Alt29.LinkChildFields = "Is_Kodu"    'Alt Formdaki Alan
    
    Case 3
        Alt29.SourceObject = "Baskili"
        Alt29.LinkMasterFields = "Is_Kodu"   'Üst Formdaki Alan
        Alt29.LinkChildFields = "Is_Kodu"    'Alt Formdaki Alan
    
    Case 4
        Alt29.SourceObject = "diger"
        Alt29.LinkMasterFields = "Is_Kodu"   'Üst Formdaki Alan
        Alt29.LinkChildFields = "Is_Kodu"    'Alt Formdaki Alan
    
    Case 0
        Alt29.SourceObject = ""
End Select

Evet işte budur. Evet kardeşim tam istediğim gibi oldu saol, varol ellerine sağlık. Güzel oldu.

Değerli katkı ve paylaşım için emeği geçenlere teşekkür ederim. Saygılar...

Çok yararlandığım ve öğrendiğim bir konu oldu. Sayın benremix'e katılıyorum. Herkese teşekkürler.