Private Sub Komut63_Click()
On Error GoTo Komut63_Err
With CodeContextObject
DoCmd.OpenForm "frmresim", acNormal, "", "[ID]=" & .Kimlik, , acNormal
End With
Komut63_Exit:
Exit Sub
Komut63_Err:
MsgBox Error$
Resume Komut63_Exit
End Sub
forma çoklu resım ekleme
Konuyu Okuyanlar: 1 Ziyaretçi