begin process at 2010 02 09 23:46:40
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Système

 > INFORMATIONS SYSTÈME (VIA WMI)

INFORMATIONS SYSTÈME (VIA WMI)


 Information sur la source

Note :
6 / 10 - par 1 personne
6,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Système Classé sous :wmi, composant, wql, systeme, processeur Niveau :Initié Date de création :22/05/2006 Date de mise à jour :29/05/2006 14:17:31 Vu / téléchargé :8 816 / 1 499

Auteur : fjohnny

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

 Description

Cliquez pour voir la capture en taille normale
Un composant qui utilise WMI (Windows Management Instrumentation) pour récupérer des informations système sur un ordinateur local ou distant.
J'ai mis un petit programme de démonstration pour illustrer l'utilisation de ce composant.


 Conclusion

J'ai un petit problème sur la récupération des infos pour les logiciels, ca marche mais la méthode que j'ai employé est relativement longue. Alors si quelqu'un à une idée... pour optimiser tout cela.

 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


 Historique

22 mai 2006 17:44:30 :
Modification des uses : * Suppression des unité inutiles (Autostart, Desktop, Regions).
29 mai 2006 14:17:31 :
J'ai ajouté le fichier "WbemScripting_TLB.pas", car il semble que celui qui est importé n'est pas forcément complet. Celui-ci est a copié dans le répertoire : " C:\Program Files\Borland\Delphi7\Imports"

 Sources du même auteur

Source avec Zip Source avec une capture MISE EN OEUVRE DE WMI (VIA WQL)

 Sources de la même categorie

Source avec Zip Source avec une capture GLIBWMI VCL COMPONENT LIBRARY 1.6B par Neftali
Source avec Zip Source avec une capture UNITÉ DE SUPPORT VISTA par Bacterius
Source avec Zip Source avec une capture NETTOYEUR AUTOMATIQUE DE VOS DISQUES par diglas
Source avec Zip Source avec une capture LES VALUE'S FADERS par blueperfect
Source avec Zip Source avec une capture COUNTERS, UNITÉ DE CALCUL DE PERFORMANCE par Bacterius

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture GLIBWMI VCL COMPONENT LIBRARY 1.6B par Neftali
Source avec Zip Source avec une capture TQGRID UN STRINGGRID AMÉLIORER. par yanb
Source avec Zip Source avec une capture NETTOYEUR AUTOMATIQUE DE VOS DISQUES par diglas
Source avec Zip Source avec une capture GESTION DES "CRASHS D'APPLICATION" par Bacterius
Source avec Zip Source avec une capture MISE EN OEUVRE DE WMI (VIA WQL) par fjohnny

Commentaires et avis

Commentaire de yvessimon le 22/05/2006 16:13:49

il ne trouve pas WbemScripting_TLB ?

Commentaire de SOUMIA le 22/05/2006 16:45:08

salut ;

le meme probleme dansle  Fichier activex (WbemScripting_TLB)
  

Commentaire de fjohnny le 22/05/2006 16:53:44

Il faut que tu ailles dans le menu Project\Importer une bibliothèque de type puis tu clique sur ajouter et tu va chercher le fichier c:\Windows\System32\wbem\wbemdisp.tlb
Et tu clique sur creér l'unité.

Commentaire de yvessimon le 22/05/2006 17:28:55

C'est AutoStart.dcu qu'il ne trouve pas.

est-ce compatible avec  delphi 7 et windows 2000 pro ?

Salutations

Commentaire de fjohnny le 22/05/2006 17:38:25

Autostart est mis dans les Uses, mais il est inutile en le supprimant ca doit marcher, d'ailleurs je vais le modifié dans le Zip.

Commentaire de fjohnny le 22/05/2006 17:41:50

D'ailleurs dans les uses Desktop et Regions ne sont pas utiles non plus. Désolé pour cette étourderie ! (Je travallais sur autre chose en même temps).

Commentaire de fjohnny le 22/05/2006 17:56:26

Yvessimon, pour répondre à ta question, c'est effectivvement compatible avec Delphi 7 (j'utilise Delphi 7). Pour Windows 2000 Pro  ca ne pose pas de problème non plus, car je crois que WMI est installé par défaut sous Windows 2000.

