Sujet Précédent Sujet Suivant

INFORMATIONS SYSTÈME (VIA WMI)

yvessimon Messages postés 637 Date d'inscription mardi 22 avril 2003 Statut Membre Dernière intervention 9 janvier 2017 - 22 mai 2006 à 16:13
benmabrouk Messages postés 7 Date d'inscription vendredi 7 septembre 2007 Statut Membre Dernière intervention 20 avril 2011 - 17 oct. 2009 à 12:36

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/37706-informations-systeme-via-wmi

benmabrouk Messages postés 7 Date d'inscription vendredi 7 septembre 2007 Statut Membre Dernière intervention 20 avril 2011
17 oct. 2009 à 12:36

bien

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
1 oct. 2008 à 12:26

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

pierre8352 Messages postés 1 Date d'inscription jeudi 25 septembre 2008 Statut Membre Dernière intervention 30 septembre 2008
30 sept. 2008 à 17:08

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.

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
28 août 2008 à 17:43

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.

cs_kadel Messages postés 1 Date d'inscription lundi 21 avril 2003 Statut Membre Dernière intervention 28 août 2008
28 août 2008 à 17:15

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

yvessimon Messages postés 637 Date d'inscription mardi 22 avril 2003 Statut Membre Dernière intervention 9 janvier 2017
1 juin 2006 à 15:08

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

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
1 juin 2006 à 14:40

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.

yvessimon Messages postés 637 Date d'inscription mardi 22 avril 2003 Statut Membre Dernière intervention 9 janvier 2017
1 juin 2006 à 11:44

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

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
31 mai 2006 à 12: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.

yvessimon Messages postés 637 Date d'inscription mardi 22 avril 2003 Statut Membre Dernière intervention 9 janvier 2017
30 mai 2006 à 08:32

C'est ce qu l'ai fait

J'essaye sur un autre poste

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
29 mai 2006 à 17:56

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.

yvessimon Messages postés 637 Date d'inscription mardi 22 avril 2003 Statut Membre Dernière intervention 9 janvier 2017
29 mai 2006 à 15:37

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

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
29 mai 2006 à 14:19

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"

yvessimon Messages postés 637 Date d'inscription mardi 22 avril 2003 Statut Membre Dernière intervention 9 janvier 2017
24 mai 2006 à 09:04

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

Il doit y avoir incompatibilité entre les versions

Salutations

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
24 mai 2006 à 08:22

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

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

yvessimon Messages postés 637 Date d'inscription mardi 22 avril 2003 Statut Membre Dernière intervention 9 janvier 2017
23 mai 2006 à 17:13

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

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
23 mai 2006 à 09:55

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".

yvessimon Messages postés 637 Date d'inscription mardi 22 avril 2003 Statut Membre Dernière intervention 9 janvier 2017
23 mai 2006 à 08:51

il ne trouve pas wbemConnectFlagUseMaxWait ?

Salutations

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
22 mai 2006 à 17:56

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.

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
22 mai 2006 à 17:41

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).

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
22 mai 2006 à 17:38

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.

yvessimon Messages postés 637 Date d'inscription mardi 22 avril 2003 Statut Membre Dernière intervention 9 janvier 2017
22 mai 2006 à 17:28

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

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

Salutations

cs_fjohnny Messages postés 46 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 septembre 2006
22 mai 2006 à 16:53

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é.

cs_SOUMIA Messages postés 28 Date d'inscription jeudi 13 février 2003 Statut Membre Dernière intervention 25 juin 2008
22 mai 2006 à 16:45

salut ;

le meme probleme dansle Fichier activex (WbemScripting_TLB)

yvessimon Messages postés 637 Date d'inscription mardi 22 avril 2003 Statut Membre Dernière intervention 9 janvier 2017
22 mai 2006 à 16:13

il ne trouve pas WbemScripting_TLB ?

Discussions similaires

Les systèmes réducteurs

conception de systéme de géolocalisation de véhicule par balise gps

Combinaisons ??

gestion de systeme de pointage dans une entreprise

création d'un système de gestion de tickets pour SAV

Votre réponse

Discussions similaires