begin process at 2008 08 22 00:40:01
1 229 731 membres
3 nouveaux aujourd'hui
14 267 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

RÉCUPÉRER SON IP EN VBSCRIPT TRÈS SIMPLEMENT


Information sur la source

Catégorie :VBScript Niveau : Débutant Date de création : 27/05/2003 Date de mise à jour : 27/05/2003 11:16:14 Vu : 7 989

Note :
9,13 / 10 - par 8 personnes
9,13 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (18)
Ajouter un commentaire et/ou une note

Description

J'ai eu du mal à trouver comment récupérer son ip en VBS, alors maintenant que j'ai trouvé, si ça peut servir à quun, voilà le code.
Difficile de faire plus simple

j'attends vos remarques éventuelles.

Source

  • Dim objSocket
  • Set objSocket = CreateObject("MSWinsock.Winsock")
  • msgbox objSocket.localip
Dim objSocket
Set objSocket = CreateObject("MSWinsock.Winsock")
msgbox objSocket.localip
  • signaler à un administrateur
    Commentaire de MrBurns le 27/05/2003 16:19:30

    Sur NT4 server SP6a, j'ai un message d'erreur Objet "MSWinsock.Winsock" introuvable.

  • signaler à un administrateur
    Commentaire de MrBurns le 27/05/2003 16:19:38

    Sur NT4 server SP6a, j'ai un message d'erreur Objet "MSWinsock.Winsock" introuvable.

  • signaler à un administrateur
    Commentaire de jmluc le 28/05/2003 08:33:44

    Dans le cas d'un serveur réseau...ça marche pas...prob avec Proxy ??
    Des idées ???
    JMLUC

  • signaler à un administrateur
    Commentaire de yoman64 le 11/06/2003 01:58:01

    Tres utile ,merci

  • signaler à un administrateur
    Commentaire de Jayz le 17/06/2003 03:15:52

    Je ne comprend pas pkoi ta soure se trouve dans vbs puik celle ci semble ne pas marche... a prieuve du contraire, mon debuggeur me dit que : Un composant ActiveX ne peut pas créer un objet.: 'MSWinsock.Network

  • signaler à un administrateur
    Commentaire de Intention le 20/06/2003 22:43:21

    marche pas

  • signaler à un administrateur
    Commentaire de Martial21 le 07/08/2003 18:21:52

    Si Si le code marche super bien, mais comment fait on pour récuperer le masque de sous reseau et la passerelle.
    Merci...
    Et bon code...

  • signaler à un administrateur
    Commentaire de laurent3d le 09/11/2003 03:30:19

    Martial21 Nous sommes heureux de savoir que chez toi cela fonctionne :-)
    pour ma part sur Windows 2000 Server SP4 j'ai le meme message que Jayz:    
    Un composant ActiveX ne peut pas créer un objet.: 'MSWinsock.Network
    Sous WinXP SP1 j'ai:
    Le module spécifié est introuvable
    As tu la réponse? Quelqu'un a la réponse? Merci ...

  • signaler à un administrateur
    Commentaire de alover le 08/12/2003 04:15:27

    Dim objSocket
    Set objSocket = CreateObject("MSWinsock.Winsock")
    MsgBox objSocket.localip
    a mon avis i zon du modifier le nom c tout.. maintenant, y'a plus ka trouver c coa Oo :)

  • signaler à un administrateur
    Commentaire de Sibelle07 le 04/01/2004 19:03:38

    haha lol
    c'est tout con en faite !
    avec l'ocx de winsock tu va rechercher l'objet de la fonction local ip :D

  • signaler à un administrateur
    Commentaire de cipolin le 12/05/2004 10:50:01

    Bonjour,
    Désolé de répondre si tard. Si le code ne marche pas, vérifiez la présence des composants Winsock sur votre machine et s'ils sont bien enregistrés.
    @+

  • signaler à un administrateur
    Commentaire de DDelec24 le 13/12/2004 16:50:32

    J'ai SP2 et ca fonctionne nickel merci beaucoup ;)

  • signaler à un administrateur
    Commentaire de debe le 23/12/2004 13:42:44

    Merci pour le script.
    Il fonctionne parfaitement sous Win2000 pro SP4.
    Bravo encore !!

  • signaler à un administrateur
    Commentaire de algori le 16/01/2005 14:02:56

    Court et efficace ! Rien à dire...

  • signaler à un administrateur
    Commentaire de algori le 09/02/2005 19:28:56

    Quoique marche pas terrible en définitive...

  • signaler à un administrateur
    Commentaire de chapata le 19/04/2005 11:53:00

    marche pas chez moi non plus avec : XP ... @+++

  • signaler à un administrateur
    Commentaire de sacdemerde le 13/10/2005 16:42:19

    Chez moi ca marche super mais bon peut etre que certain ont des problèmes du fait qu ils ne disposent pas du framework comprenant le  MSWinsock.Winsock.
    Peut être qu'en l'intègrant dans les références ça passera mieux.
    Enfin moi je dis ça mais rien n'est sûr :p

  • signaler à un administrateur
    Commentaire de trackpi le 19/09/2007 19:07:33

    Ca fonctionne sur mon PC, mais le résultat est faux ...
    J'ai comparé en allant sur internet sur un des multiples sites affichant l'IP et c'est différent.
    Je suis dans un hotel connecté à internet via le wifi de l'hotel.

Ajouter un commentaire

Pub



Appels d'offres

CalendriCode

Août 2008
LMMJVSD
    123
45678910
11121314151617
18192021222324
25262728293031

VS Express FR Gratuit !

VS Express en français et 100% gratuit !

Boutique

Boutique de goodies CodeS-SourceS