AccessTr.neTMicrosoft AccessAccess Cevaplanmış Soruları

nesneler kayboluyor

20/12/2012, 16:10

accessman

Kod:
Private Sub Komut205_Click()
On Error GoTo Err_Komut205_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "ADRESTEKILER"
    
    'stLinkCriteria = "[Soyad]=" & "'" & Me![Liste15] & "'"
    stLinkCriteria = "[Soyad]=" & "'" & yenile & "'"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Komut205_Click:
    Exit Sub

Err_Komut205_Click:
    MsgBox Err.Description
    Resume Exit_Komut205_Click
    
End Sub
bu kod ile açılınca normalde görüler listeler görünmez oluyor
formun veri kaynağını
Kod:
SELECT hasta.Soyad FROM hasta GROUP BY hasta.Soyad ORDER BY hasta.Soyad;
yapınca kayboluyor
neden acaba
21/12/2012, 16:47

Seruz

Örnek dosyayı görmeden zor.
Kodun içerisinde yenile diye bir değişken var, onun değerini görmek lazım.
başında me. olmadığı için yanlış konulmuş gibi duruyor.

docmd.openform 'dan önce 
msgbox stLinkCriteria
şeklinde verilen kriterin değerini görmeniz lazım.
21/12/2012, 16:53

Seruz

Aşağıdaki yazımı okuyup, yöntemi öğrenirseniz,
bu tür problemleri kodun adım adım çalışmasını takip ederek, çok daha rahat şekilde kendiniz çözebilirsiniz.

BreakPoint Kullanımı ile adım adım çalıştırma