السلام عليكم ورحمة الله وبركاته :
سؤالي :
هل يمكن للأكسيس أن يقوم بتنفيذ عملية معينة وهي :
نسخ ملف أكسيس موجود على جهاز في مسار معين .. مثل :
D:\Moslem\MoslemData.mdb
ولصقه في الأجهزة الموجودة على نفس الشبكة وفي نس المسار وبنفس الأسم ؟
بحبث يقوم بفحص الآي بي للأجهزة العاملة بالشبكة وفحص المجلد الموجود على كل جهاز ومن ثم نسخة الملف عليها .. حتى ولو كان موجود مسبقا على نفس المسار فإنه يقوم باستبداله .
فهل هذا ممكن تنفيذه بالأكسيس .
فتى الوادي كتب:السلام عليكم ورحمة الله وبركاته :
سؤالي :
هل يمكن للأكسيس أن يقوم بتنفيذ عملية معينة وهي :
نسخ ملف أكسيس موجود على جهاز في مسار معين .. مثل :
D:\Moslem\MoslemData.mdb
ولصقه في الأجهزة الموجودة على نفس الشبكة وفي نس المسار وبنفس الأسم ؟
بحبث يقوم بفحص الآي بي للأجهزة العاملة بالشبكة وفحص المجلد الموجود على كل جهاز ومن ثم نسخة الملف عليها .. حتى ولو كان موجود مسبقا على نفس المسار فإنه يقوم باستبداله .
فهل هذا ممكن تنفيذه بالأكسيس .
تفضل اخي الكريم : فتى الوادي
جرب هذا السيكربت واذا احتاج اي تعديل ابلغني لتعديله لك
VBS Script
Dim objFSO, WSHNetwork
Const OverWriteExisting = True
Set objFSO = Createobject("Scripting.FileSystemObject")
Set WSHNetwork = Createobject("Wscript.Network")
strComputer = WSHNetwork.Computername
wsLocation = "\\"& strComputer & "\C$\Moslem"
objFSO.CopyFile "D:\Moslem\MoslemData.mdb", wsLocation, OverWriteExistingهذا السيكربت يتم تشغيله مباشرة ( يعني اضغط عليه ضغطتين وسوف يعمل مباشرة )
سيقوم بنسخ الملف MoslemData.mdb الى جميع الأجهزة على الشبكة في المجلد Moslem
لا تنسانا من التقييم بارك الله بك
بالتوفيق
اخي العزيز / فتى الوادي
يمكن تستخدم هذا الكود
Call Shell("XCOPY /Y \\Pqdpermit\pqd_registration\PQD_be.accdb d:\backup", 1)
حيث \\ Pqdpermit\pqd_registration\PQD_be.accdb
هو مسار الملف على الشبكة عندي
d:\backup", 1
هو المجلد الذي سيتم انشاء النسخة الاحتياطية
تحياتي/ ALcasir
السلام عليكم :
الأستاذة زهرة : لم يعمل الباتش عندي ...
الشبكة مرتبطة على مجموعة عمل MSHome وفيها بعض الأجهزة على مجال ...
الأستاذ أكسير جاري تطبيق الكود ...
نرفع الموضوع من جديد ..
رفع الله قدركم وزاد علمكم .
هل يلزم ان اضع مجلد على كل جهاز ؟ أو يقوم الباتش بعمل المجلد إذا لم يكن موحودا ؟
فتى الوادي كتب:نرفع الموضوع من جديد ..
رفع الله قدركم وزاد علمكم .
هل يلزم ان اضع مجلد على كل جهاز ؟ أو يقوم الباتش بعمل المجلد إذا لم يكن موحودا ؟
اخي الفاضل : فتى الوادي
حسب شرحك وطرحك للسؤال بإنه يوجد لديك مسبقا مجلد اسمه Moslem على كل الأجهزة وافتراضيا يكون على محرك الأقراص C
لذا قمنا يكتابة الباتش لك على هذا الأساس بحيث يكون لديك على جهازك قاعدة البيانات حسب هذا المسار D:\Moslem\MoslemData.mdb
ويتم نسخ قاعدة البيانات الى جميع اجهزة الكمبيوتر في المجلد C:\Moslem
لذا يجب ان تقوم بعمل مجلد على كل الأجهزة والا ستظهر لك رسالة الخطأ
لا تنسانا من التقييم بارك الله بك
بالتوفيق
نعم استاذة زهرة ... كمان انا قد حاولت وعملت مجلد Moslem على ( C ) في كل جهاز .
وجهازي عليه MoslemData.mdb في المسار D:\Moslem
وشغلت الباتش وطلعت لي الرسالة :
علما بأن نظام الويندوز في الجهاز المصدر أكس بي .... وفي الهدف ويندوز سفن .
فتى الوادي كتب:نعم استاذة زهرة ... كمان انا قد حاولت وعملت مجلد Moslem على ( C ) في كل جهاز .
وجهازي عليه MoslemData.mdb في المسار D:\Moslem
وشغلت الباتش وطلعت لي الرسالة :
علما بأن نظام الويندوز في الجهاز المصدر أكس بي .... وفي الهدف ويندوز سفن .
اخي الفاضل
واضح من الرسالة التي تظهر لك ان الأذن مرفوض وهذا يدل على ان الأمان في ويندوز 7 مرتفع وايضا اذا كان الكمبيوتر الموضوع عليه نظام ويندوز 7 تم فتحه بإسم المستخدم وليس كمسئول
لهذا لن يعمل معك الباتش في هذه الحالات
لذا حاول تخفيض امان الويندوز 7 الى اقل ما يمكن وايضا يجب ان يتم فتح النظام كمسئول وليس كمستخدم
لو كانت كل الكمبيوترات عليها ويندوز XP فسترى ان الباتش سيعمل معك بكل كفاءة
ولكن لإختلاف انظمة التشغيل فستواجه بعض المشاكل .
بالتوفيق
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…
