begin process at 2010 02 09 22:21:21
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Trucs & Astuces

 > [.NET 2] INFORMATION GÉNÉRALE ET UTILE POUR L'ORDINATEUR

[.NET 2] INFORMATION GÉNÉRALE ET UTILE POUR L'ORDINATEUR


 Information sur la source

 Description

Vous cherchez des infos sur votres souris, écran, clavier ou encore sur les ports, ne cherchez plus j'ai ce qu'il vous faut !!! En regardant dans l'aide fournit par VB
j'ai trouvé plein d'info disponible sur l'ordinateur.  mettez le code dans un bouton click juste pour voir ce que cela donne. J'ai pas eu le temps de tous regarder mais il y en a encore beaucoup plus dans ca : Microsoft.VisualBasic.MyServices.

Source

  • Dim a As New Microsoft.VisualBasic.MyServices.MyComputer
  • MsgBox("OSFullName. = " + a.Info.OSFullName.ToString + Chr(10) + "OSPlatform. = " + a.Info.OSPlatform.ToString + Chr(10) + "OSVersion. = " + a.Info.OSVersion.ToString _
  • + Chr(10) + "StackTrace. = " + a.Info.OSVersion.ToString + Chr(10) + "TotalPhysicalMemory. = " + a.Info.TotalPhysicalMemory.ToString _
  • + Chr(10) + "TotalVirtualMemory. = " + a.Info.TotalVirtualMemory.ToString + Chr(10) + "User name. = " + a.Info.UserName.ToString + Chr(10) + "Working set = " + a.Info.WorkingSet.ToString _
  • + a.Clock.GmtTime.ToString() + Chr(10) + "Mémoire physique accessible = " + a.Info.AvailablePhysicalMemory.ToString + Chr(10) + "Mémoire virtuel accessible = " + a.Info.AvailableVirtualMemory.ToString _
  • + Chr(10) + "Calendrier = " + a.Info.InstalledUICulture.Calendar.ToString + Chr(10) + "Display name = " + a.Info.InstalledUICulture.DisplayName.ToString _
  • + Chr(10) + "KeyboardLayoutID = " + a.Info.InstalledUICulture.KeyboardLayoutID.ToString + Chr(10) + "Culture name = " + a.Info.InstalledUICulture.Name.ToString + Chr(10) + "Asci code page = " + a.Info.InstalledUICulture.TextInfo.ANSICodePage.ToString _
  • + Chr(10) + "ThreeLetterISOLanguageName = " + a.Info.InstalledUICulture.ThreeLetterISOLanguageName.ToString + Chr(10) + "ThreeLetterWindowsLanguageName. = " + a.Info.InstalledUICulture.ThreeLetterWindowsLanguageName.ToString + Chr(10) + "Nom de la machine = " + a.Info.MachineName.ToString)
Dim a As New Microsoft.VisualBasic.MyServices.MyComputer
 MsgBox("OSFullName. = " + a.Info.OSFullName.ToString + Chr(10) + "OSPlatform. = " + a.Info.OSPlatform.ToString + Chr(10) + "OSVersion. = " + a.Info.OSVersion.ToString _
        + Chr(10) + "StackTrace. = " + a.Info.OSVersion.ToString + Chr(10) + "TotalPhysicalMemory. = " + a.Info.TotalPhysicalMemory.ToString _
        + Chr(10) + "TotalVirtualMemory. = " + a.Info.TotalVirtualMemory.ToString + Chr(10) + "User name. = " + a.Info.UserName.ToString + Chr(10) + "Working set = " + a.Info.WorkingSet.ToString _
        + a.Clock.GmtTime.ToString() + Chr(10) + "Mémoire physique accessible = " + a.Info.AvailablePhysicalMemory.ToString + Chr(10) + "Mémoire virtuel accessible = " + a.Info.AvailableVirtualMemory.ToString _
+ Chr(10) + "Calendrier = " + a.Info.InstalledUICulture.Calendar.ToString + Chr(10) + "Display name = " + a.Info.InstalledUICulture.DisplayName.ToString _
        + Chr(10) + "KeyboardLayoutID = " + a.Info.InstalledUICulture.KeyboardLayoutID.ToString + Chr(10) + "Culture name = " + a.Info.InstalledUICulture.Name.ToString + Chr(10) + "Asci code page = " + a.Info.InstalledUICulture.TextInfo.ANSICodePage.ToString _
        + Chr(10) + "ThreeLetterISOLanguageName = " + a.Info.InstalledUICulture.ThreeLetterISOLanguageName.ToString + Chr(10) + "ThreeLetterWindowsLanguageName. = " + a.Info.InstalledUICulture.ThreeLetterWindowsLanguageName.ToString + Chr(10) + "Nom de la machine = " + a.Info.MachineName.ToString)



 Sources du même auteur

Source avec Zip Source .NET (Dotnet) CALCUL D'INTÉRET
Source avec Zip Source .NET (Dotnet) APPRENEZ VB.NET EN JOUANT
CRYPTAGE PAR DIRECTION (C'EST DU BASIC PAS DU VB)

 Sources de la même categorie

AFFICHAGE SOUS EXCEL DE LA LISTE DES ' DES GROUPES par djebbipgm
AFFECTATION D'UNE ICÔNE À UN DOSSIER DANS L'EXPLORATEUR par djebbipgm
Source avec Zip CREATION DE GADGET EN VB6 par djebbipgm
Source avec Zip Source avec une capture CAPTEUR DE HANDLE, DE TITRE, DE CLASS, DE POSITION DE TAILLE... par Sechaud
Source avec Zip Source avec une capture COULEUR DANS UN RICHTEXTBOX SANS MODIFIER SELSTART OU SELLEN... par Renfield

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture VERROUPC (LOGICIEL POUR BLOQUER ET DÉBLOQUER CERTAINES FONCT... par yugoboss0
Source avec Zip Source .NET (Dotnet) INFORMATIONS SYSTEME par colby
Source .NET (Dotnet) BLOQUER LA DÉTÉCTION DES PÉRIPHÉRIQUES DE STOCKAGE DE MASSE ... par Aurazed
Source avec Zip Source avec une capture ACTUALITÉS EN TEMPS RÉEL GRÂCE AUX FLUX RSS par jean_marc_n2
Source avec Zip Source .NET (Dotnet) CALCULER AUTONOMIE D'UN PC PORTABLE par fdiedler2000

Commentaires et avis

Commentaire de capuccino_fr le 27/05/2005 14:06:49

Ca marche pas avec VB.Net 2003. J'ai pas MyServices dans la liste. Est-ce normal? Quelle version faut il? Ca a l'air bien

Commentaire de VVV le 27/05/2005 15:36:52

Trouve pas non plus... Snirf !

Commentaire de Nix le 27/05/2005 16:06:45 administrateur CS

Microsoft.VisualBasic.MyServices.MyComputer c'est du VB.NET 2005

Les objets avec "My" dedans c'est une nouveauté de 2005 c'est pour ça.

Commentaire de capuccino_fr le 27/05/2005 16:24:13

Merci, et si j'installe  justement ce 2005 (ce que je veux faire depuis qq temps), mes executables ne tourneront qu'en Dotnet 2005? ou alors je continuerai avec mon 2003, en etant apte a ouvrir et developper en 2005?

Commentaire de Nix le 27/05/2005 16:27:41 administrateur CS

Tu peux avoir les 2 sur ta machine normalement ca ne pose aucun pb.
Par contre une application faite en .NET 2 tournera avec le framework 2.0
Mais tu peux continuer à faire des appli/sites avec VS2003 en .NET 1.1 qui tourneront avec le framework .NET 1.1

Commentaire de fg85 le 27/05/2005 17:23:34

Pour  télécharger le framework .NET 2.0 (bêta 2) : http://www.microsoft.com/downloads/details.aspx?displaylang=fr&FamilyID=7abd8c8f-287e-4c7e-9a4a-a4ecff40fc8e

Commentaire de gilims le 28/05/2005 10:23:53

désolé j'ai oublié de préciser que je marche avec le framework 2.0 et VB 2005 c pour ca que cela ne marche pas pour tout le monde

Commentaire de dvdstory le 20/02/2006 06:29:59

J'ai MS Visual basic express 2005 et Microsoft.VisualBasic.MyServices.MyComputer ne marche pas. Il me le souligne et quand je compile et me dit qu'il y a des erreur.

Commentaire de surfzoid le 22/12/2006 15:56:46

il vaut mieux ajouter
Imports System
Imports System.ComponentModel

et utilisé environment et/ou My.computer.info avec par exemple :
MsgBox("OSFullName. = " + My.Computer.Info.OSFullName.ToString + Chr(10) + "OSPlatform. = " + My.Computer.Info.OSPlatform.ToString + Chr(10) + "OSVersion. = " + My.Computer.Info.OSVersion.ToString _
               + Chr(10) + "StackTrace. = " + My.Computer.Info.OSVersion.ToString + Chr(10) + "TotalPhysicalMemory. = " + My.Computer.Info.TotalPhysicalMemory.ToString _
               + Chr(10) + "TotalVirtualMemory. = " + My.Computer.Info.TotalVirtualMemory.ToString + Chr(10) + "User name. = " + Environment.UserName + Chr(10) + "Working set = " + Environment.WorkingSet.ToString _
               + My.Computer.Clock.GmtTime.ToString() + Chr(10) + "Mémoire physique accessible = " + My.Computer.Info.AvailablePhysicalMemory.ToString + Chr(10) + "Mémoire virtuel accessible = " + My.Computer.Info.AvailableVirtualMemory.ToString _
               + Chr(10) + "Calendrier = " + My.Computer.Info.InstalledUICulture.Calendar.ToString + Chr(10) + "Display name = " + My.Computer.Info.InstalledUICulture.DisplayName.ToString _
               + Chr(10) + "KeyboardLayoutID = " + My.Computer.Info.InstalledUICulture.KeyboardLayoutId.ToString + Chr(10) + "Culture name = " + My.Computer.Info.InstalledUICulture.Name.ToString + Chr(10) + "Asci code page = " + My.Computer.Info.InstalledUICulture.TextInfo.ANSICodePage.ToString _
               + Chr(10) + "ThreeLetterISOLanguageName = " + My.Computer.Info.InstalledUICulture.ThreeLetterISOLanguageName.ToString + Chr(10) + "ThreeLetterWindowsLanguageName. = " + My.Computer.Info.InstalledUICulture.ThreeLetterWindowsLanguageName.ToString + Chr(10) + "Nom de la machine = " + Environment.MachineName)

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

sélection d'OS pour interrupteur [ par galexis ] Salut à tous les programmeurs, je pose cette question à tout hasard : est-ce que quelqu'un serait faire un petit programme qui permettrait a Version OS PC Distant (PAS LOCAL) [ par dlaurent ] Bonjour,Je cherche à connaitre par un script VBS la version de l'OS d'une machine Distante. L'explorateur Windows est capable (Clic droit/propriétés) Comment faire pourprendre les informations(config) d'un PC [ par Pilotex ] Salut a tous. Je voudrais savoir comment faire pour prendre des informations (processeur, mémoires et résolution de l'écran) d'un ordinateur.Merci@+ compilateur Multi-OS [ par frobinet ] Bonjour,Je redéveloppe actuellement en Assembleur 32 (MASM32) la plupart de mes logiciels écrit initialement en Visual Basic (pour des problèmes de ra Traiter informations du WMI [ par dopeko ] Bonjour à vous tous !Je suis en train de réaliser un petit programme qui permettra de récupérer diverses informations d'un poste distant. J'ai juste u accéder aux informations systèmes d'un PC distanct sur un réseau de PC Win98 [ par nico601 ] pourriez vous vous me donner ou m'expliquer une appli qui pourrait accéder aux informations systèmes d'un PC distanct sur un réseau de PC Win98je vous [VBS] Vérification Nom pc & OS [ par Doccc ] Bonjour, Je me lance dans les scripts VBS, et il y à quelques subtilités que je n'ai pas compris, et j'aimerais avoir votre avis sur mon script (Pourq exploiter les informations d'un dbgrid d'une autre application [ par hbvb6 ] salut j'ai une application qui utilise des dbgrid , je veux prendre les informations de dbgrid pour les mettre dans un fichier , sachant que j'ai p Problème date et heure PC [ par dedenet2 ] Bonjour à tous et à toutes , J'ai un souci sur la date et heure de mon PC. Quand j'ouvre mon PC , j'ai la page de configuration BIOS qui s'affiche. (j


Nos sponsors


Sondage...

Comparez les prix


HTC Magic

Entre 429€ et 429€

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

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