منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : جعل البرنامج يعدل على كود html وينفذه
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم إخواني الكرام، عندي الكود التالي الخاص بصنع البركود ، وهو كود html :
PHP كود :
<div style='text-align: center;'>
 
 <!-- insert your custom barcode setting your data in the GET parameter "data" -->
 
 <img alt='Barcode Generator TEC-IT'
 
      src='https://barcode.tec-it.com/barcode.ashx?data=0329655&code=Code128&translate-esc=on'/>
</
div>
<
div style='padding-top:8px; text-align:center; font-size:15px; font-family: Source Sans Pro, Arial, sans-serif;'>
 
 <!-- back-linking to www.tec-it.com is required -->
 
 <a href='https://www.tec-it.com' title='Barcode Software by TEC-IT' target='_blank'>
 
   TEC-IT Barcode Generator<br/>
 
   <!-- logos are optional -->
 
   <img alt='TEC-IT Barcode Software' border='0'
 
        src='http://www.tec-it.com/pics/banner/web/TEC-IT_Logo_75x75.gif'>
 
 </a>
</
div
لكن، كيف أجعل البرنامج يعدل على تلك : data=0329655 و يستبدلها بالقيمة المدخلة في Textbox1 و ينفذه فورا في Chrome أو في آداة الويب الموجود في الفيجوال وشكرا
(23-01-21, 03:48 PM)Necro PC كتب : [ -> ]السلام عليكم إخواني الكرام، عندي الكود التالي الخاص بصنع البركود ، وهو كود html :
PHP كود :
<div style='text-align: center;'>
 
 <!-- insert your custom barcode setting your data in the GET parameter "data" -->
 
 <img alt='Barcode Generator TEC-IT'
 
      src='https://barcode.tec-it.com/barcode.ashx?data=0329655&code=Code128&translate-esc=on'/>
</
div>
<
div style='padding-top:8px; text-align:center; font-size:15px; font-family: Source Sans Pro, Arial, sans-serif;'>
 
 <!-- back-linking to www.tec-it.com is required -->
 
 <a href='https://www.tec-it.com' title='Barcode Software by TEC-IT' target='_blank'>
 
   TEC-IT Barcode Generator<br/>
 
   <!-- logos are optional -->
 
   <img alt='TEC-IT Barcode Software' border='0'
 
        src='http://www.tec-it.com/pics/banner/web/TEC-IT_Logo_75x75.gif'>
 
 </a>
</
div
لكن، كيف أجعل البرنامج يعدل على تلك : data=0329655 و يستبدلها بالقيمة المدخلة في Textbox1 و ينفذه فورا في Chrome أو في آداة الويب الموجود في الفيجوال وشكرا

وعليكم السلام
تفضل اخي كود بسيط جدا
كود :
       Dim html As String = "<div style='text-align: center;'>" & vbCrLf & "  <!-- insert your custom barcode setting your data in the GET parameter ""data"" -->" & vbCrLf & "  <img alt='Barcode Generator TEC-IT'" & vbCrLf & "       src='https://barcode.tec-it.com/barcode.ashx?data=" & TextBox1.Text & "&code=Code128&translate-esc=on'/>" & vbCrLf & "</div>" & vbCrLf & "<div style='padding-top:8px; text-align:center; font-size:15px; font-family: Source Sans Pro, Arial, sans-serif;'>" & vbCrLf & "  <!-- back-linking to www.tec-it.com is required -->" & vbCrLf & "  <a href='https://www.tec-it.com' title='Barcode Software by TEC-IT' target='_blank'>" & vbCrLf & "    TEC-IT Barcode Generator<br/>" & vbCrLf & "    <!-- logos are optional -->" & vbCrLf & "    <img alt='TEC-IT Barcode Software' border='0'" & vbCrLf & "         src='http://www.tec-it.com/pics/banner/web/TEC-IT_Logo_75x75.gif'>" & vbCrLf & "  </a>" & vbCrLf & "</div> " & vbCrLf
       WebBrowser1.DocumentText = html
شكرا اخي الكريم. نجح الكود

لكن البرنامج يعلق اثناء تنفيذ الكود. فممكن كود لجعل البرنامج يظهر تقدم العملية في بروكرس بار ؟؟؟؟
ممكن حل اخواني الكرام
(25-01-21, 10:52 AM)Necro PC كتب : [ -> ]ممكن حل اخواني الكرام

اخي الكريم استعمل picturebox احسن و اسهل
كود :
PictureBox1.ImageLocation = "https://barcode.tec-it.com/barcode.ashx?data=" & TextBox1.Text & "&code=Code128&translate-esc=on"
مشكورين إخواني الكرام