Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

ANALYSE A DISTANCE (CLIENT / SERVEUR )


Information sur la source

Catégorie :Réseau & Internet Niveau : Débutant Date de création : 27/04/2003 Date de mise à jour : 02/05/2003 23:10:11 Vu / téléchargé: 10 721 / 3 446

Note :
8,79 / 10 - par 14 personnes
8,79 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (39)
Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale
Une application client/seveur pour effectuer l'analyse d'une machine distante.
elle permet de recuperer plein d'infos sur la machine ou le serveur est installé :
- nom machine, utilisateur, caracteristiques réseau, info disk, etc ... (environ une quinzaine de fonctions ).
il ya aussi une fonction ki permet de faire de l'upload/dowload sur la machine distante.

j'ai fait cette appli pour mes besoins personnels, aucune ambiguité sur le trojan, d'ailleurs le serveur peut etre caché mais juste de l'écran, pas dans le task.
je me suis beaucoup inspiré de sources déjà présentes sur vbfrance, je remercie donc tous ceux à ki j'ai utilisé les sources, je les cites pas c'est trop long. C'est en fait un condensé de toutes ces sources.

- Utilisation d'API windows
- Utilisation de winsock

 

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

Commentaires et avis

signaler à un administrateur
Commentaire de devsurf le 28/04/2003 00:44:38

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

signaler à un administrateur
Commentaire de korosif le 28/04/2003 02:35:04

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!

signaler à un administrateur
Commentaire de PereNoel le 01/05/2003 16:35:50

C'est moi ou la capture correspond pas au prog  ? ;)

signaler à un administrateur
Commentaire de korosif le 02/05/2003 02:17:06

heu c toi !! :)

juste pour info , c la capture du client ! pas du serveur !
....

signaler à un administrateur
Commentaire de PereNoel le 02/05/2003 08:59:56

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

signaler à un administrateur
Commentaire de korosif le 02/05/2003 23:06:46

thx merci !! ;)

signaler à un administrateur
Commentaire de Sibelle07 le 12/01/2004 21:01:30

J'ai que un mot a dire : FORMIDABLE
je te mets 10/10
je ne savais rien de tout cela merci .

signaler à un administrateur
Commentaire de korosif le 13/01/2004 12:33:05

et bien merci à toi !! :)

signaler à un administrateur
Commentaire de korosif le 13/01/2004 12:34:12

c bien de voir que l'on apprecie ma petite appli !! ;)

signaler à un administrateur
Commentaire de peyo22 le 08/03/2004 19:04:54

1 mot à dire : gg

signaler à un administrateur
Commentaire de rdjzoo le 01/04/2004 09:52:11

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.

signaler à un administrateur
Commentaire de korosif le 02/04/2004 12:36:12

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 !! :)

@+

signaler à un administrateur
Commentaire de mourad183 le 03/05/2004 10:42:06

   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,

signaler à un administrateur
Commentaire de korosif le 03/05/2004 19:05:15

je suis prêt a t'aider sans problème !! :) c pour une bonne cause !! un cybercafé :)

signaler à un administrateur
Commentaire de rdjzoo le 05/05/2004 08:13:08

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.

signaler à un administrateur
Commentaire de korosif le 06/05/2004 22:33:47

oui ca m'interesse !!

balance sur mon mail, merci !! :)

signaler à un administrateur
Commentaire de RestoredData le 11/06/2004 20:38:02

excellent 20/10 looool merci bcp

signaler à un administrateur
Commentaire de cirek le 05/08/2004 14:39:17

Bravo et Encore Bravo, t'es vraiment un champion

signaler à un administrateur
Commentaire de cirek le 05/08/2004 14:39:21

Bravo et Encore Bravo, t'es vraiment un champion

signaler à un administrateur
Commentaire de dylan10 le 06/08/2004 13:43:14

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"

signaler à un administrateur
Commentaire de korosif le 07/08/2004 03:27:14

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 ! :)


signaler à un administrateur
Commentaire de dylan10 le 10/08/2004 13:23:08

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.

signaler à un administrateur
Commentaire de compilation le 20/09/2004 03:31:36

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

signaler à un administrateur
Commentaire de korosif le 21/09/2004 01:05:03

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 ! :)




signaler à un administrateur
Commentaire de pccorsan le 03/11/2004 21:36:13

Merci :)
Sizi seviyorum
=Turkey=

signaler à un administrateur
Commentaire de OUALON2002 le 07/05/2005 21:34:40

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

signaler à un administrateur
Commentaire de korosif le 07/05/2005 22:02:55

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

signaler à un administrateur
Commentaire de OUALON2002 le 07/05/2005 22:05:19

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.

signaler à un administrateur
Commentaire de OUALON2002 le 08/05/2005 04:29:22

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.

signaler à un administrateur
Commentaire de korosif le 10/05/2005 13:44:12

merci a toi pour le complement !: )

signaler à un administrateur
Commentaire de biscuitema le 11/05/2005 15:52:55

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.

signaler à un administrateur
Commentaire de YsF le 22/07/2005 21:01:21

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.

signaler à un administrateur
Commentaire de brute le 02/05/2006 16:13:39

SUPER PROGRAMME ...

signaler à un administrateur
Commentaire de cc22c le 18/05/2006 13:25:41

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 !!!!!!!!

signaler à un administrateur
Commentaire de cc22c le 18/05/2006 13:27:59

Oula désolé mais le site bug. Avec IE sa marche et firefox sa bug ! Connection au serveur trop long ! sorry

signaler à un administrateur
Commentaire de ianis24 le 02/02/2007 20:41:46

C'est rare un Trojan en VB , dommage qu'il soit detecter , 10/10.

signaler à un administrateur
Commentaire de korosif le 05/02/2007 12:55:07

ce n'est pas un trojan. Meme si ca y ressemble fortement ! c'est pour faire des analyses ;) merci pour la note :)

signaler à un administrateur
Commentaire de MarWanted le 23/03/2008 22:21:02 10/10

C'est Bien 10/10 mais il manque le package ( detection de l'antivirus)

signaler à un administrateur
Commentaire de djgab21 le 07/06/2008 13:45:56

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.

Ajouter un commentaire



Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, 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
Temps d'éxécution de la page : 0,281 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.