Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Cliquez ici pour mettre ce site au démarrage de votre navigateur

AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

begin process at 2009 07 05 22:57:32

SILVERLIGHT 3 : COMMUNICATION ET MULTICAST par KooKiz

[PERSO] DéCOUVERTES ESTIVALES : LINUX (PART I) par FREMYCOMPANY

[REFACTORING] RESHARPER POUR VISUAL STUDIO 2010 (PREVIEW) par tja

[REFACTORING] ANALYSER VOS EXCEPTIONS AVEC RESHARPER EXCEPTIONAL par tja

SHAREPOINT 2007 : PATTERNS & PRACTICES SHAREPOINT GUIDANCE par phil

RE : PROBLEME DANS BASE DE DONNéES par PCPT

RE : PROBLEME DANS BASE DE DONNéES par Tursiop60

RE : PROBLEME DANS BASE DE DONNéES par PCPT

RE : FUSIONNER 2 PROJETS ? COMMENT FAIRE ? par steeventide

+ de logiciels à télécharger

1 464 910 membres
401 nouveaux aujourd'hui
15 045 membres club

Trouver une ressource

Trouvez une ressource parmi 40 095 codes, 1 303 022 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

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 !

EXTINCTION A DISTANCE

Information sur la source

Catégorie :Système Classé sous : extinction, distance, pc Niveau : Débutant Date de création : 26/09/2004 Vu / téléchargé: 5 416 / 858

Auteur : bilaloch

Ecrire un message privé

Ce membre participe au partage de revenus publicitaires

Note :

6,50 / 10

Commentaire sur cette source (32)

Ajouter un commentaire et/ou une note

Description

Bonjour, j'ai fait cette source pour eteindre un ordinateur du reseau domestique sans client-serveur. J'ai essayé de m'appliquer dans le decor.

Je n'aurai jamai reussi a faire cela sans DarKSidiouS et son application se nommant ProgOTop Api. Merci DarKSidiouS.

Il est possible que ce prog ne fonctionne pas correctement, car il a était programmé dans XP et VB6. Merci et @ +

BILALoch

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 !

Extinction
- Adistance.frm 10 238 octets
- Adistance.frx32 148 octets
- Barre.bmp 29 556 octets
- CurseurPos.bas 306 octets
- Extinction.vbp 690 octets
- Extinction.vbw 90 octets
- MSSCCPRJ.SCC195 octets
- Quitter.bmp 940 octets
- Reduire.bmp 940 octets

Télécharger le zip

Sources du même auteur

ANIMATION DE FICHIER X

SENDKEY

SHAPE

SYNTHESE VOCALE ET RECONNAISSANCE VOCALE AVEC SUPPRIMER ET C...

Toutes les sources de bilaloch

Sources de la même categorie

YET ANOTHER PROCESS MONITOR : REMOTE VERSION par violent_ken

MONITEUR CPU par EBArtSoft

RÉCUPÉRER LES VARIABLES D'ENVIRONNEMENT DE N'IMPORTE QUEL PR... par violent_ken

REGMANIPULATION par tovo

