ANALYSE A DISTANCE (CLIENT / SERVEUR )

devsurf Messages postés 148 Date d'inscription dimanche 13 octobre 2002 Statut Membre Dernière intervention 13 novembre 2008 - 28 avril 2003 à 00:44
djgab21 Messages postés 66 Date d'inscription vendredi 15 juin 2007 Statut Membre Dernière intervention 19 mai 2011 - 7 juin 2008 à 13:45
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/6894-analyse-a-distance-client-serveur

djgab21 Messages postés 66 Date d'inscription vendredi 15 juin 2007 Statut Membre Dernière intervention 19 mai 2011
7 juin 2008 à 13:45
10/10 Merci grâce à toi je viens de comprendre le contrôle winsock
Dommage qu'il est détecté comme un trojan... mais je vais essayer de le modifier pour qu'il soit pas détecté comme ça je pourrait lire toute la source tranquillement sans devoir désactiver l'anti virus.
marwanted Messages postés 13 Date d'inscription samedi 26 janvier 2008 Statut Membre Dernière intervention 28 mai 2008
23 mars 2008 à 22:21
C'est Bien 10/10 mais il manque le package ( detection de l'antivirus)
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
5 févr. 2007 à 12:55
ce n'est pas un trojan. Meme si ca y ressemble fortement ! c'est pour faire des analyses ;) merci pour la note :)
ianis24 Messages postés 87 Date d'inscription dimanche 20 août 2006 Statut Membre Dernière intervention 13 janvier 2011
2 févr. 2007 à 20:41
C'est rare un Trojan en VB , dommage qu'il soit detecter , 10/10.
cc22c Messages postés 20 Date d'inscription mardi 17 mai 2005 Statut Membre Dernière intervention 22 novembre 2006
18 mai 2006 à 13:27
Oula désolé mais le site bug. Avec IE sa marche et firefox sa bug ! Connection au serveur trop long ! sorry
cc22c Messages postés 20 Date d'inscription mardi 17 mai 2005 Statut Membre Dernière intervention 22 novembre 2006
18 mai 2006 à 13:25
Salut, j'ai un probleme avec le trojan que tu as crée. Je vais dans le dossier client je clique sur client_ghk.vbp . Le fichier s'ouvre avec microsoft visual basic 6.0 et là c'est écris

'C:\Documents and Settings\Cc22C\Bureau\vbfrance_source_6894\client_serveur 2.05\Client\MSWINSCK.OCX' could not be loaded--Continue Loading Project?

Je met Oui

Errors during load. Refer to 'C:\Documents and Settings\Cc22C\Bureau\vbfrance_source_6894\client_serveur 2.05\Client\client_ghk.log' for details

Je met OK ---> Ensuite je le compile en .exe
---------------------------
Microsoft Visual Basic
---------------------------


Method or data member not found

Et sa surligne sa :

Private Sub BTcachestart_Click()
Winsock.SendData "023"
End Sub

Si tu peu m'aidé sa serais trop sympa !!

Merci !!!!!!!!
cs_brute Messages postés 135 Date d'inscription mercredi 8 novembre 2000 Statut Membre Dernière intervention 11 mai 2007 1
2 mai 2006 à 16:13
SUPER PROGRAMME ...
cs_YsF Messages postés 8 Date d'inscription vendredi 31 décembre 2004 Statut Membre Dernière intervention 16 août 2005
22 juil. 2005 à 21:01
qlq pourait me preciser pourquoi je l'ai essaié avec un ami et elle m'a répondu "le server né pa joiniable", Si sa ne marche que dans un réseau local dite le je vous pris car c truc de Client Serveur vont me render dingue, ou encore s'il faut désactiver parefeu de WINXP aussi puisque j'ai désactivé mon autre Parefeu et ça na rien donner, je n'ai pas trouvé une seule source Client/Serveur qui marche dans ce site et des centained de Bravo 10/10.
Bref veuillez répondre je vous en suplie.
biscuitema Messages postés 14 Date d'inscription lundi 2 mai 2005 Statut Membre Dernière intervention 8 juin 2005
11 mai 2005 à 15:52
Franchement, ton code est super bien. Je suis en stage en ce moment, et je devais faire un application client/serveur sachant que je n'avais jamais touché à du VB. Merci beaucoup parce que du même coup, j'ai pu comprendre le fonctionnement du contrôle Winsock que je ne connaissais pas du tout.

