+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : الأقسام التعليمية - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=90)
+--- قسم : مكتبة أكواد المنتدى (http://vb4arb.com/vb/forumdisplay.php?fid=111)
+---- قسم : مكتبة أكواد ال Scripts (http://vb4arb.com/vb/forumdisplay.php?fid=118)
+---- الموضوع : معرفة رقم ال IP من خلال VBScript (/showthread.php?tid=5991)
معرفة رقم ال IP من خلال VBScript - RaggiTech - 17-10-12
كاتب الموضوع : AhmedEssawy
يمكنك من خلال ال Object والمسمى x والذي يرتبط بالكلاس المحدد له أن يقوم بارجاع رقم ال IP من خلال الخاصية localip ولكن هذا ال IP هو الظاهري وليس الحقيقي ، بمعنى أنه هو ال IP الموجود لك في الشبكة والذي يمكنك معرفته من خلال الشكبة وليس الحقيقي الذي يمكنك معرفته من خلال عدة مواقع تعيد لك ال IP الحقيقي لك على شبكة الإنترنت .الكود :
كود :
<p><object id="x" name="x"
classid="clsid:248DD896-BB45-11CF-9ABC-0080C7E7B78D"
align="baseline" border="0" width="28" height="28"></object></p>
<p><script language="VBScript"><!--
Private Sub window_onload()
document.write "Your IP: "+x.localip
End sub
--></script></p>