INFOS WMI DES DISQUES DURS (LIEN LECTEUR LOGIQUE / LECTEUR P... par Renfield

Toutes les sources de la catégorie Système

Sources en rapport avec celle ci

CONTROLE DE LA BARRE DES TACHES A DISTANCE par djgab21

AIRPORT FINDER par jrichaud

EXTINCTION PC par kitati

ARRET DU PC par flagyg

EXTINCTION DUN PC APRÈS UN CERTAIN LAPS DE TEMPS par aaa

Commentaires et avis

Commentaire de bilaloch le 26/09/2004 12:10:57

Laisser des commentaires, des suggestions et veuiller noter s'il vous plait.

BILALoch

@ +

Commentaire de cboulas le 26/09/2004 12:47:05

Salut,

Ne marche pas sous Win98 : Erreur : "Fichier introuvable".

Commentaire de bilaloch le 26/09/2004 13:33:12

Merci cboulas. Si que quelqu'un a un autre systeme d'exploitation que XP et 98, dites moi si ca fonctionne. Merci

@ +

BILALoch

Commentaire de MadM@tt le 26/09/2004 13:38:16

La façon d'éteindre un pc change selon les OS.
Je te donnerai ce que j'utilise pour l'éteindre sous un maximum d'OS tout à l'heure.
@ +

Commentaire de bilaloch le 26/09/2004 14:40:50

Ok merci

@ +

BILALoch

Commentaire de Saros le 27/09/2004 18:33:01

Pour le déplacement du formulaire, il y a beaucoup plus simple, et sans les APIs :

[Global]
Private Xs as Integer
Private Ys as Integer
Private mMove as Boolean

[dans Barre_MouseDown :]
Xs = X
Ys = X
mMove = True

[dans Barre_MouseMove :]
If mMove Then
  Me.Left = Me.Left + X - Xs
  Me.Top = Me.Top + Y - Ys
  Xs = X
  Ys = Y
End If

[dans Barre_MouseDown :]
mMove = False

C'est tout...
Et pour le reste, tu peux répéter en remplaçant Barre par ce que tu veux dans MouseDown, MouseUp et MouseMove.
Mais bon c'est peu important ^^
Voilà, sinon j'ai pas essayé, je suis pas en réseau chez moi.
++

Commentaire de MadM@tt le 28/09/2004 21:43:09

Voilà excuse moi d'avoir été aussi long
Donc en fait j'utilise la méthode de XP et des plateforms non-NT en même temps :
ExitWindowsEx Shutdown, 1
Shell "SHUTDOWN -s"

avec l'api :
' Fermer Windows et redémarrer...
Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Public Const CLOSESESSION = 0   ' Fermer la session
Public Const Shutdown = 1       ' Eteindre l'ordi
Public Const Restart = 2        ' Redémarrer l'ordi
Private Const FORCE_CLOSE = 4   ' On l'utilise dans la fonction pour forcer la fermeture des app ouvertes
Private Const POWEROFF = 8  ' Eteindre le pc

Bon doit y'avoir encore des OS qui résistent mais ça marche sous XP et win98, donc il y'a au moins 85% des ordis sont éteints...

Bien sur c'est une technique de barbare, aucune détection de l'OS donc erreur générée si la commande n'existe pas sous tel ou tel OS. A utiliser donc avec le fameux :
On Error Resume Next   :)
voilà désolé d'avoir été si long c'était dans un vieux projet, et il me manquait l'api...
@ +

Commentaire de Saros le 28/09/2004 22:45:44

On fait comment pour atteindre les ordis en réseau avec ExitWindows (ou ExitWindowsEx) ?

Commentaire de bilaloch le 29/09/2004 13:35:13

Je te remerci Mad Matt. Mai pourrai tu voter STP?

@ +

BILALoch

Commentaire de ilsa le 22/01/2005 19:57:43

tres bonne idéé !
jy oré pas pensé lol

Commentaire de bilaloch le 22/01/2005 20:05:03

Merci ca fait plaisir...

++

BILALoch

Commentaire de Iceman_63 le 24/01/2005 14:46:48

bonjour a tous je voudrait savoir si on peu allumer le pc!

Commentaire de bilaloch le 24/01/2005 18:03:23

Ben oué... Mais en fait, ca fontionne pas chez moi :'(
Utilise le "Wake On Lan".

Commentaire de MadM@tt le 24/01/2005 19:16:01

Tiens interressant ... ça marche comment ?
où tu le trouve ?

Commentaire de bilaloch le 24/01/2005 21:05:29

Tiens MadM@tt : http://www.vbfrance.com/code.aspx?id=25740 et
http://www.vbfrance.com/code.aspx?ID=17347.

Je rajouterais que dans certains PC, cela ne fonctionne pas, et que dans certains PC, il faut l'activer dans le BIOS. Voila je te laisse regarder ces sources.

BILALoch

Commentaire de MadM@tt le 25/01/2005 21:28:58

merciiiiiiiii bocou

Commentaire de bilaloch le 26/01/2005 12:25:45

De rien... c'est pas tout les jours que j'aide quelqu'un lol...

BILALoch

Commentaire de juldeub le 28/01/2005 17:39:51

Bonjour à tous!!!
voila je fait parti d'un IUTet je voudrais savoir si il serait possible que j'utilise ton prog avec windows2000 pro (sachant que le serveur est sous LINUX) quand je le lance il m'écrit:
"fichier introuvable: 'c:\DOCUME~1\DEBEAU~\LOCALS~1\Temp\Adistance.frm"

et si je met continuer a charger et ke je click "activer" quand le temps est venu de le lancé il affiche:
" L'instruction à "0x00401846" emploi l'adresse mémoire "0x00000000". La mémoire ne peut pas être "read".

Voila je t'ai donné toute les informations pour t'expliker les bug rencontré sur Win2000.

Merci a++.

Commentaire de juldeub le 28/01/2005 17:44:32