J'ai pris ce qui m'interessait sur ton code et je l'ai modifié pour pouvoir scanner des données sur plusieurs ordinateurs les uns après les autres (une boucle pour tourner sur toutes les adresses IP qui m'interessent).
Je mettrais mon code source sur le site mais il n'est pas parfait alors ce n'est pas encore d'actualité.

En tous les cas, ton code est vraiment très bien. Félicitation.
Je te mets 10/10
(En plus, tu m'as fait gagné beaucoup de temps !)

Biscuit.
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
10 mai 2005 à 13:44
merci a toi pour le complement !: )
OUALON2002 Messages postés 4 Date d'inscription vendredi 20 août 2004 Statut Membre Dernière intervention 27 mai 2005
8 mai 2005 à 04:29
re

merci encore pour ta repence
j'ai tourve se qui faut fair pour que kaspersky ne le recone comme virus je poste la modif si sa peut aide.

dans : Private Sub Winsock_DataArrival(ByVal bytesTotal As Long)

en fait cette modif :

Case Is = "01" ' CD

Select Case Mid$(data, 3, 1) 'selectionne le 3è caracteres de data
Case Is = "1" 'ouvrir le CD
OUVRIR
Winsock.SendData "011"
Case Is = "2" 'Fermer le CD
FERMER
Winsock.SendData "012"
End Select


et en rajoute sa apre pour que sa marche nikel :

Sub OUVRIR()
Call CD("set CDAudio door open", Space$(128), 128, 0)
End Sub
Sub FERMER()
Call CD("set CDAudio door closed", Space$(128), 128, 0)
End Sub


et la comme magic kaspersky ne le detecte plus comme virus.

merci encore pour la source.
OUALON2002 Messages postés 4 Date d'inscription vendredi 20 août 2004 Statut Membre Dernière intervention 27 mai 2005
7 mai 2005 à 22:05
merci pour la repence

oui je sait bien que tu voule pas fair un virus mais y a pas dotre solus pour sa car desactive mon anti virus c'est un peut chos comme.
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
7 mai 2005 à 22:02
et bien ke faire alors ? si ce n'est desactivé ton antivirus !

je ne savais pas ke ct reconnu par kaspersky comme un virus ! lol c'était pas le but de faire un virus ! hmmm
OUALON2002 Messages postés 4 Date d'inscription vendredi 20 août 2004 Statut Membre Dernière intervention 27 mai 2005
7 mai 2005 à 21:34
salut

je suis nouveau mais ta source je la note 10/10.

mais j'ai un problem mon anti-virus kaspersky le detecte le serveur comme virus Backdoor.win32.vb.gen

commant je poure fair pour que il le detecte pas comme virus car il n'arete pas de me lence un mesage.

merci d'avance pour votre aide
pccorsan Messages postés 4 Date d'inscription mercredi 3 novembre 2004 Statut Membre Dernière intervention 19 novembre 2004
3 nov. 2004 à 21:36
Merci :)
Sizi seviyorum
Turkey
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
21 sept. 2004 à 01:05
Pour les apis je me suis inspirer d'un aide api present sur le site vb source :

http://www.vbfrance.com/code.aspx?ID=6690