Commentaire de yvessimon le 23/05/2006 08:51:34

il ne trouve pas wbemConnectFlagUseMaxWait ?

Salutations

Commentaire de fjohnny le 23/05/2006 09:55:28

Normalement en ayant importé WbemScripting_TLB, il ne devrait pas avoir de pb, à moins qu'il te manque dans ton chemin de recherche le repertoire où est créer l'unité WbemScripting_TLB.

Pour l'ajouter :
Projet/Options/"Repertoires/Conditions" et sur la ligne "Chemin de recherche" ajouter "C:\Program Files\Borland\Delphi7\Imports".

Commentaire de yvessimon le 23/05/2006 17:13:56

wbemConnectFlagUseMaxWait n'est pas dans le fichier WbemScripting_TLB.pas ?

Commentaire de fjohnny le 24/05/2006 08:22:21

Dans mon WbemScripting_TLB.pas je retrouve dans les type la déclaration suivante:

// Constantes pour enum WbemConnectOptionsEnum
type
  WbemConnectOptionsEnum = TOleEnum;
const
  wbemConnectFlagUseMaxWait = $00000080;

Commentaire de yvessimon le 24/05/2006 09:04:01

Il n'y a pas cette déclaration dans WbemScripting_TLB.pas.

Il doit y avoir incompatibilité entre les versions

Salutations

Commentaire de fjohnny le 29/05/2006 14:19:14

J'ai ajouté le fichier "WbemScripting_TLB.pas", car il semble que celui qui est importé n'est pas forcément complet. Celui-ci est a copié dans le répertoire : " C:\Program Files\Borland\Delphi7\Imports"

Commentaire de yvessimon le 29/05/2006 15:37:08

Je dois faire une grosse erreur car j'ai l'erreur
---------------------------
Erreur
---------------------------
Violation d'accès à l'adresse 04A15B66 dans le module 'Info_Systeme_w.bpl'. Lecture de l'adresse 00000000.
---------------------------

Lorsque j'installe le composant WMI_info  ?


Salutations



Commentaire de fjohnny le 29/05/2006 17:56:48

A tu bien récupéré le Wbemscripting_TLB que j'ai mis dans le zip ?
Ensuite essaye d'installer le composant WMI_Info avant de charger le projet.

Salutations.

Commentaire de yvessimon le 30/05/2006 08:32:21

C'est ce qu l'ai fait

J'essaye sur un autre poste

Commentaire de fjohnny le 31/05/2006 12:18:18

Le composant WMI_Infos est indépendant de InfoSystem (je l'ai conçut à l'origine pour un autre projet), je comprends pas ton message d'erreur... Peut-être est-il a moitié installé, esssaye alors de le déinstaller (en général dans le fichier : C:\Program Files\Borland\Delphi7\Lib\dclusr.dpk)

Sur un autre poste ca donne quoi ?

Salutations.

Commentaire de yvessimon le 01/06/2006 11:44:05

sur l'autre poste le comportement est identique.

le fichier  WbemScripting_TLB.pas n'est pas le même.

Aussi il doit y avoir une différence de version entraînant un dysfonctionnement

Mersi
Salutations

Commentaire de fjohnny le 01/06/2006 14:40:39

As-tu fais le test avec le fichier WbemScripting_TLB que j'ai mis dans le zip, car si c'est pas un problème de compatibilité, ca devrait le résoudre.

Je suis désolé de revenir la dessus, mais j'aimerai bien comprendre.
En enregistrant le composant WMI_Infos tu as cette erreur ?
"Violation d'accès à l'adresse 04A15B66 dans le module 'Info_Systeme_w.bpl'. Lecture de l'adresse 00000000"
1) Projet Info_system fermé.
2) Aucune reférence à 'Info_Systeme' dans WMI_Infos
Comment fait-il pour t'afficher cette erreur (Avec 'Info_Systeme.bpl')?
C'est typiquement le genre d'erreur de débordement de pile ou de dépassement mémoire. Un truc qui a pas été initialisé, par exemple, ou un pointeur sur une adresse non valide...

