Sockets VB.net (2008)
Fermé
jobam7
Messages postés
47
Date d'inscription
samedi 4 octobre 2008
Statut
Membre
Dernière intervention
7 février 2010
-
3 nov. 2008 à 17:42
Areku - 3 janv. 2009 à 08:15
Areku - 3 janv. 2009 à 08:15
A voir également:
- Sockets VB.net (2008)
- Google earth 2008 ✓ - Forum loisirs/vie pratique
- Telecharger vb.net - Télécharger - Langages
- Visual basic 2008 - Télécharger - Langages
- Keygen autocad 2008 ✓ - Forum AutoCAD
- Tp vb.net + correction pdf - Forum VB / VBA
5 réponses
ipendpoint non défini.tu dois entrer directement l'adresse ip
par exemple,_socket.Connect ("87.98.134.54", 80))
par exemple,_socket.Connect ("87.98.134.54", 80))
jobam7
Messages postés
47
Date d'inscription
samedi 4 octobre 2008
Statut
Membre
Dernière intervention
7 février 2010
4
5 nov. 2008 à 08:46
5 nov. 2008 à 08:46
Merci beaucoup pour ton aide, vraiment.
Le debuf n'affiche aucune erreur, mais le problème c'est que lorsque Apache est coupé, le programme plante à
_socket.connect(...) , c'est compréhensible mais problématique.
Impossible de faire une condition avec _socket.connect(...) car il ne renvoi pas de valeur... Je refais donc appel à vous.
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim _socket As New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
_socket.Connect("87.98.134.54", 80)
If _socket.Connected = True Then
MsgBox("ok")
Else
MsgBox("NON")
End If
End Sub
Le debuf n'affiche aucune erreur, mais le problème c'est que lorsque Apache est coupé, le programme plante à
_socket.connect(...) , c'est compréhensible mais problématique.
Impossible de faire une condition avec _socket.connect(...) car il ne renvoi pas de valeur... Je refais donc appel à vous.
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim _socket As New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
_socket.Connect("87.98.134.54", 80)
If _socket.Connected = True Then
MsgBox("ok")
Else
MsgBox("NON")
End If
End Sub
jobam7
Messages postés
47
Date d'inscription
samedi 4 octobre 2008
Statut
Membre
Dernière intervention
7 février 2010
4
6 nov. 2008 à 14:01
6 nov. 2008 à 14:01
Un petit UP
jobam7
Messages postés
47
Date d'inscription
samedi 4 octobre 2008
Statut
Membre
Dernière intervention
7 février 2010
4
7 nov. 2008 à 18:18
7 nov. 2008 à 18:18
Alors un gros UP
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
jobam7
Messages postés
47
Date d'inscription
samedi 4 octobre 2008
Statut
Membre
Dernière intervention
7 février 2010
4
8 nov. 2008 à 16:20
8 nov. 2008 à 16:20
Vive les monologues!