Re
en fait jai trouvé la solution toute bête du premier probléme ("fichier introuvable..")
mais toujours pas pour la mémoire.. :-(

Je voulai te demandé si il faut pas préciser le nom du réseau?

Commentaire de bilaloch le 28/01/2005 17:54:02

Il faut préciser l'adresse IP ou le nom de l'ordinateur distant, mais que veut tu dire par " le nom du reseau" ?

Commentaire de juldeub le 31/01/2005 19:25:50

heu jai déja esseyé ac l'IP mai ca me fé toujours:
je click "activer" quand le temps est venu de le lancé il affiche:
" L'instruction à "0x00401846" emploi l'adresse mémoire "0x00000000". La mémoire ne peut pas être "read".

Pour le nom du réseau je voulé dire le domaine.

Commentaire de bilaloch le 01/02/2005 09:05:48

Non pas besoin...

Commentaire de juldeub le 04/02/2005 19:18:21

ok
et pour mon autre probleme tu voi ce ke ca peu étre?

Commentaire de bilaloch le 04/02/2005 19:19:45

Euh... non dsl mais je ne vois pas.

Commentaire de ben01n le 20/06/2005 13:21:22

Quelqu'un a-t-il compilé le prog avec la modif de MadM@tt ? Si vous l'avez, j'aimerais bien que vous me l'envoyez sur ma boite mail (ben01@tiscali.fr) car j'ai pas de compilateur en ce moment et j'ai absoument besoin de ce prog. Merci d'avance.

Commentaire de bilaloch le 02/11/2005 13:44:22

Pourquoi est ce que certains me mette 1? C'est une bonne source pourtant...

BILALoch

Commentaire de Saros le 02/11/2005 17:26:23

Des assoiffés de la souris souffrant d'une profonde pathologie vébécérébrale

Commentaire de bilaloch le 03/11/2005 12:32:54

Ah oki ca s'explique alors :)... mdr

BILALoch

Commentaire de Enigmax le 16/09/2008 17:22:38

j'ai téléchargé le .zip mais il y à une chose qu'il va faloir m'expliquer ^^ c'est comment ton programme fonctionne Oo a moins qu'il ne s'agisse pas d'un programme =)il n'y à pas de fichier de lancement ?

Commentaire de Saros le 16/09/2008 19:13:46

Faut le compiler.
Si tu sais pas ce que ça veut dire t'es pas sur le bon site => soit tu apprends le Visual Basic, soit le créateur du programme (ou autre) pourra te filer l'exe par mail.

Commentaire de Enigmax le 18/09/2008 20:26:14

ok merci et je sais ce que ça veut dire compiler -_- pas la peine d'etre malaimable <_< a+

Commentaire de bilaloch le 18/09/2008 21:08:48

Il n'est pas désagréable. Juste franc. Qui plus est, c'est ton précédent message qui a prêté à confusion. Donc c'est bien toi le fautif. Certes, ce n'était pas volontaire donc je ne te reproche rien :) D'ailleurs, à la limite, je te félicite d'avoir eu le courage de poser la question. Juste essaye de voir plus loin qu'un simple reproche dans mes phrases et ceux ce Saros.

BILALoch

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Arreter un PC a distance sur une LAN ? [ par Joez ] je veux savoir si c possible d'eteindre un PC sous win et un Mac qui se trouve sur un réseau local avec IPfixe ?Merci Comment détecter la demande d'extinction du PC [ par Spylover ] Bonjour,Je souhaite faire un prog qui se lance des la demande d'extinction d'un pc. Win95 -98 NT 2000 XPMerci de me signaler toutes les possibilités. Comment détecter la demande d'extinction du PC [ par Spylover ] Bonjour,Je souhaite faire un prog qui se lance des la demande d'extinction d'un pc. Win95 -98 NT 2000 XPMerci de me signaler toutes les possibilités. Comment détecter la demande d'extinction du PC [ par Spylover ] Bonjour,Je souhaite faire un prog qui se lance des la demande d'extinction d'un pc. Win95 -98 NT 2000 XPMerci de me signaler toutes les possibilités. deconnecter une connexion a distance [ par sreef ] Je dispose d'un PC avec modem et d'un PC sans modem qui partagent une connexion internet.je souhaite faire un programme qui permet de fermer la connex Gestionaire du materiels à distance [ par marisa ] Bonjour Je suis sur le point de travailler sur une application de gestion du parc materiels informatique, le but est de pouvoir connaitre à distance l Connaitre la RAM à Distance [ par cedleg ] Bonjour,Je cherche une source qui permet de connaitre la valeur de la memoire RAM sur un PC distant, jusque la j'ai trouvé pour trouver sur un PC en l Script vbs pour allumer un pc à distance [ par dale02 ] Bonjour,Je recherche un script vbs qui me permettraint d'allumer un pc à distance!!Il s'agit d'une machine d'un domaine géré par un seu Lancer un exécutable à distance [ par Algade ] AlgadeComment fait-on en VB6 pour lancer à partir d'un PC N°1, une application (Appli.exe) située sur un PC N°2. Les 2 PC sont sur un réseau et il fau eteindre de pc a distance [ par franckpeer2p ] salut! je voudrais savoir si il est possible d'executer la commande:shutdown -r -m \\nompostepour eteindre un pc en cliquant sur un bouton dans un for