الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

إنشاء غلاف مع ملف مرتبط به مثل ملفات الويب

مغلق
بدأه MMA_EG_Cairo في 25 سبتمبر 2007 · 5 رد · 527 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

إخواني أعضاء المنتدي الكرام ، تحية طيبة وبعد ،

أنا أرغب في ربط ملف مع غلاف مثل صفحات الويب !!!

فإذا قمت بحفظ صفحة من علي الويب سيتم تخزينها علي مشغل السواقة بإمتداد HTM !!!

وفي نفس الوقت إذا كانت هذه الصفحة مرتبطة بملفات صور وغيرها تقوم بإنشاء غلاف بجوارها !!!

لاحظوا عند حذف ملف الـ HTM يقوم بحذف الغلاف أو العكس !!!!

أعتقد أن حل هذه المشكلة متعلقة بمسجل النظام والله أعلم !!!

فأتمني أن أجد حل ومساعدتكم ....

وشكراً للجميع

لا تخلط ما بين شخصيتي وأسلوبي .. فشخصيتي هي

ما أنا عليه وتحت تصرفي .. وأسلـوبي يعتمد عليـك

أنت وتصرفاتك

ولحظاتي صمت... وصمـت لحظاتي كلام ... كلامه

اشد آلام ... فصمتي أنا عنوان

عصر التكنولوجيا المعلوماتية(مدونتي الخاصة)

My FaceBook

#2

هل غلاف = مجلد ؟

و أن كان ممكن توضح سؤالك أكتر , يعنى هل أنت عايز تعمل حاجة زى كده و لا ايه ؟

#3

معني الغلاف هو المجلد ...

وبالفعل أنا أرغب في إنشاء مثل هذه الفكرة

وشكراً

لا تخلط ما بين شخصيتي وأسلوبي .. فشخصيتي هي

ما أنا عليه وتحت تصرفي .. وأسلـوبي يعتمد عليـك

أنت وتصرفاتك

ولحظاتي صمت... وصمـت لحظاتي كلام ... كلامه

اشد آلام ... فصمتي أنا عنوان

عصر التكنولوجيا المعلوماتية(مدونتي الخاصة)

My FaceBook

#4

بالـ VB لا أعتقد بأمكانية ذلك , حتى الـ Hard Link مش هينفع لحالتك , و لا أعتقد أنها متعلقة بمسجل النظام لكن مش هجزم بكده.

#5

هناك حل أخر ولكن لا أدري ان كان يتناسب مع متطلبكـ أم لا ..

في خيارات حفظ صفحة الويب هناك قائمة تحت المربع الذي تكتب فيه اسم الملف الذي تريد حفظه وهي باسم

save as type

من هنا يوجد خيار لحفظ الصفحة باسم .::

Web Archive, single file (*.mht)

هذا الخيار يحفظ لك صفحة الويب بملف واحد سواء كانت تحتوي على صور أم لا :) ..

في امان الله ..

#6

أخي أنا لم أقصد التعامل مع MS Word ولكن التعامل مع VB 6.0

علي العموم أنا إنتهيت من الموضوع بحل مبدئي وهو إضافة ملف ذات إمتداد HTML بإستخدام الأمر التالي

Open App.path & "\Data.htm" for output as #1

print#1,strHtml

Close#1

ومن ثم أقوم بإضافة غلاف في نفس المسار كما يلي :

MkDir App.Path & "\Data.Files"

وبعد ذلك أنسخ كافة الملفات داخل هذا الغلاف !!!

وفي حالة رغبة المستخدم في حذف الملف أو الغلاف سيتم حذفهما معاً

وشكرا ًللجميع علي معاونتكم لي

لا تخلط ما بين شخصيتي وأسلوبي .. فشخصيتي هي

ما أنا عليه وتحت تصرفي .. وأسلـوبي يعتمد عليـك

أنت وتصرفاتك

ولحظاتي صمت... وصمـت لحظاتي كلام ... كلامه

اشد آلام ... فصمتي أنا عنوان

عصر التكنولوجيا المعلوماتية(مدونتي الخاصة)

My FaceBook

هذا الموضوع مغلق.

مواضيع مشابهة