اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

الاخوة الاعزاء لديا جدول في اكسس فيه  الموظفين وبيانتهم ، وكذلك مجلد خارج القاعدة بصور الموظفين، كل صورة محفوظة برقم الموظف في النظام
ولا كن المشكلة ان الصور ليست مكتملة ، وأريد أن احدد في الجدول من لدية صورة ومن لا يوجد لديه 
او إدراج رابط الصورة لمن لدية صورة في عمود في الجدول 

او تحديد في الجدول لمن يتم التقاط صورة له بعد الالتقاط مباشرتا لمن سيتم التقاط صورة له ، علمان اني قمت بعمل نظام يقوم بالتقاط الصورة منه وحفظ الصورة  في مجلد برقم الموظف ولاكن لا يتم تحديد في الجدول بل إنه تظهر لي فقط صورة لا يوجد صورة وأردت أن اعمل كشف بمن تم الالتقاط لهم صور
اذا تكرمتو للضرورة

  • أفضل إجابة
قام بنشر
4 ساعات مضت, abdah said:

للاسف اعتقد ان هذا المنتدى أصبح فقط للمحترفين 

لاننا لسنا محترفين يجب عليك تزويدنا بمثال لنفهم ما تريد ..... على كل حال هذا الكود يقوم بالمطلوب .... 

On Error Resume Next
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim x, z As String
    
    Set rs = CurrentDb.OpenRecordset("Table")
    
    If Not rs.BOF And Not rs.EOF Then
        rs.MoveFirst
        While (Not rs.EOF)
        
        x = rs!key
        rs.Edit
        rs!PicPath2 = Application.CurrentProject.Path & "\" & "Pictures" & "\" & x
        rs.Update

            rs.MoveNext
        Wend
    End If
    rs.Close
    Set rs = Nothing

DoCmd.Requery
MsgBox "تم التعديل"

 

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information