تنفيذ الكود باستخدام برنامج تعديل دفعة ASP ، FSO ذات الصلة
إنه شيء صغير يجب القيام به على مجموعات من تعديلات الكود ، وسأشاركه معك.
أنواع الملفات التي يمكن معالجتها في الوقت الحاضر: .asp .inc .htm .html يمكن تعديل الأنواع المحددة وإضافتها بنفسك.
الوظائف التي تنفذها البرنامج: الدُفعة تعدل الملفات الموجودة في الدليل المصدر وحفظها في دليل الوجهة.
بعض التعديلات يمكن أن تحقق أشياء كثيرة!
لن أقول أي شيء آخر ، الرمز واضح للغاية
<٪
'// +--------------------------------------------------------------------------- +
'// | اسم البرنامج: Modifier Modifier V1.01 |
'// | جميع الحقوق محفوظة بأحجار الجبال الأخرى ، سيتم متابعة الانتهاك! يرجى الإشارة إلى حقوق الطبع والنشر عند إعادة الطباعة :) |
'// | --------------------------------------------------------------------- |
'// | النظام: Win2000 ؛ المحرر: EditPlus ؛ أداة المسافة البادئة: علامة التبويب ؛ طول المسافة البادئة: 8 ؛ الخط: Songti (10pt) ؛ |
'// | --------------------------------------------------------------------- |
'// | المبدع: WYC ؛ وقت الخلق: 2004-03-08 ؛ |
'// | الكاتب: WYC ؛ الكاتب: 2004-03-08 ؛ |
'// +--------------------------------------------------------------------------- +
server.scripttimeout = 500 'وقت مهلة البرنامج النصي
'// +--------------------------------------------------------------------------- +
'// | تعديل الدُفعات |
'// | --------------------------------------------------------------------- |
'// | السمة: Path_from Source File Directory Path_TO دليل عمل الملف الهدف |
'// | --------------------------------------------------------------------- |
'// | قيمة الإرجاع: لا شيء |
'// | --------------------------------------------------------------------- |
'// | تدفق البرنامج: ... |
'// | --------------------------------------------------------------------- |
'// | الكاتب: WYC ؛ وقت الكتابة: 2004-03-08 ؛ |
'// +--------------------------------------------------------------------------- +
Sub Midfile (path_from ، path_to)
list_from = path_from 'تخزين دليل عمل المصدر الحالي
list_to = path_to 'تخزين دليل العمل الهدف الحالي
set fso = createObject (scripting.filesystemObject)
قم بتعيين أضعاف = fso.getfolder (list_from) 'Get Folder Object
تعيين fc = fold.files 'الحصول على سجل الملفات
تعيين mm = fold.subfolders 'احصل على مجموعة سجلات الدليل
لكل F2 في مم
تعيين objfile = server.createBject (scripting.filesystemObject)
objfile.createfolder (path_to & / & f2.name) 'إنشاء دليل
midfile path_from & & & f2.name ، path_to & / & f2.name 'مكالمة متكررة
استجابة. path_to & / & f2.name & الانتهاء! <br>
التالي
لكل F1 في FC
file_from = list_from & / & f1.name 'إنشاء عنوان ملف (مصدر)
file_to = list_to & / & f1.name 'إنشاء عنوان ملف (إلى)
fileext = lcase (يمين (f1.name ، 4)) 'احصل على نوع الملف
إذا كان fileext = .asp أو filext = .inc أو filext = .htm أو filext = html ثم "يمكن تعديل النوع المحدد وإضافته بنفسك