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

الاداة DHTML

مغلق
بدأه Mohammed-Saeed في 2 أبريل 2005 · 3 رد · 622 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

بعد احر التحيات ...

اقوم باستخدام الاداة DHTML Edit لعرض نص من النوع HTML في برنامجي، و اريد ان احصل على قيمة الرابط في برنامجي كي اقوم بعدها باستخراج النص من قاعدة البيانات و وضعها في نفس الصفحة ... فمثلا :

في الكود التالي : اريد الحصول على DB-RS(1) اثناء تنفيذ البرنامج ، حينما يقوم المستخدم بالضغط على هذا الرابط ... كي اقوم بعدها بالحصول على المستند الجديد و اضعه في الخاصية DocumentHTML .

HTML$ = "<HTML>" & _
"<a href=""www.arabteam2000.com""><I>Hi ArabTeam2000</I></a>" & _
"<p><a href=""DB-RS(1)"">How to GET <B>href</B> in VB Code</a>" & _
"</HTML>"
DHTMLEdit.DocumentHTML = HTML$

[

للفائدة :

الاداة DHTML Edit اداة تمكنك من تحرير و عرض صفحات ال HTML ، و بدون ان تعطي المستخدم امكانية استخدام النقر باليمين Right-Click ، و ما يميزها عن ال MS Internet Control هو انه يمكنك اسناد مستند اليها من خلال الكود ، و بدون وجود صفحة خارجية ...

DHTML Control.zip

تم تعديل هذه المشاركة بواسطة Mohammed-Saeed في 2 أبريل 2005 في 15:55

اعتذر عن الغياب المتواصل ...طالب طب في MUMS

درس استخدام لغة ال C في الفيجوال بيسيك

التعامل مع الملفات باحترافية ..., مثال : ملفات ال BMP

درس تنسيق الملف ... موضوع هام لكل المبرمجين, File Structure

اداة لكتابة الشفرات البرمجية ملونة في برنامجك

التعامل الاحترافي مع جميع انواع الصور

#2

بعد التحية ..

ان لم يكن احد يعرف الجواب ... فهل استخدم احد اداة اخرى ؟؟؟

هل يعرف احد كيف تمت برمجة برنامج ارشيف منتدى فيجوال بيسيك العرب ؟؟؟

اعتذر عن الغياب المتواصل ...طالب طب في MUMS

درس استخدام لغة ال C في الفيجوال بيسيك

التعامل مع الملفات باحترافية ..., مثال : ملفات ال BMP

درس تنسيق الملف ... موضوع هام لكل المبرمجين, File Structure

اداة لكتابة الشفرات البرمجية ملونة في برنامجك

التعامل الاحترافي مع جميع انواع الصور

#3

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

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

في الواقع اخي العزيز لم ارى البرنامج الذي تتحدث عنه من قبل و لكن لابأس ... بالنسبة لموضوعك فانه يمكنك ذلك بإذن الله تعالى و لو افترضت انك تريد مثلاً عرض الخاصية hRef للعنصر الذي تم النقر عليه في الصفحة فيمكنك حينها كتابة الكود التالي في الحدث Click للاداة DHTMLEdit كالتالي :

Private Sub DHTMLEdit_onclick()
    Dim element As Object
    
    Set element = DHTMLEdit.DOM.activeElement
    
    If element.tagName = "A" Then
        MsgBox element.hRef
    End If
End Sub

لا اخفيك اخي الكريم ان اسمك يذكرني بعزيز علي افتقده من ايام منتدى الفيجوال بيسك للعرب بارك الله لي بك و حفظ اخي الذي افتقده اينما كان انه السميع العليم ...

اتمنى ان يفيدك المثال

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

مواضيع برمجية تقنية جديدة

----------------------------------------------------------------------------------------------------------------------------------------------

• إستغلال خدمة الـ RSS في برامجنا ومواقعنا ! (VB.NET)

----------------------------------------------------------------------------------------------------------------------------------------------

• برنامج للبحث في الملفات ومحتواياتها (VB.NET)

----------------------------------------------------------------------------------------------------------------------------------------------

• فئة للتراسل بين برنامجين في جهاز واحد ! (VB.NET)

----------------------------------------------------------------------------------------------------------------------------------------------

مواضيع برمجية تقنية قديمة

----------------------------------------------------------------------------------------------------------------------------------------------

• إستغلال رسائل البالونات Balloons في الوينذوز أكس بي(VB.NET)

----------------------------------------------------------------------------------------------------------------------------------------------

• مقالة : لماذا يجب ان نعتني بشفرات برامجنا !؟- (VB6.0)

----------------------------------------------------------------------------------------------------------------------------------------------

• لمطوري البرامج و مواقع الويب - برنامج تركيب ألوان - (VB6.0)

----------------------------------------------------------------------------------------------------------------------------------------------

• برنامج : بسيط للتحكم بالنظام, عن طريق الريجستري - (VB6.0)

----------------------------------------------------------------------------------------------------------------------------------------------

• برنامج : لتقييد و منع تشغيل البرامج الاخرى - (VB6.0)

----------------------------------------------------------------------------------------------------------------------------------------------

• النوافذ المنبثقة و طريقة لإستغلالها في برامجنا -(VB.NET)

----------------------------------------------------------------------------------------------------------------------------------------------

• تقنية الإستدعاء الذاتي - (VB.NET , VB6.0)

----------------------------------------------------------------------------------------------------------------------------------------------

• مصفوفات الأدوات Control Arrays افكار وتلميحات ! - (VB.NET)

----------------------------------------------------------------------------------------------------------------------------------------------

• أفكار و تلميحات[ المعنى الحقيقي للـ True و False ] - أمثلة (VB.NETVB6.0)

----------------------------------------------------------------------------------------------------------------------------------------------

• دوال الـ APIs و مايقابلها في الدوت نت ! - (VB.NET)

----------------------------------------------------------------------------------------------------------------------------------------------

#4

بعد السلام و التحية ...

اشكرك كثيرا اخي العزيز رغيد الطيب ، فقد كنت و لا تزال بدرا طالعا و شمسا منيرا ...

لقد توصلت للحل ، بعد ان تعبت بحثا عن ال SDK الخاصة بالاداة و لم اجدها لانها ازيلت من موقع مايكروسوفت ، و قد كان حلي كالتالي :

If TypeName(DHTMLEdit.DOM.activeElement) = "HTMLAnchorElement" Then ' Link
    MsgBox DHTMLEdit.DOM.activeElement.outerHTML
End If

و من ثم کنت استخرج ال Href باستخدام الدوال النصية ... عندها رجعت للمنتدى كي اجيب عما سالت فرحا مسرورا ، فزاد فرحي و سروري عندما رايت انه لا يزال روح التعاون و الخير موجودين في نفوس البشر :)

اشكرك من كل قلبي ، و ان شاء الله تُرزق خير الدارين ، و تُلبس لباسي الصحة و العافية ، و تُؤتى اجرك مرتين :)

اعتذر عن الغياب المتواصل ...طالب طب في MUMS

درس استخدام لغة ال C في الفيجوال بيسيك

التعامل مع الملفات باحترافية ..., مثال : ملفات ال BMP

درس تنسيق الملف ... موضوع هام لكل المبرمجين, File Structure

اداة لكتابة الشفرات البرمجية ملونة في برنامجك

التعامل الاحترافي مع جميع انواع الصور

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

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