تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[مشروع] [ليس جديد] معلومات من الاي بي (مجرد تذكير و مشاركة)
#1
PHP كود :
Imports System.Xml
Public Class Form1
    Private Sub Button1_Click
(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
               Dim url 
As String "http://ip-api.com/xml/" TextBox1.Text
        Dim xdoc 
As New XmlDocument
        xdoc
.Load(url)
 
       TextBox2.Text xdoc.DocumentElement.SelectSingleNode("//country").InnerText
        TextBox3
.Text xdoc.DocumentElement.SelectSingleNode("//regionName").InnerText
        TextBox4
.Text xdoc.DocumentElement.SelectSingleNode("//city").InnerText
        TextBox5
.Text xdoc.DocumentElement.SelectSingleNode("//lat").InnerText
        TextBox6
.Text xdoc.DocumentElement.SelectSingleNode("//lon").InnerText
        TextBox7
.Text xdoc.DocumentElement.SelectSingleNode("//timezone").InnerText
        TextBox8
.Text xdoc.DocumentElement.SelectSingleNode("//isp").InnerText
        TextBox9
.Text xdoc.DocumentElement.SelectSingleNode("//as").InnerText
        TextBox10
.Text xdoc.DocumentElement.SelectSingleNode("//query/query").InnerText
    End Sub
End 
Class 
تم تصحيح الرابط الخاص بالمعلومات


الملفات المرفقة
.zip   GetCountryNameByIp.zip (الحجم : 29.22 ك ب / التحميلات : 100)
الرد }}}
#2
اكثر من رائع اخى سعود
يمكن الاستفادة منه بالعديد من الطرق
وسيفيد اصحاب من يرد جلب بيانات المستخدم

تحياتى لك
وتمنياتى لك كل التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , سعود
#3
تسلم أخ سعود 
أكيد ستكون مفيدة .

إضافة للـ XML يمكن جلب البيانات على هيئة JSON

http://ip-api.com/json/xx.xxx.xx.xx
تفيد من يريد أن يستخدمها مثلاً مع C, C++, C#, Java, JavaScript, Perl, Python ,  Undecided وليس مع الـ VB.NET طبعاً.

كود :
{  
  "as"         :"xxxx",
  "city"       :"xxxx",
  "country"    :"xxxx",
  "countryCode":"xxxx",
  "isp"        :"xxxx",
  "lat"        :98.1234,
  "lon"        :24.4563,
  "org"        :"xxxxxx",
  "query"      :"54.000.158.000",
  "region"     :"xx",
  "regionName" :"xxxxxxxxxxx",
  "status"     :"success",
  "timezone"   :"Asia/xxxx",
  "zip"        :""
}
الرد }}}
#4
(11-07-18, 04:51 AM)عبدالله الدوسري كتب : تسلم أخ سعود 
أكيد ستكون مفيدة .

إضافة للـ XML يمكن جلب البيانات على هيئة JSON

http://ip-api.com/json/xx.xxx.xx.xx
تفيد من يريد أن يستخدمها مثلاً مع C, C++, C#, Java, JavaScript, Perl, Python ,  Undecided وليس مع الـ VB.NET طبعاً.

كود :
{  
  "as"         :"xxxx",
  "city"       :"xxxx",
  "country"    :"xxxx",
  "countryCode":"xxxx",
  "isp"        :"xxxx",
  "lat"        :98.1234,
  "lon"        :24.4563,
  "org"        :"xxxxxx",
  "query"      :"54.000.158.000",
  "region"     :"xx",
  "regionName" :"xxxxxxxxxxx",
  "status"     :"success",
  "timezone"   :"Asia/xxxx",
  "zip"        :""
}


وعن طريق الـ VB.NET ايضاً اخى عبدالله الدوسري

القى نظرة هنا فى هذا الموضوع قمت باستخدام الـ Array 
لتحويلها للبيانات منفصلة بالنهاية

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: Amir_Alzubidy , Amir_Alzubidy , سعود , dubai.eig
#5
بارك الله فيكم جميعا 
فعلا البرمجة ممتعة بغض النظر عن فائدتهاSmileSmileSmile
الرد }}}
تم الشكر بواسطة: elgokr , dubai.eig
#6
السلام عليكم
مبدع دائما اخى سعود
الرد }}}
تم الشكر بواسطة: سعود , sendbad100
#7
(11-07-18, 07:32 PM)mero5000 كتب : السلام عليكم
مبدع دائما اخى سعود

وعليكم السلام ورحمة الله وبركاته
الابداع وجودك...بارك الله فيك.
الرد }}}
تم الشكر بواسطة: sendbad100 , mero5000 , Abou Eman
#8
الله يعطيك العافية مثال اكثر من رائع
الرد }}}
تم الشكر بواسطة:
#9
عمل ممتاز Wink ..

سيتم تطوير البرنامج و سأعطيك اياه Big Grin
الرد }}}
تم الشكر بواسطة:
#10
ما شاءالله عمل جميل 

والفكرة اروع


في نفس الوقت اتتني فكرة


كيف ممكن اسحب البيانات من هذا الموقع
dxsummit

البيانات في الموقع تتجدد كل شويه 

كيف ممكن اسحبها 

إقتباس :[صورة مرفقة: spotter_icon.e8a055c0.png] Spotter
[صورة مرفقة: frequency_icon.b66cf740.png] Freq.
[صورة مرفقة: source_icon.3b9707f6.png] DX
[صورة مرفقة: time_icon.bf8a03ba.png] Time
[صورة مرفقة: info_icon.9a35fbc1.png] Info
[صورة مرفقة: country_icon.6da97538.png] Country


هل من طريقه مشابهه للموضوع
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [مشروع] [لا جديد] تعديل موضع الفورم عند حدث mouseUp سعود 0 519 26-04-23, 10:04 PM
آخر رد: سعود
Wink [مشروع] مشروع تصميم فورم بشكل جديد بالفيجوال ستوديو مع السورس كود ahmadpal 8 6,994 12-04-23, 11:41 PM
آخر رد: spiky
  [مشروع] لا جديد باقي عن رمضان سعود 1 1,149 11-03-23, 06:36 PM
آخر رد: سعود
Rainbow [كود] معلومات عن جهاز الكمبيوتر محمد مسافر 7 1,550 27-10-22, 12:02 PM
آخر رد: محمد مسافر
  [مشروع] لا جديد جلب روابط موقع لملفات صوتية سعود 2 871 23-08-22, 07:31 AM
آخر رد: سعود
Music [مشروع] BM id3 Editor 1.1 برنامج لاعادة تعيين معلومات ملف صوتي ( التاق) asmarsou 0 779 29-06-22, 10:24 PM
آخر رد: asmarsou
  [مشروع] [لا جديد] تغيير خصائص مختارات من الادوات وحفظه وقت التشغيل سعود 0 840 20-06-22, 05:21 AM
آخر رد: سعود
  [مشروع] [لا جديد] انشاء ملف xml والتعامل معه استعانة بالداتاست سعود 0 812 20-06-22, 02:49 AM
آخر رد: سعود
Wink [مشروع] إستخدام ملف HtmlAgilityPack للتعامل مع النصوص[لا جديد بالموضوع ولكن استعرض عضلاتي قب] سعود 9 4,746 04-01-22, 07:28 PM
آخر رد: سعود
  [مشروع] [لا جديد ] نافذة تذكير كل مدة معينة [للجلسة الحالية فقط] سعود 0 1,199 03-01-22, 08:04 PM
آخر رد: سعود

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


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