Private Sub SC_VERENK_DblClick(Cancel As Integer)
On Error GoTo Err_Komut2_Click
Dim stDocName As String
Dim kriter As String
kriter = Me.ID
stDocName = "KIRACI_KAYIT"
DoCmd.OpenForm stDocName, , , "ID=" & kriter
Exit_Komut2_Click:
Exit Sub
Err_Komut2_Click:
MsgBox Err.Description
Resume Exit_Komut2_Click
End Sub
yalnız CARI_KOD a göre yapamıyorum.
cari kodlarım karışık mesela MUSTERI-2010 102 01 0008 13A13 cari koda göre nasıl kayıt getirtebilirmyardımcı olursanız çok memnun olurum
