تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[مشروع] عرض اعلانات على البرنامج
#1
Photo 
مرحبا
اولا تحتاج للتسجيل بموقع  Pastebin.com
بعد التسجيل اختر New Paste واكتب Show اختر Create New Paste
اختر raw وانسخ الرابط واستبدله بثاني رابط بالكود ادناه
كرر العمليه واكتب بدل show كود هتمل للاعلان وانسخ الرابط واستبدله باول رابط بالكود
الان اضف الكود للفيجول واضف اداة WebBrowser
افتح Notepad واكتب cod واحفظ الملف باسم Adf.html و ضيفه للريسورس
تمام اذا ردت تغير محتوى الاعلان عدل على محتوى الرابط الاول
اذا عجبكم لاتنسو تقييم

كود :
Public Class Form1
   Public x As New System.Net.WebClient
   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       'AD Start
       Dim Adsec As String
       Adsec = x.DownloadString("https://pastebin.com/raw/7Rt1RNn4") 'محتوى الاعلان
       Dim Ady As String
       Ady = x.DownloadString("https://pastebin.com/raw/Fb4Dh5Cp") 'الموافقه على عرض الاعلان
       If Ady = "show" Then

           Dim Cd As String = My.Resources.Adf 'وضيفه للريسورس Adf.html واحفظ الملف باسم cod واكتب Notepad افتح
           Cd = Cd.Replace("Cod", Adsec)
           Dim SFD As New SaveFileDialog
           With SFD
               IO.File.WriteAllText("C:\Windows\AdFile\Adfile.html", Cd)
           End With
           WebBrowser1.Navigate("C:\Windows\AdFile\Adfile.html")
       End If
       'Ad End
   End Sub
End Class

هم يسرقون والقانون كتب لنا...
بعض اسهاماتي

الرد
تم الشكر بواسطة: elgokr , sendbad100
#2
اخي ممكن توضيح بلنسبة لي هتمل للاعلان او الموقع 
الرد
تم الشكر بواسطة: عبد العزيز البسكري , elgokr
#3
(27-09-18, 09:21 PM)aldery كتب : اخي ممكن توضيح بلنسبة لي هتمل للاعلان او الموقع 

مرحبا اخي aldery
اولا اعتذر عن التأخير Confused
ثانياً اني اقصد كود اعلان بلغة HTML
واذا ما تعرفها Huh فهي سهلة حتى تتعلمها من اليوتيوب Idea
اتمنى اكون افدتك سلامي Wink
هم يسرقون والقانون كتب لنا...
بعض اسهاماتي

الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  حماية البرنامج بسريال الفلاش عن طريق ملف اكس امل ال على Dropbox asemshahen5 0 78 13-06-19, 12:28 AM
آخر رد: asemshahen5
Wink سورس كود مع الشرح لطريقة عمل طرد او بلوك لمستخدم على البرنامج ahmadpal 3 251 09-05-19, 02:57 PM
آخر رد: ahmadpal
  [VB.NET] برنامج كيفية حماية البرنامج من استخدامه اكثر من مرة shwehdi4pc 10 3,208 25-02-19, 06:08 AM
آخر رد: new_programer
Information [مشروع] موجة الأوامر CMD , Command Prompt , تنفيذ الأمر وأخذ النص الناتج إلى البرنامج عبدالله الدوسري 6 1,164 14-02-19, 05:35 AM
آخر رد: yosefphotography6
  ربط البرنامج بالسكانر و المسح الضوئي صبري زينوبي 15 4,139 13-09-18, 02:21 AM
آخر رد: على رمضان
  [VB.NET] سورس كود لعملية تفعيل البرنامج مع احتساب عدد مرات الاستخدام elgokr 8 1,795 13-08-18, 09:04 PM
آخر رد: elgokr
  تركيب البرنامج على جهاز واحد فقط @@أبورائد@@ 22 12,540 05-07-18, 12:10 PM
آخر رد: mahdy
  [مشروع] واخيرا تم ايجاد حل عند تكبير البرنامج على حسب كل الشاشات shado1796 9 4,737 15-08-17, 03:38 AM
آخر رد: eng.molinux
  مثال تغيير ثيم البرنامج وقت التشغيل honest 3 1,745 26-12-16, 04:44 PM
آخر رد: IBRA939
Brick [VB.NET] مثال بسيط على تسجيل الدخول الى الفيسبوك من خلال البرنامج elhon.tec 3 1,255 10-12-16, 04:11 AM
آخر رد: elhon.tec

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم