بالكود كيف يمكنني ان أحفظ صفحة web في القرص الصلب دون فتحها
من قال لا إله إلا الله صادقا دخل الجنة
موقعي للتعارف و تبادل الأخبار http://www.xybond.com
بالكود كيف يمكنني ان أحفظ صفحة web في القرص الصلب دون فتحها
من قال لا إله إلا الله صادقا دخل الجنة
موقعي للتعارف و تبادل الأخبار http://www.xybond.com
اهلا بك اخي هشام
الطريقة هي ان تقوم بتحميل السورس للصفحة المراد حفظها وثم كتابة السورس الى صفحة html
1-استخدم اداة microsoft internet transfer control
2- واستخدم الطريقة ()openurl للحصول على السورس وثم اكتب السورس الى ملف html عن طريق كما هو معلوم بجملة open
*************************************************
**************************************************
مصطفى زيداني
شكرا لك
اضفت الاداة ثم كتبت
inet1.openurl ("www.hotmail.com")
بس كيف احدد مسار حفظ الصفحة في القرص
من قال لا إله إلا الله صادقا دخل الجنة
موقعي للتعارف و تبادل الأخبار http://www.xybond.com
dim strsource as string
strsource=inet1.openurl("http://www.hotmail.com")
txt1.text=strsource
open "c:\ page.html" for binary access write as #1
put #1,,strsource
close #1مع ملاحظة اهمية وضع http في بداية كل موقع تريده
وكما تعرف تستطيع تغيير المسار عن طريق البرمجة مثلا باستخدام diolog box
تم تعديل هذه المشاركة بواسطة mostafazidani في 15 أغسطس 2005 في 16:26
*************************************************
**************************************************
مصطفى زيداني
هذا الموضوع مغلق.