منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] سؤال ضروري - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] سؤال ضروري (/showthread.php?tid=16890)

الصفحات: 1 2


RE: سؤال ضروري - anasmoner - 21-08-16

(21-08-16, 02:58 AM)الوادي كتب : فقط البرنامج وانا اجرب ملفات pdf من عندي
بس احذف ملفات exe واحذف مجلد obj كامل

ما ادري ايش فيه كمان حتى يكون المشروع كبير!

حسنا

او هذا إذا كان الأخر لا يعمل

او هذا إذا كان الأخر لا يعمل


RE: سؤال ضروري - الوادي - 21-08-16

البرنامج ما فتح معاي على 2010 لكن انا فتحت ملف Form1.vb ووجدت أكواده طويله ومكررة

انا جربت فتح ملف pdf من الريسورس بهذا الكود، شوف كيف صار اسم الملف بعد اضافته وحاول تطبيق نفس الفكرة على بقية الأسطر
بدل السطر الطويل اللي يبدأ ب Process.Start استخدم هذا بدل منه بعد ما تضع كل ملفات pdf في الريسورس، وبعدها ما تحتاج لارفاق هذه الملفات في برنامج exe
PHP كود :
Dim fn As String IO.Path.GetTempFileName ".pdf"
IO.File.WriteAllBytes(fnMy.Resources._1__المجلد_الأول___شروط_التعاقد)
Process.Start(fn

انا حنتظر قليلاً لآرى ردك هل وضحت الفكرة أم لا.


RE: سؤال ضروري - anasmoner - 21-08-16

(21-08-16, 03:21 AM)الوادي كتب : البرنامج ما فتح معاي على 2010 لكن انا فتحت ملف Form1.vb ووجدت أكواده طويله ومكررة

انا جربت فتح ملف pdf من الريسورس بهذا الكود، شوف كيف صار اسم الملف بعد اضافته وحاول تطبيق نفس الفكرة على بقية الأسطر
بدل السطر الطويل اللي يبدأ ب Process.Start استخدم هذا بدل منه بعد ما تضع كل ملفات pdf في الريسورس، وبعدها ما تحتاج لارفاق هذه الملفات في برنامج exe
PHP كود :
Dim fn As String IO.Path.GetTempFileName ".pdf"
IO.File.WriteAllBytes(fnMy.Resources._1__المجلد_الأول___شروط_التعاقد)
Process.Start(fn

انا حنتظر قليلاً لآرى ردك هل وضحت الفكرة أم لا.
جاري التجريب وإن شاء الله يشتغل

نجحت يا أخي والحمد لله
لا ادري كيف اشكرك ولكن جزاك الله خيرا وجعله في موازين حسناتك