هل هناك حل لهذا

[نور وحيد]

رغم سرعة ويندز 64 بت عن سرعة ويندز 32 بت الا ان الملفات التى كانت تعمل على ويندز 32 لا تعمل على 64 

فهل هناك حل غير تنزيل ونيدز 32 من جديد مرفق طية صورة لاحد الاخطاء مع العلم انى استخدم اوفيس 2016

حل المشكلة.rar

[الـعيدروس]

اكيد ممكن

تعديلات بسطيه على الاكواد وتعمل معاك ان شاء الله

راجع الرابط التالي 

https://msdn.microsoft.com/en-us/library/ff700513(v=office.11).aspx

لشركة مايكروسوفت كي تعرف التعديل على الاكواد لتعمل على نظام 64 بت

تحياتي

[نور وحيد]

استاذ / العيدروس 

انا اسف دخلت على الرابط ولم افهم ماذا اعمل

[KHMB]

السلام عليكم ورحمة الله

بعد إذن اخي الأستاذ علي العيدروس والذي سبق وان دلني علي الحل جزاه الله خيرا

الاكواد ادناة ضع هذه الكلمة PtrSafe بعد كل كلمة Declare  لاحظها موجودة .إن شاء الله تكون هي المشكله

Private Declare PtrSafe Function FindClose Lib "kernel32" (ByVal hFindFile As Long) As Long
Private Declare PtrSafe Function FindFirstFile Lib "kernel32" Alias "FindFirstFileA" (ByVal lpFileName As String, lpFindFileData As WIN32_FIND_DATA) As Long
Private Declare PtrSafe Function FindNextFile Lib "kernel32" Alias "FindNextFileA" (ByVal hFindFile As Long, lpFindFileData As WIN32_FIND_DATA) As Long
Private Declare PtrSafe Function SearchTreeForFile Lib "imagehlp.dll" (ByVal sFileRoot As String, ByVal InputPathName As String, ByVal OutputPathBuffer As String) As Boolean
Private Declare PtrSafe Function LockWindowUpdate Lib "User32" (ByVal hWnd As Long) As Long
Private Declare PtrSafe Function FindWindowA Lib "User32" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

 

[نور وحيد]

هل اعمل ذلك فى كل كود مع العلم ان الاكواد مغلقة بسرى و الملف اكواده كثيرة

تم تعديل ديسمبر 6, 2015 بواسطه نور وحيد

[KHMB]

السلام عليكم ورحمة الله

نعم اخي لازم وأي كود معمول بنظام 32 بت لن يعمل معك نهائيا إلا بإضافة كلمة او الحروف PtrSafe  بعد الإعلان الخاص أي بعد كلمة Declare

ولازم تفتح محرر الاكواد لكي تعدل علية.

[نور وحيد]

انا فى غاية الشكر واسف على كثرة السؤال