Pour la visualisation du pc victime , il n'y a pas de capture d'ecran , mais tout les commandes executées et reçu son recenesé dans le cadre rouge ( haut droite ) de l'appli. la capture d'écran et pilotage de souris ossi, mais je n'ai malhueureusement pas le temps de faire ca en ce moment. desolé , mais ca viendra ! :)
cs_compilation Messages postés 3 Date d'inscription mercredi 15 septembre 2004 Statut Membre Dernière intervention 8 octobre 2004
20 sept. 2004 à 03:31
Merci c super génial j'ai deux mot a dire d'abord je veux savoir comment visualisé l'écran du pc victime et aussi est ce que t'as des cours sur les API parceque j'y connait rien en faite pence à éxpliqué les instuctions sur les modules parceque pour un débutant comme moi je trouve du mal a y adapté ;) 10/10
cs_dylan10 Messages postés 2 Date d'inscription jeudi 5 août 2004 Statut Membre Dernière intervention 10 août 2004
10 août 2004 à 13:23
merci de votre reponce, on a essayé ta solution mais ça marche pas,alors on a essayé de trouver le chemin de fichier "wbemdisp.tlb" à travers projet/references/parcourir/system32/wbem.
votre projet est manifique.
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
7 août 2004 à 03:27
essaye d'ajouter (cocher) dans le menu projet/references les refs suivantes :

microsoft scripting runtime & microsoft WMI scripting v1.2 library

ensuite je pense ca marchera mieux ! :)
cs_dylan10 Messages postés 2 Date d'inscription jeudi 5 août 2004 Statut Membre Dernière intervention 10 août 2004
6 août 2004 à 13:43
bonjour, j'ai un probléme consernant la declaration des types
Public Function wmiOperatingSystemInfo()

Dim wmiObjSet As SWbemObjectSet
Dim obj As SWbemObject
le compilateur ne connait pas ses objets "wmiObjSet","SWbemObjectSet"
cirek Messages postés 11 Date d'inscription vendredi 29 août 2003 Statut Membre Dernière intervention 1 février 2009
5 août 2004 à 14:39
Bravo et Encore Bravo, t'es vraiment un champion
cirek Messages postés 11 Date d'inscription vendredi 29 août 2003 Statut Membre Dernière intervention 1 février 2009
5 août 2004 à 14:39
Bravo et Encore Bravo, t'es vraiment un champion
RestoredData Messages postés 5 Date d'inscription samedi 27 décembre 2003 Statut Membre Dernière intervention 30 mai 2004
11 juin 2004 à 20:38
excellent 20/10 looool merci bcp
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
6 mai 2004 à 22:33
oui ca m'interesse !!

balance sur mon mail, merci !! :)
rdjzoo Messages postés 2 Date d'inscription mardi 27 janvier 2004 Statut Membre Dernière intervention 5 mai 2004
5 mai 2004 à 08:13
Salut!

Je fini bientot on stage au Mans (le 14/05) et je m en vais travailler à la DG... Pour le projet, je me suis donc fortement inspiré de ton code (tu me diras combien je te dois pour le copyright :-) ). J'ai enlevé des bouts, j en ai rajouté, etc. .Si tu es interessé, j'ai rajouté la capture d'ecran avec une frequence de 10 secondes.
Je te remercie encore pour avoir mis sur le net ton code, ca m a enlevé un sacré poids... :-)

@+
Erwan.
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
3 mai 2004 à 19:05
je suis prêt a t'aider sans problème !! :) c pour une bonne cause !! un cybercafé :)
mourad183 Messages postés 78 Date d'inscription mardi 8 avril 2003 Statut Membre Dernière intervention 25 janvier 2007
3 mai 2004 à 10:42
salut je v rien ajouter car ils ont tout dit, vraiment un tres bon code, je cherchais des trucs comme ça, mais ton truc rassemble tout j'en ai besoin, car je travaille ds un cybercafé et je travaille sur un projet de gestion d'un cybercafé, sois pres je v te poser des millers de questions lol.
bravo 10/10,
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
2 avril 2004 à 12:36
effectivement j'étais au mans !! :)

et effectivement c'était mon projet de stage ! donc deja presenté aux instructeurs, mais bon tu peux fortement t'en inspirer pour faire le tiens !! :)

