السلام عليكم ورحمة الله وبركاته
لدي كود يحفظ صورة من الماسح الضوئي في مكان محدد
Form_imgresivtbl - 1
Private Sub Command45_Click()
Me.sernnoo = Nz(DMax("[sernnoo]", "imgresivtbl")) + 1
Dim Ret As Long, PictureFile As String
PictureFile = "f:\الوارد" & "رقم معاملة & "Me.moamlano & "رقم صفحة &...