Visual Basic - AYUDA..informacion de hardware pa VB 2008

Life is soft - evento anual de software empresarial
   
Vista:

AYUDA..informacion de hardware pa VB 2008

Publicado por CArlitta (1 intervención) el 27/11/2009 16:21:31
Hola, estoi haciendo un program que me muestre la informacion del Pc
como por ejemplo
-procesador
-disco duro
-ram
-memoria cache
-etc

pero yo tengo el visual basic 2008
y necesito el codigo en ese formato, espero pueda ayudarme!!!!!! porfavor!!
estoi muy complicada
saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:AYUDA..informacion de hardware pa VB 2008

Publicado por Christian (666 intervenciones) el 28/11/2009 04:22:20
Carlita entra al foro de .NET peroooo ....
como soy bueno y sos mujer ahi va

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim TipoProcesador As String
Dim CantProcesadores As Long
Dim NombrePC As String
Dim Usuario As String
Dim VersionOS As String
Dim VersionSPWin As String
Dim Disco = New System.IO.DriveInfo("C:\")
Dim MemoriaDisponible = New System.Diagnostics.PerformanceCounter("Memory", "Available MBytes")
Dim forceFullCollection As Boolean
Dim MemoriaTotal As Long

MemoriaTotal = GC.GetTotalMemory(forceFullCollection)
CantProcesadores = CShort(Environment.ProcessorCount)
TipoProcesador = "Cantidad Procesador: " & CantProcesadores.ToString & Environment.NewLine & "Tipo de Procesador: " & Environment.GetEnvironmentVariable("PROCESSOR_IDENTIFIER").ToString

NombrePC = "Nombre de Pc: " & Environment.MachineName
Usuario = "Nombre de Usuario: " & My.User.Name.ToUpper
VersionOS = "Version Sitema: " & Environment.OSVersion.VersionString
VersionSPWin = "Service Pack: " & Environment.OSVersion.ServicePack

MessageBox.Show(TipoProcesador & Environment.NewLine & CantProcesadores & Environment.NewLine & NombrePC & Environment.NewLine & Usuario & Environment.NewLine & VersionOS & Environment.NewLine & VersionSPWin)
MessageBox.Show("Total en Disco: " & Disco.TotalSize & Environment.NewLine & "Disponible: " & Disco.TotalFreeSpace)
MessageBox.Show("Memoria Total: " & MemoriaTotal & Environment.NewLine & "Memoria Disponible:" & MemoriaDisponible.NextValue)

End Sub
End Class

espero te sirva saludos.-
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:AYUDA..informacion de hardware pa VB 2008

Publicado por carlitta (3 intervenciones) el 29/11/2009 22:09:45
muchas gracias cristian te pasaste!!! mu lindo de tu parte.
espero no te moleste si te pregunto otra cosa, si sabes codigos para saber mas cosas del PC, asi como lo hace el programa everest, y lo ultimo, el programa que estoi haceindo lo estoi haciendo con
texbox osea esas cajitas de texto que me mnuestren los datos, que codigo debo colocar ahy para que me muestre los datos.

PD: dame tu correo si podes
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar