begin process at 2012 02 16 02:27:21
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Réseau & Internet

 > FAIRE UN JEU RÉSEAU SIMPLEMENT ET GRATUITEMENT

FAIRE UN JEU RÉSEAU SIMPLEMENT ET GRATUITEMENT


 Information sur la source

Note :
8,5 / 10 - par 2 personnes
8,50 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Réseau & Internet Niveau :Débutant Date de création :27/10/2002 Date de mise à jour :27/10/2002 19:30:37 Vu / téléchargé :3 361 / 236

Auteur : sdrdis

Ecrire un message privé
Site perso
Commentaire sur cette source (7)
Ajouter un commentaire et/ou une note

 Description

En faite j'ai fait une page php3 sur lycos avec une base de données. Avec la page PHP3, je peux rentrer, lire ou supprimer des données avec la même page. J'utilise INET pour rentrer dans la page PHP3. L'exemple que j'ai donné est très simple, il rentre l'ip de l'ordinateur dans la base de donnée, lit toutes les ips connectées et supprime l'ip de l'ordinateur quand on quitte le programme. Après, avec winsock, on peut faire connecter les ordinateurs entres eux et faire un vrai jeu réseau...

Source

  • il faut un timer, inet, et un listbox...
  • Private Sub Form_Unload(Cancel As Integer)
  • a = Inet1.OpenURL("http://membres.lycos.fr/basemon/accessamm.php3?login=sdrdis&ip=" & Winsock1.LocalIP & "&type=kill") 'aussi simple que ça : on supprime l'addresse IP
  • End Sub
  • Private Sub Timer1_Timer()
  • Do While Not List1.List(0) = Empty
  • List1.RemoveItem 0
  • Loop
  • If Timer1.Interval = 10 Then
  • Timer1.Interval = 30000
  • a = Inet1.OpenURL("http://membres.lycos.fr/basemon/accessamm.php3?login=sdrdis&ip=" & Winsock1.LocalIP & "&type=write") 'Ici on écrit
  • End If
  • a = Inet1.OpenURL("http://membres.lycos.fr/basemon/accessamm.php3?login=sdrdis&type=readall") 'Ici on affiche toutes les addresses IP...
  • For b = 1 To Len(a)
  • If Mid(a, b, 1) = "/" Then b = b + 1: List1.AddItem c: c = Empty
  • If Mid(a, b, 1) = "<" Then GoTo endnext:
  • c = c & Mid(a, b, 1)
  • Next b
  • endnext:
  • End Sub
il faut un timer, inet, et un listbox...

Private Sub Form_Unload(Cancel As Integer)
a = Inet1.OpenURL("http://membres.lycos.fr/basemon/accessamm.php3?login=sdrdis&ip=" & Winsock1.LocalIP & "&type=kill") 'aussi simple que ça : on supprime l'addresse IP
End Sub

Private Sub Timer1_Timer()
Do While Not List1.List(0) = Empty
List1.RemoveItem 0
Loop
If Timer1.Interval = 10 Then
Timer1.Interval = 30000
a = Inet1.OpenURL("http://membres.lycos.fr/basemon/accessamm.php3?login=sdrdis&ip=" & Winsock1.LocalIP & "&type=write") 'Ici on écrit
End If
a = Inet1.OpenURL("http://membres.lycos.fr/basemon/accessamm.php3?login=sdrdis&type=readall") 'Ici on affiche toutes les addresses IP...
For b = 1 To Len(a)
If Mid(a, b, 1) = "/" Then b = b + 1: List1.AddItem c: c = Empty
If Mid(a, b, 1) = "<" Then GoTo endnext:
c = c & Mid(a, b, 1)
Next b
endnext:
End Sub

 Conclusion

Si vous voulez faire une base-de-données personnelle gratuitement, j'ai fais sur mon site (www.research3d.fr.st) la possibilité de faire ça (c'est pas de la PUB!!!). Par-contre il faut s'incrire (pour donner un nom à la base de données, c'est aussi gratuit)... Après vous être inscrit vous allez sur la page index et vous cliquez dans la rubrique "services" et après sur "Accès à une base de données pour par exemple des jeux (amélioré)". Il y aura des explications. A la fin il faudra mêtre le mot de passe et le login et VOILA....

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Sources du même auteur

Source avec une capture JEU RESSEMBLANT À SIMCITY
Source avec Zip PROTÉGER SON PROGRAMME PAR INTERNET (ENCORE PLUS SÉCURISÉ)
LOAD UNE FORM DANS UN SITE (ET ÇA MARCHE !)
FAIRE UN SITE PRO EN VB
Source avec Zip EXEMPLE SIMPLE POUR SÉCURISER VOTRE SITE WEB

 Sources de la même categorie

Source avec Zip Source avec une capture GESTIONNAIRE DE TÉLÉCHARGEMENT, AVEC REPRISE ET MULTITHREADI... par Madx23
Source avec Zip Source avec une capture CONVERTIR DU TEXTE RTF EN CODE HTML ET VICE-VERSA par vicosta
Source avec Zip Source avec une capture DICTIONAIRE TEXT/AUDIO/VISUELLE ANGLAIS AVEC WEBBROWSER CONT... par majnounmajda
Source avec Zip Source .NET (Dotnet) NSLOOKUP EN VB.NET OU COMMENT FAIRE UNE REQÛETE DNS EN PRÉCI... par ShareVB
Source avec Zip Source avec une capture MINI SEVEUR HTTP AVEC INTERFACE GRAPHIQUE ET IMPLÉMENTATIONS... par lemout

Commentaires et avis

Commentaire de sdrdis le 27/10/2002 20:36:41

Il y a quelques bugs avec le programme... Quand il s'éteind surtout il oublie de supprimer l'addresse IP... aussi, ceux qui ont une carte réseau, c'est l'addresse ip local qui s'affiche. Mais c'est qu'un exemple !

Commentaire de sdrdis le 27/10/2002 20:37:11

n'hesitez pas à mettre des commentaires...

Commentaire de WolfSpirit le 28/10/2002 09:46:24

ué ok.. mais ca sera pa non plus un super jeux en temps reel.. sinon ta base de donnée elle saute :p

Commentaire de mehdibou le 28/10/2002 12:05:34

et si tu te déconnecte sans quitter le programme, l'IP n'est toujours pas enlevée. C'est pourquoi il faut créer un robot qui supprime les IP si l'ordinateur n'a pas donné signe de vie depuis x secondes/minutes.
Sinon, l'idée est pas mal, faut juste que le PHP ne ralentisse pas trop le jeu, comme avec Free.

Commentaire de zappy le 28/10/2002 16:48:47

Pour faire un jeu il faudrait se connecter directement à un serveur TCP/IP.

Par contre, un serveur public avec une page indiquant une ip pourrait resoudre le probleme des ips dynamiques

Commentaire de celiphane le 30/10/2002 14:57:30

Woaw,
j'en connais sur cette page qui sont pas loin d'inventer la roue... lol
;)

Commentaire de lemouix le 17/08/2004 12:52:16

Salut,
Je suis en train de dev justmenet un petit messenger de la sorte avec toutes les adresses ip centralisées dans une bdd mysql. Le client est en VB et chaque machine est interconnectée. Le seul Ick c ke je voudrai le rendre indépendant dun serveur :) comme ca, on a ocun log, ocun controle.... si yen a ki ont des idées !!

boojojo52@hotmail.com

Tchuss
lemouiX

 Ajouter un commentaire




Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,577 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales