تساؤل حول امكانية فتح ملفات PDf,Doc المخزنة في جدول كـ (varbinary)
بالاداة AxAcroPDF1 , h, او الاداة AxFramerControl1 من داخل البرنامج لاني جربت ولم افلح
(28-03-20, 06:49 PM)ابراهيم ايبو كتب : [ -> ]السلام عليكم اخي الكريم
تفضل هذا الرابط يتحدث عن كيفية تخزين الملفات ك Binary في قاعدة البيانات وقراءتها
http://vb4arb.com/vb/showthread.php?tid=16992
بارك الله فيك اخي ولكني اريد فتح الملف من داخل vb.net بواسطة الاداتين
(30-03-20, 01:09 AM)tahaayyoub كتب : [ -> ] (28-03-20, 06:49 PM)ابراهيم ايبو كتب : [ -> ]السلام عليكم اخي الكريم
تفضل هذا الرابط يتحدث عن كيفية تخزين الملفات ك Binary في قاعدة البيانات وقراءتها
http://vb4arb.com/vb/showthread.php?tid=16992
بارك الله فيك اخي ولكني اريد فتح الملف من داخل vb.net بواسطة الاداتين
اخي الكريم انت تحتاج تعديل الخطوات الاخيرة فقط ...يعني المثال بمربع صورة وانت اسندها للاداة اللتي لديك.
الادوب ريدر غير مثبت لدي و ان لا جهزت مثال بسيط.
لو احببت ترفع الملف المذكور بمشاركتك لكي اجرب لاني لا احب تثبيت الاداة من موقع Adobe لان معه برمجيات لا اريدها.
السلام عليكم اخي الكريم
كما اورد اخي الغالي سعود واجاب عن التساؤل مشكورا
انا ايضا ليس عندي الاداتين لاجرب عليهما
المهم اليك هذا الكود لم اجربه فقط جلبته من الانترنت
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim PDFAvailable As Boolean = axAcroPDF1.LoadFile(PDFPath.ToString())
If PDFAvailable = True Then
axAcroPDF1.LoadFile(PDFPath.ToString())
axAcroPDF1.setShowToolbar(False) 'disable pdf toolbar.
axAcroPDF1.Enabled = True
Else
MessageBox.Show("Selected PDF Template Is Locked By Another Application.", "Test Application", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
End Sub