devsurf
Messages postés148Date d'inscriptiondimanche 13 octobre 2002StatutMembreDernière intervention13 novembre 2008
-
28 avril 2003 à 00:44
djgab21
Messages postés66Date d'inscriptionvendredi 15 juin 2007StatutMembreDernière intervention19 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.
djgab21
Messages postés66Date d'inscriptionvendredi 15 juin 2007StatutMembreDernière intervention19 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és13Date d'inscriptionsamedi 26 janvier 2008StatutMembreDernière intervention28 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és21Date d'inscriptionmercredi 5 février 2003StatutMembreDerniè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és87Date d'inscriptiondimanche 20 août 2006StatutMembreDernière intervention13 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és20Date d'inscriptionmardi 17 mai 2005StatutMembreDernière intervention22 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és20Date d'inscriptionmardi 17 mai 2005StatutMembreDernière intervention22 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és135Date d'inscriptionmercredi 8 novembre 2000StatutMembreDernière intervention11 mai 20071 2 mai 2006 à 16:13
SUPER PROGRAMME ...
cs_YsF
Messages postés8Date d'inscriptionvendredi 31 décembre 2004StatutMembreDernière intervention16 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és14Date d'inscriptionlundi 2 mai 2005StatutMembreDerniè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és21Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention 3 juillet 2005 10 mai 2005 à 13:44
merci a toi pour le complement !: )
OUALON2002
Messages postés4Date d'inscriptionvendredi 20 août 2004StatutMembreDernière intervention27 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és4Date d'inscriptionvendredi 20 août 2004StatutMembreDernière intervention27 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és21Date d'inscriptionmercredi 5 février 2003StatutMembreDerniè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és4Date d'inscriptionvendredi 20 août 2004StatutMembreDernière intervention27 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és4Date d'inscriptionmercredi 3 novembre 2004StatutMembreDernière intervention19 novembre 2004 3 nov. 2004 à 21:36
Merci :)
Sizi seviyorum
Turkey
cs_korosif
Messages postés21Date d'inscriptionmercredi 5 février 2003StatutMembreDerniè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 :
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és3Date d'inscriptionmercredi 15 septembre 2004StatutMembreDerniè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és2Date d'inscriptionjeudi 5 août 2004StatutMembreDernière intervention10 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és21Date d'inscriptionmercredi 5 février 2003StatutMembreDerniè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és2Date d'inscriptionjeudi 5 août 2004StatutMembreDernière intervention10 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és11Date d'inscriptionvendredi 29 août 2003StatutMembreDernière intervention 1 février 2009 5 août 2004 à 14:39
Bravo et Encore Bravo, t'es vraiment un champion
cirek
Messages postés11Date d'inscriptionvendredi 29 août 2003StatutMembreDernière intervention 1 février 2009 5 août 2004 à 14:39
Bravo et Encore Bravo, t'es vraiment un champion
RestoredData
Messages postés5Date d'inscriptionsamedi 27 décembre 2003StatutMembreDernière intervention30 mai 2004 11 juin 2004 à 20:38
excellent 20/10 looool merci bcp
cs_korosif
Messages postés21Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention 3 juillet 2005 6 mai 2004 à 22:33
oui ca m'interesse !!
balance sur mon mail, merci !! :)
rdjzoo
Messages postés2Date d'inscriptionmardi 27 janvier 2004StatutMembreDerniè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és21Date d'inscriptionmercredi 5 février 2003StatutMembreDerniè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és78Date d'inscriptionmardi 8 avril 2003StatutMembreDernière intervention25 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és21Date d'inscriptionmercredi 5 février 2003StatutMembreDerniè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és2Date d'inscriptionmardi 27 janvier 2004StatutMembreDerniè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és26Date d'inscriptiondimanche 2 novembre 2003StatutMembreDernière intervention 9 juillet 2004 8 mars 2004 à 19:04
1 mot à dire : gg
cs_korosif
Messages postés21Date d'inscriptionmercredi 5 février 2003StatutMembreDerniè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és21Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention 3 juillet 2005 13 janv. 2004 à 12:33
et bien merci à toi !! :)
Sibelle07
Messages postés206Date d'inscriptiondimanche 14 septembre 2003StatutMembreDernière intervention25 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és21Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention 3 juillet 2005 2 mai 2003 à 23:06
thx merci !! ;)
cs_PereNoel
Messages postés68Date d'inscriptionmardi 31 décembre 2002StatutMembreDerniè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és21Date d'inscriptionmercredi 5 février 2003StatutMembreDerniè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és68Date d'inscriptionmardi 31 décembre 2002StatutMembreDernière intervention 2 mai 2004 1 mai 2003 à 16:35
C'est moi ou la capture correspond pas au prog ? ;)
cs_korosif
Messages postés21Date d'inscriptionmercredi 5 février 2003StatutMembreDerniè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és148Date d'inscriptiondimanche 13 octobre 2002StatutMembreDernière intervention13 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 ?
7 juin 2008 à 13:45
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.
23 mars 2008 à 22:21
5 févr. 2007 à 12:55
2 févr. 2007 à 20:41
18 mai 2006 à 13:27
18 mai 2006 à 13:25
'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 !!!!!!!!
2 mai 2006 à 16:13
22 juil. 2005 à 21:01
Bref veuillez répondre je vous en suplie.
11 mai 2005 à 15:52
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.
10 mai 2005 à 13:44
8 mai 2005 à 04:29
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.
7 mai 2005 à 22:05
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.
7 mai 2005 à 22:02
je ne savais pas ke ct reconnu par kaspersky comme un virus ! lol c'était pas le but de faire un virus ! hmmm
7 mai 2005 à 21:34
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
3 nov. 2004 à 21:36
Sizi seviyorum
Turkey
21 sept. 2004 à 01:05
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 ! :)
20 sept. 2004 à 03:31
10 août 2004 à 13:23
votre projet est manifique.
7 août 2004 à 03:27
microsoft scripting runtime & microsoft WMI scripting v1.2 library
ensuite je pense ca marchera mieux ! :)
6 août 2004 à 13:43
Public Function wmiOperatingSystemInfo()
Dim wmiObjSet As SWbemObjectSet
Dim obj As SWbemObject
le compilateur ne connait pas ses objets "wmiObjSet","SWbemObjectSet"
5 août 2004 à 14:39
5 août 2004 à 14:39
11 juin 2004 à 20:38
6 mai 2004 à 22:33
balance sur mon mail, merci !! :)
5 mai 2004 à 08:13
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.
3 mai 2004 à 19:05
3 mai 2004 à 10:42
bravo 10/10,
2 avril 2004 à 12:36
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 !! :)
@+
1 avril 2004 à 09:52
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.
8 mars 2004 à 19:04
13 janv. 2004 à 12:34
13 janv. 2004 à 12:33
12 janv. 2004 à 21:01
je te mets 10/10
je ne savais rien de tout cela merci .
2 mai 2003 à 23:06
2 mai 2003 à 08:59
La capture correspond au projet.vbp et pas a l'executable.exe
mais quoi qu'il arrive il est super
2 mai 2003 à 02:17
juste pour info , c la capture du client ! pas du serveur !
....
1 mai 2003 à 16:35
28 avril 2003 à 02:35
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!
28 avril 2003 à 00:44
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