كيفية تخزين Html Page في قاعدة بيانات

اخي حاتم

اهلا وسهلا بك

وشرفت

وانستنا

وحياك الله

واما بخصوص موضوعك هذا

فهو المكان المناسب له منتدى صفحات الويب

وحياك الله في وقت في منتدى الاكسس

السلام عليكم

اخي الكريم مثلما تقوم بتخزين كلامات نصيه داخل حقل معين في الجدول تستطيع إدخال كود ال html إليه، ولكن لا تضع لغات برمجة بداخله، كأوسمة html او جافا سكربت او في بي سكربت، تستطيع من وضعها داخل قاعدة البيانات، أما ان تضع لغة برمجة سوف يعطيك خطأ عند عملية الإضافة.

مع تحياتي

السلام عليكم

اخواني الاعزاء ... اخلتموني فعلاً ... ونعم الاشراف فعلاً ... اول رددين من مشرفين

مشكورين فعلاً على اهتمامكم .

اخي العزيز عبدالهادي الألمعي مشكور جداً على ترحيبك ( والله يأنسك ) .

اخي الكريم عبدالله جابر شقليه شكراً على اهتمامك .

اقتباس

تستطيع إدخال كود ال html إليه، ولكن لا تضع لغات برمجة بداخله، كأوسمة html او جافا سكربت او في بي سكربت،

الحقيقة اخي الكريم لم افهم ... كيف استطيع ادخال كود ولكن لااضع أوسمة Html

ومشكور مرة اخرى اخي الكريم .

السلام عليكم

كأوسمة html او جافا سكربت او في بي سكربت، تستطيع من وضعها داخل قاعدة البيانات

انا هنا وضحة أنك تستطيع من إدخال اوسمة ال html، ولكن عندما كتبت المشاركة في الأعلى، كنت متسرع، لسبب ظرف ما، لفم أفصها عن الجملة التي قبلها.

مع تحياتي

السلام عليكم

مشكور جدا اخي الكريم عبدالله جابر شقليه على اهتمامك ... ولمزيد من

التواصل والمشاركة هذا ماتوصلت اليه حتى الان :

Dim conn As New ADODB.Connection
Dim cmd As New ADODB.Command
Dim rs As New ADODB.Recordset
Dim HtmlString
Dim strHTML As String

HtmlString = Inet1.OpenURL(tUrl.Text)

Open "Temp.html" For Output As #1 'open a file for output
Print #1, HtmlString 'print text (HTML Code) into it
Close #1 'closes that file

Text1 = ""
Text1 = HtmlString
'WebBrowser1.Navigate2 (HtmlString)
WebBrowser1.Navigate App.Path & "\Temp.html"
    
conn.Open "DSN=" + DnsVar + ";uid=" + UidVar + ";pwd=" + PwdVar
Set cmd.ActiveConnection = conn
rs.LockType = adLockOptimistic

 SqlS = "SELECT * From Table1"
 cmd.CommandText = SqlS
 rs.Open cmd, , adOpenDynamic, adLockPessimistic
        rs.MoveFirst
            rs("sss") = HtmlString
        rs.Update
        rs.Close
conn.Close

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

من خلال تخزينها في ملف ( Temp ) مؤقت .

وحتى هنا الامور ماشية تمام ... ولكن مشكلتي هى ان الصفحة المخزنه تحوي

على نصوص فقط فهو طبعا لايقوم بتخزين الصور الموجودة ( المعروضة ) في الصفحة

الاصلية ... وهنا مشكلتي فأحياناُ هناك صفحات يوجد بها صور توضيحية اريد تخزينها

فما السبيل الى ذلك ؟؟؟ مشكورين مقدماً

السلام عليكم

أخي الكريم بالنسبة للصور أنت تقوم بتخزين وسم الصوره وامتدادها داخل الحقل، وعندما تقوم بعرضها على صفحة الويب سوف يقوم بكتابة كود الصورة، وسوف يقوم باستدعاء الصورة من المسار المحدد لمكان وجود الصورة.

مع تحياتي

السلام عليكم

اخي الكريم عبدالله جابر شقليه ... مشكور مرة اخرى لإهتمامك .

ولكن اخي الكريم اذا خزنت كود الصفحة في حقل واحد فقط ربما احتاج لعشرات الحقول

الاخرى لتخزين الصور ... اعتقد ان هذه الفكرة غير عملية ... ام انا مخطئ في فهم

فكرتك ... وجزاك الله خير اخي الكريم .

السلام عليكم

أخي الكريم انت لن تحزن الصورة داخل الحقل انت سوف تقوم بتخزين كود ال html للصورة ، وكود الصورة كالتالي:

<img border="0" src="images/arabteam2000.gif" width="20" height="20">

هذا لن يؤثر على الحقول، لأنه الصوره سوف يتم قرائتها من السورس للمصدر الذي أنت قمت بتحديده للصورة.

مع تحياتي

تحية طيبة اخي

اظن اني فهمت قصدك

والي فهمته انك بدك كل الصفحة بملف واحد قابل للعرض

افتح صفحاتك التي تريد تجميعها باستخدام Internet Explorer

اختر "حفظ باسم" من قائمة "ملف"

تحت مكان كتابة اسم الملف هناك قائمة "حفظ كنوع" اختر منها الخيار Wep Archive

اصبح لديك ملف واحد يحوي كل شيء وهو بامتداد mht

الان يمكنك وضع اسم ملفك في قاعدة بياناتك

واليك هذه الفكرة

-- مادمت تعودت استخدام قاعدة البيانات من خلال الفجول بيسك يمكنك عمل مستعرض من خلال الاستفادة من مكون استعراض الوب الموجود في قائمة مكونات التي تستدعى بـ Ctrl+T

لمعاينة ملفاتك داخل البرنامج.