si tu as besoin de conseil, viens sur le forum www.tai04.fr.st en public et je te réponderais volontiers !! :)

@+
rdjzoo Messages postés 2 Date d'inscription mardi 27 janvier 2004 Statut Membre Dernière intervention 5 mai 2004
1 avril 2004 à 09:52
C vraiment super bien fait!!!!! je cherchais justement un prog de ce style. Grace a toi, je viens de comprendre certaines choses sur le winsock... Pourtant, quelques point restent vraiment brumeux pour moi.
g une question très importante a te poser par contre:
g vu dans ton code une adresse internet rentrée en dur dans le code "entrez une adresse web" dans une msgbox: www.TAI04.fr.st
après verif, cette page correspond a un site internet existant qui parle d une promotion... Pour ma part, TAI me dit quelque chose et je voudrais une confirmation:
je suis actuellement en stage TAI au Mans et je dois rendre un projet similaire au tiens... si toi aussi tu es TAI, et que tu as rendu ce prog en projet de stage, je dois donc revoir ma copie... peux tu me dire ce qu il en est? au plaisir de te lire.
G.
cs_peyo22 Messages postés 26 Date d'inscription dimanche 2 novembre 2003 Statut Membre Dernière intervention 9 juillet 2004
8 mars 2004 à 19:04
1 mot à dire : gg
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
13 janv. 2004 à 12:34
c bien de voir que l'on apprecie ma petite appli !! ;)
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
13 janv. 2004 à 12:33
et bien merci à toi !! :)
Sibelle07 Messages postés 206 Date d'inscription dimanche 14 septembre 2003 Statut Membre Dernière intervention 25 mars 2005
12 janv. 2004 à 21:01
J'ai que un mot a dire : FORMIDABLE
je te mets 10/10
je ne savais rien de tout cela merci .
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
2 mai 2003 à 23:06
thx merci !! ;)
cs_PereNoel Messages postés 68 Date d'inscription mardi 31 décembre 2002 Statut Membre Dernière intervention 2 mai 2004
2 mai 2003 à 08:59
A, j'ai trouvé le pb :p
La capture correspond au projet.vbp et pas a l'executable.exe
mais quoi qu'il arrive il est super
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
2 mai 2003 à 02:17
heu c toi !! :)

juste pour info , c la capture du client ! pas du serveur !
....
cs_PereNoel Messages postés 68 Date d'inscription mardi 31 décembre 2002 Statut Membre Dernière intervention 2 mai 2004
1 mai 2003 à 16:35
C'est moi ou la capture correspond pas au prog ? ;)
cs_korosif Messages postés 21 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 3 juillet 2005
28 avril 2003 à 02:35
le wmi scripting sert a recolter les informations comme le n° de serie et compagnie , c'est une dll de windows !! ;)

merci de savoir ke cela fonctionne bien.
j'avais pourtant testé sur 98, et j'avais pas eu de blems. etonnant.
m'enfin puisque ta resolu le probleme toi même, tant mieux!
devsurf Messages postés 148 Date d'inscription dimanche 13 octobre 2002 Statut Membre Dernière intervention 13 novembre 2008
28 avril 2003 à 00:44
Merci - c'est trés trés bien fait.
J'ai eu quand meme un petit problème sur la partie serveur (je suis sou 98 / vb6).
Il plantait sur une command de type mid$ (car non reconu- pourtant le C:WINDOWSSYSTEMMSVBVM60.DLL est referencé !?)

Après quelques recherches, j'ai supprimé du projet serveur cette ligne
Reference=*G{565783C6-CB41-11D1-8B02-00600806D9B6}#1.2#0#c:.WINDOWSSystem32wbemwbemdisp.TLB#Microsoft WMI Scripting V1.2 Library
A quoi sert ce composant que je n'ai pas aparement et son absence ne génére pas d'erreur a demarge du projet ?

Merci encore...
et tout fonctionne maintenant