تقييم الموضوع :
  • 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 18 645 20-08-19, 11:53 PM
آخر رد: atefkhalf2004
  مثال تغيير ثيم البرنامج وقت التشغيل honest 4 1,913 08-08-19, 06:01 AM
آخر رد: محمد كريّم
  مثال لانشاء برنامج تجريبي او جعل البرنامج الخاص بك نسخة تجريبية ahmadpal 4 273 07-08-19, 07:41 PM
آخر رد: ahmadpal
Wink سورس كود مع الشرح لطريقة عمل طرد او بلوك لمستخدم على البرنامج ahmadpal 3 461 09-05-19, 02:57 PM
آخر رد: ahmadpal
  [VB.NET] برنامج كيفية حماية البرنامج من استخدامه اكثر من مرة shwehdi4pc 10 3,419 25-02-19, 06:08 AM
آخر رد: new_programer
Information [مشروع] موجة الأوامر CMD , Command Prompt , تنفيذ الأمر وأخذ النص الناتج إلى البرنامج عبدالله الدوسري 6 1,312 14-02-19, 05:35 AM
آخر رد: yosefphotography6
  ربط البرنامج بالسكانر و المسح الضوئي صبري زينوبي 15 4,395 13-09-18, 02:21 AM
آخر رد: على رمضان
  [VB.NET] سورس كود لعملية تفعيل البرنامج مع احتساب عدد مرات الاستخدام elgokr 8 1,986 13-08-18, 09:04 PM
آخر رد: elgokr
  تركيب البرنامج على جهاز واحد فقط @@أبورائد@@ 22 13,147 05-07-18, 12:10 PM
آخر رد: mahdy
  [مشروع] واخيرا تم ايجاد حل عند تكبير البرنامج على حسب كل الشاشات shado1796 9 4,839 15-08-17, 03:38 AM
آخر رد: eng.molinux

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


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