Form üzerinden çeşitli formlar açmak

Form üzerinden çeşitli formlar açmak - 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ığı: Form üzerinden çeşitli formlar açmak (/konu-form-uzerinden-cesitli-formlar-acmak.html)

Form üzerinden çeşitli formlar açmak - umuttk - 06/05/2009

Sayın arkadaşlar form üzerinde formdaki verilerle eşleşen ilgili formu açmak ve burada yapılacak tahsis işlmeminden sonra ilgili alanları tekrar bu forma aktarılması konusunda yardımcı olursanız sevinirim.

Ayrıntılar ekteki örnek programda var.

Cvp: Form üzerinden çeşitli formlar açmak - ozanakkaya - 06/05/2009

Sert No Tahsis Butonuna aşağıdaki kodu yaz.

Kod:

Private Sub Komut23_Click()

On Error GoTo Err_Komut23_Click



    Dim stDocName As String

    Dim stLinkCriteria As String

    Dim accesstrnet As String

    

    accesstrnet = Left([KULLANICI_KODU], 1)

    

    stDocName = "AYDIN_" & "" & accesstrnet

    stLinkCriteria = "[k_kodu]=" & "'" & Me![KULLANICI KODU] & "'"

    DoCmd.OpenForm stDocName, , , stLinkCriteria



Exit_Komut23_Click:

    Exit Sub



Err_Komut23_Click:

    MsgBox Err.Description

    Resume Exit_Komut23_Click

    

End Sub

koddaki accesstrnet ile KULLANICI_KODU'ndaki TTT'yi T olarak alıp

Kod:

stDocName = "AYDIN_" & "" & accesstrnet

kodu ile AYDIN_T formunu açtırır.

Cvp: Form üzerinden çeşitli formlar açmak - mehmetdemiral - 10/05/2009

Sayın umuttk
4 günden beri sorunuzla ilgili bir yanıt yazmadığınız için size uyarı puanı veriyorum. Ayrıca sorunuz cevaplanmış konulara taşındı.