Commandes Network (reseau)

Kayne · Message par **Kayne** » lun. 01/sept./2008 17:28

Bonjour,
Est-ce que les commandes Network ne marchent que pour un réseau local?
J'ai essayé un code avec mon ordi qui est un serveur et l'ordi de mon frere client ca marche. Mais avec un pote qui n'est pas dans le réseau ça marche pas...

venom · Message par **venom** » lun. 01/sept./2008 19:14

salut Kayne

non j'ai fait un programme de messagerie instantané et il fonctionne avec l'ip local mais aussi l'ip de connexion (de ta box ). j'ai tester avec une fille de tunisie et sa passer parfaitement a la seconde.

a tu essayer de lui filer ton adresse ip de connexion pour voir ?
voila

au faite le port que tu utilise avec CreateNetworkServer(0, port) la tu ouvert dans le par feu windows ? si non c'est mort

tien un code qui te permet de tester si tes port sont ouvert ou pas avec le par feu

Code : Tout sélectionner

InitNetwork()
;- Window Constants
Enumeration
  #Window_0
EndEnumeration

;- Gadget Constants
Enumeration
  #Text_0
  #Text_1
  #String_0
  #String_2
  #Button_0
EndEnumeration

Procedure.s OpenURL(Url.s, OpenType.b)
  isLoop.b = 1
  INET_RELOAD.l = $80000000
  hInet.l = 0 : hURL.l = 0 : Bytes.l = 0
  Buffer.s = Space(2048)
  
  hInet = InternetOpen_("PB@INET", OpenType, #Null, #Null, 0)
  hURL = InternetOpenUrl_(hInet, Url, #Null, 0, INET_RELOAD, 0)
  
  Repeat
    
    Delay(1)
    InternetReadFile_(hURL, @Buffer, Len(Buffer), @Bytes)
    If Bytes = 0
      isLoop = 0
    Else
      res.s = res + Left(Buffer, Bytes)
    EndIf
  Until isLoop = 0
  InternetCloseHandle_(hURL)
  InternetCloseHandle_(hInet)
  ProcedureReturn res
EndProcedure
HTML.s = OpenURL("http://www.monip.org/", 1)
debut.l = FindString(HTML, "<BR>IP : ", 1) + 9
fin.l = FindString(HTML, "<br>", 1)
ip.s = Mid(HTML, debut, (fin - debut))

If OpenWindow(#Window_0, 216, 0, 220, 105, "test connexion par ip", #PB_Window_SystemMenu | #PB_Window_TitleBar | #PB_Window_ScreenCentered )
  If CreateGadgetList(WindowID(#Window_0))
    FontID1 = LoadFont(1, "Comic Sans MS", 10, #PB_Font_Bold)
    TextGadget(#Text_0, 10, 10, 90, 20, " adresse ip :")
    SetGadgetFont(#Text_0, FontID1)
    TextGadget(#Text_1, 10, 40, 50, 20, " port :")
    SetGadgetFont(#Text_1, FontID1)
    StringGadget(#String_0, 110, 10, 100, 20, ip.s)
    StringGadget(#String_2, 110, 40, 100, 20, port$)
    ButtonGadget(#Button_0, 10, 70, 200, 25, "tester la connexion")
    
  EndIf
EndIf

Repeat
  EventID = WaitWindowEvent()
  If EventID = #PB_Event_Gadget
    Select EventGadget()
        
      Case #Button_0
        adresseip$ = GetGadgetText(#String_0)
        port$ = GetGadgetText(#String_2)
        port.l = Val(port$)
        ConnectionID = OpenNetworkConnection(adresseip$, port.l)
        If ConnectionID = 0
          MessageRequester("erreur", "impossible de se connecter au serveur", #MB_ICONERROR)
        ElseIf ConnectionID
          MessageRequester("good", "connexion reussi au serveur", 0)
        EndIf
        
    EndSelect
  EndIf
Until EventID = #PB_Event_CloseWindow

@++

Kayne · Message par **Kayne** » mar. 02/sept./2008 15:54

merci je viens de découvrir que j'utilisais une mauvaise ip. Ton code n'a pas l'air de marcher tellement sinon. Enfin je vais essayé ac la nouvelle ip et je te dirais.

Kayne · Message par **Kayne** » mar. 02/sept./2008 16:03

Je viens de faire les test:
Avec l'ip de ma freebox ca marche ni en local ni en exterieur. Ca marche mieux ac mon ip de base

venom · Message par **venom** » mar. 02/sept./2008 16:40

salut kayne,

désol le port de CreateNetworkServer(0, port ) est a ouvrir dans ta box ( ton routeur )

@++

Kayne · Message par **Kayne** » mar. 02/sept./2008 19:58

mais attend c trop chiant,
quand j'ouvre le port pour mon ip j'obtiens une autre ip quand je redémarre le routeur. C quoi ce truc qui veut pas me mettre la bonne ip ...

Kayne · Message par **Kayne** » mar. 02/sept./2008 20:12

J'essaie un truc,
J'ai mis toutes les ips que je peut avoir en libérant le port... La ca devrait marcher.

Ar-S · Message par **Ar-S** » mar. 02/sept./2008 21:32

Kayne a écrit :mais attend c trop chiant,
quand j'ouvre le port pour mon ip j'obtiens une autre ip quand je redémarre le routeur. C quoi ce truc qui veut pas me mettre la bonne ip ...

Faut ouvrir le port sur ton ip local, a savoir 192.16x.x.x
enfin je suppose.

venom · Message par **venom** » mar. 02/sept./2008 21:39

en faite comme tu reboot ta freebox elle réinitialise les ip locaux des ordinateurs connecter a cette dernière. essaye de débrancher la freebox et avant de rebrancher enlever ton câble réseau si tu est en wifi éteint ton ordinateur avant de débrancher la freebox. et rebrancher le tout après l'heur afficher.

sa devrez fonctionner

@++

Anonyme · Message par **Anonyme** » mar. 02/sept./2008 23:07

oulala , tu mélanges les ip's

l'ip de ta freebox, tu t'en balance , tu as 2 IP , un local , l'autre pour le net.

Pour connecté des ordi en local , les IP ont une suite du genre :

192.168.1.10
192.168.1.11
192.168.1.12
192.168.1.xx
etc...

Pour le net , y a pas de commande pb dédié à la récup de l'ip fournis par ton fai, faut passé par une page php ( code plus haut )

pour te facilité la tache, tu peut attribué des IP fixe pour le réseau local.

Ar-S · Message par **Ar-S** » mer. 03/sept./2008 0:13

Comme le dit Cpl.Bator, ton Ip local relié à ta box est donc 192.168.x.x
Maintenant si tu veux connaitre ton IP web tu peux utiliser MyIP ICI
petit soft que j'ai fait il y a qques mois.

venom · Message par **venom** » mer. 03/sept./2008 5:53

oulala , tu mélanges les ip's

c'est a moi que tu dit sa ? car moi je connais la différence bien sur que l'ip publique ont ne peut pas lui attribuer un port. c'est l'adresse ip local voici ce que sa donne sur ma freebox :

voila donc la j'ai ouvert un port :
3074 en tcp pour la xbox
3074 en udp pour la xbox
88 en udp pour la xbox
------------------------------
4662 en tcp pour mon ordi
4672 en udp pour mon ordi

mais comme dit Kayne si ton ip local est en automatique et bien des que tu reboot ta freebox ton ip local change

voilou

@++

Kayne · Message par **Kayne** » mer. 03/sept./2008 14:19

Alors voila j'ai essayé et çà marche toujours pas.
Mon ip local est la même que lorsque je libère les port sur le routeur (plus de pb de ce coté). Quabd j'essaie de me connecter je prend le port que j'ai libéré et je teste ac ton code venom. Resultat: ca ne marche tjs pas.
Je crois que je suis pas doué

venom · Message par **venom** » mer. 03/sept./2008 18:05

c'est peut être aussi mon code qui ne fonctionne pas lol
je teste et je te dit quoi

EDIT:

bon quand je test chez moi 4662 avec mon ip publique sa fonctionne. donc chez moi le code va après si des personnes peuvent teste chez eux sa serai cool.

@++

Kayne · Message par **Kayne** » mer. 03/sept./2008 19:15

et tu me dis quoi ?
(bienvenue chez les chtis lol)

et le port que j'ai ouvert moi c entre 6000 et 7000, ca change quelquechose ou faut que ce soit le 4662 ?