A moins que j'ai mal compris l'ennoncé !!!


Salutations.

Commentaire de yvessimon le 01/06/2006 15:08:47

Oui j'ai utiliser les 2 fichiers WbemScripting_TLB

puisaue le ficheir WbemScripting_TLB généré sur mon poste différe cela montre qu'il y à une différence de système hors de mes compétences.

Merci
Salutations

Commentaire de kadel le 28/08/2008 17:15:48

Slt !
Comment avoir les informations tel que l'ecran connecté, les imprimantes , les scanners ... Brefs les périphériques.

Commentaire de fjohnny le 28/08/2008 17:43:50

Bonjour

WMI permet de récupérer les informations sur un PC. On a pas directement access aux périphériques reliés sur celui-ci.
Par contre on peut accéder assez facilement aux imprimantes INSTALLE sur le PC en utilisant la classe "Win32_printers" (elle implémenté dans le composant WMI_Infos) ci-dessus.
Pour les scanners je ne sais pas trop. Je pense qu'en regardant les classes qui nous renseignent sur les ports USB, SCSI, LTP (pour les plus anciens) on devrait pouvoir trouver une info nous permettant de savoir que quelquechose est branché dessus.

Commentaire de pierre8352 le 30/09/2008 17:08:39

Bonjour,

J'ai téléchargé vos sources mais malheureusement quand j'exécute l'exe il me met un message de violation d'accès. Même chose lorsque j'utilise vos sources dans un projet que je réalise moi même. L'importation de WbemScripting dans Delphi 7 a été fait de manière correct. Avez-vous une solution à mon problème ?

Merci pour vos réponses.

Commentaire de fjohnny le 01/10/2008 12:26:33

Avez vous essayé d'utiliser le WbemScripting du code source ? Il y a souvent des différences en fonction des postes.

Commentaire de benmabrouk le 17/10/2009 12:36:51 6/10

bien  

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Pb : Le composant internet de delphi [ par infohelp ] Bonjour je cherche le composant similaire d'acces a internet de visual basic (winsock) mais le meme avec les meme fonctions et qui prenent les proxy c Utiliser TIdMappedPortTCP """Composant Indyserver""" [ par PsyckoHia ] SaLuT je cherche a utiliser TIdMappedPortTCP qui se trouve dans Indy seveur , Est ce que qq'un peux me donner un exemple simple,à part celui qui est Composant clientsocket [ par MeuhMeuh ] Bonjour,Je voudrais savoir s'il est possible de positionner des FLAGS (RST,FIN,OOB...) quand on envoie des données avec le composant Client Socket, si Programme console et composant database [ par VTCFMAN ] Peut-on utiliser les composants Database dans un programme console avec ou sans module de données ?. Si non existe-t-il des des librairies permettant URGENT : problème d'installation de composant [ par Henri ] problème d'installationBonjour,Je vous remercie de résoudre le problème suivant :Je voudrais installer un composant téléchargé sans son fichier *.pas composant webbrowser [ par vib ] Bonjour, Je débute en Delphi.Je désire récupéré le contenu d'une page Html à partir du composant Webbrowser.J'ai utilisé ce composant avec VB, proprié TNMPOP3 composant [ par Steph ] j'ai essayé d'utiliser le composant TNMPOP3 (FastNet) pour afficher le nombre de messages reçus (non lus ?) dans ma boite aux lettres Outlook.Pour cel Création dynamique de composant [ par Amadeus ] Comment créer dynamique des contrôle TImage ?Je voudrais créer sur une Form autant de TImage que d'image se trouvant dans un répertoire donné. Comment composant de l'explorateur [ par vib ] Bonjour,Quelqu'un pourrit il me dire ou trouver le composant qui liste les fichiers dans l'explorateur et qui permet d'un simple clic sur l'entête de propriété d'un composant à partir de 'components' [ par vib ] Je désire modifier les propriétés de n'importe quel composant sur une feuille.Je me suis servi de la propriété 'components'de la feuille avec l'index


Nos sponsors


Sondage...

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
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,764 sec (4)

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