تقييم الموضوع :
  • 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 ك ب / التحميلات : 90)
=====* التوقيع *======
=================
الرد }}
#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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [مشروع] [لا جديد] تغيير خصائص مختارات من الادوات وحفظه وقت التشغيل سعود 0 117 20-06-22, 05:21 AM
آخر رد: سعود
  [مشروع] [لا جديد] انشاء ملف xml والتعامل معه استعانة بالداتاست سعود 0 152 20-06-22, 02:49 AM
آخر رد: سعود
  [مشروع] لا جديد باقي عن رمضان سعود 0 410 24-01-22, 05:55 AM
آخر رد: سعود
Wink [مشروع] إستخدام ملف HtmlAgilityPack للتعامل مع النصوص[لا جديد بالموضوع ولكن استعرض عضلاتي قب] سعود 9 3,410 04-01-22, 07:28 PM
آخر رد: سعود
  [مشروع] [لا جديد ] نافذة تذكير كل مدة معينة [للجلسة الحالية فقط] سعود 0 520 03-01-22, 08:04 PM
آخر رد: سعود
  [مشروع] [لا جديد] [محدث] البحث بكل الاقراص و المجلدات الممكنة سعود 5 690 01-01-22, 04:33 AM
آخر رد: سعود
  [مشروع] PostFix اصلاح مشاركة معينة سعود 4 449 28-12-21, 07:43 AM
آخر رد: سعود
  [مشروع] [لا جديد ] NumbersGame سعود 0 402 08-12-21, 01:40 AM
آخر رد: سعود
Wink [مشروع] مشروع تصميم فورم بشكل جديد بالفيجوال ستوديو مع السورس كود ahmadpal 7 4,694 05-12-21, 09:21 PM
آخر رد: hajriss
  مجرد فكرة [MyProjectsZipper] سعود 0 354 25-11-21, 03:32 PM
آخر رد: سعود

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


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