Connnecté avec l'espace .....

[falsam]

Testez ce code qui comporte une url comportant un espace. (Auteur initial : Geo Trouvpatou)
j'ai juste modifié l'url.

Code : Tout sélectionner

If InitNetwork()
   
   Address.s = " "
   Port = 8080
   
   Connection = OpenNetworkConnection(Address, Port, #PB_Network_TCP)

   Debug Connection
   If Connection
      Debug "J'aime ça quand ça marche !"
   Else
      Debug "Connexion impossible"
   EndIf
   
EndIf

J'obtiens J'aime quand ça marche et vous ?

[Geo Trouvpatou]

Moi j'suis connecté avec l'espace aussi, j'ai plus qu'à attendre une réponse de nos amis hors-terrestre.
On va pouvoir créer notre propre SETI.
On a déjà les 1ères lignes.

Mais bon, quel nul ce Geo, à filer des codes pourris pareil.

[EDIT]Ceci dit cela fonctionne correctement si on met une adresse valide ou non, cela nous renseigne si on est bien connecté avec le serveur ou pas.

[EDIT2]D'ailleur avec 2 espaces on a le résultat escompté.

[falsam]

Mais bon, quel nul ce Geo, à filer des codes pourris pareil.

Je me méfie avec ce forum. Geo, ce n'était pas le but de dire que ce code est moisi d'autant plus que je ne controle pas non plus que l'url est bien renseigné.

D'ailleur avec 2 espaces on a le résultat escompté.

Un seul espace ne te suffit pas ? :p

[Geo Trouvpatou]

Mais bon, quel nul ce Geo, à filer des codes pourris pareil.

Je m'auto-cite, pour te signaler que c'était de l'auto-dérision.
Je pensais que le smiley était inutile étant donné que j'avais débuté mon post en blaguouillant.

Ça avait déjà été dit, mais parfois un smiley manquant et paf c'est le drame.

[Geo Trouvpatou]

Un seul espace ne te suffit pas ? :p

Je voulais sous-entendre que c'était peut-être Fred qui n'avait pas assez contrôlé la chose.
Qu'il avait peut-être testé en mettant quelques espaces mais pas avec un seul.

[Guimauve]

Hahaha !!!!

Sous Linux, sans espace, avec 1 espace ou avec 2 espaces ou plus, j'obtiens toujours

0
Connexion Impossible

@falsam

C'est moi l'auteur original du code.

Code : Tout sélectionner

If InitNetwork()
  
  Address01.s = "http://www.koakdesign.info/thothbox/thothbox.php"
  Port01 = 8080
  
  Connection01 = OpenNetworkConnection(Address01, Port01, #PB_Network_TCP)
  
  Debug Connection01
  
  If Connection01
    Debug "J'aime ça quand ça marche !"
  Else
    Debug "Connexion impossible"
  EndIf
  
  Address02.s = "www.koakdesign.info"
  Port02 = 8080
  
  Connection02 = OpenNetworkConnection(Address02, Port02, #PB_Network_TCP)
  
  Debug Connection02
  
  If Connection02
    Debug "J'aime ça quand ça marche !"
  Else
    Debug "Connexion impossible"
  EndIf
  
EndIf

A+
Guimauve

[falsam]

Sous Linux, sans espace, avec 1 espace ou avec 2 espaces ou plus, j'obtiens toujours

Hooooo quel dommage. Tu ne sait pas ce que tu perds.

[Guimauve]

Faut croire que Windows est le trou par lequel les méchants extra-terrestres vont venir depuis l'ESPACE nous réduire en esclavage.

A+
Guimauve