Autor Tema: [Codigo] Velocidad de tu CPU  (Leído 1696 veces)

Desconectado Erik

  • PHPero Avanzado
  • ****
  • Mensajes: 271
  • Karma: 14
  • Sexo: Masculino
    • Ver Perfil
[Codigo] Velocidad de tu CPU
« en: 28 de Abril de 2008, 20:37:05 pm »
Código: [Seleccionar]
Private Sub Form_Load()
  Dim Regregistro As Long
  Dim Registro As Object
  Set Registro = CreateObject("WScript.Shell")
  Regregistro = CLng(Reg.regread("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0\~MHz"))
  Set Registro = Nothing
MsgBox "La velocidad del CPU es: " & CStr(Regregistro) & " MHz", vbInformation, "Velocidad de tu CPU:"
End Sub

Con la variable registro, buscamos en los registros del ordenador la velocidad del CPU y lo declaramos en otra variable, luego borramos la variable que lo buscaba para posibles proximas busquedas y con un msgbox mostramos el resultado :D
Código: [Seleccionar]
<?php
$myset 
"PHPER@ AVANZADO";
echo 
"Yo soy".$myset;
?>

Comunidad PHPeros

[Codigo] Velocidad de tu CPU
« en: 28 de Abril de 2008, 20:37:05 pm »

Desconectado G2K

  • Moderador de Programación General
  • PHPero Master
  • ****
  • Mensajes: 2.245
  • Karma: 76
  • Sexo: Masculino
  • Dame un punto de apoyo y moveré la Tierra
    • Ver Perfil
    • Cristian Torrijos
Re: [Codigo] Velocidad de tu CPU
« Respuesta #1 en: 29 de Abril de 2008, 07:56:47 am »
Para que sirve la función CStr()?
Campeón del CatSkills de Webs (Enero 2011)
Campeón del SpainSkills de Webs (Abril 2011)
http://www.youtube.com/watch?v=1fBMG8F_hpM
Mejor representante catalan en SpainSkills 2011


Desconectado naveda

  • Administrador General
  • PHPero Master
  • *****
  • Mensajes: 2.282
  • Karma: 165
  • Sexo: Masculino
    • Ver Perfil
    • naveda.me
Re: [Codigo] Velocidad de tu CPU
« Respuesta #2 en: 29 de Abril de 2008, 15:14:46 pm »
Hay un error en el código...
Debería ser:

Código: [Seleccionar]
Private Sub Form_Load()
  Dim Regregistro As Long
  Dim Registro As Object
  Set Registro = CreateObject("WScript.Shell")
  Regregistro = CLng(Registro.regread("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0\~MHz"))
  Set Registro = Nothing
MsgBox "La velocidad del CPU es: " & CStr(Regregistro) & " MHz", vbInformation, "Velocidad de tu CPU:"
End Sub
Por favor, leete las Normas


Desconectado Erik

  • PHPero Avanzado
  • ****
  • Mensajes: 271
  • Karma: 14
  • Sexo: Masculino
    • Ver Perfil
Re: [Codigo] Velocidad de tu CPU
« Respuesta #3 en: 29 de Abril de 2008, 18:02:00 pm »
Hay un error en el código...
Debería ser:

Código: [Seleccionar]
Private Sub Form_Load()
  Dim Regregistro As Long
  Dim Registro As Object
  Set Registro = CreateObject("WScript.Shell")
  Regregistro = CLng(Registro.regread("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0\~MHz"))
  Set Registro = Nothing
MsgBox "La velocidad del CPU es: " & CStr(Regregistro) & " MHz", vbInformation, "Velocidad de tu CPU:"
End Sub


Ups, se me paso al 100%, perdon.

Para que sirve la función CStr()?

Para devolver un valor en forma de variable, no lo entiendo ni yo muy bien.
Código: [Seleccionar]
<?php
$myset 
"PHPER@ AVANZADO";
echo 
"Yo soy".$myset;
?>

Desconectado CarlosRdrz

  • Moderador Global
  • PHPero Master
  • *****
  • Mensajes: 2.505
  • Karma: 131
  • Sexo: Masculino
  • A.k.a. TLX
    • Ver Perfil
Re: [Codigo] Velocidad de tu CPU
« Respuesta #4 en: 29 de Abril de 2008, 18:09:56 pm »
Supongo que sera para convertir una variable a string.
En este caso, la convierte del tipo Long, al tipo String, o eso creo.

Saludos!
La dedicación de mi respuesta sera directamente proporcional a la dedicación de tu pregunta.
Hacer códigos que entiendan las máquinas es fácil, lo difícil y realmente útil es hacer códigos que entiendan las personas.
http://twitter.com/CarlosRdrz
http://www.carlosrdrz.es

Desconectado Erik

  • PHPero Avanzado
  • ****
  • Mensajes: 271
  • Karma: 14
  • Sexo: Masculino
    • Ver Perfil
Re: [Codigo] Velocidad de tu CPU
« Respuesta #5 en: 29 de Abril de 2008, 19:36:04 pm »
Si, para devolver un texto en vez de un codigo, ruta y etc... ;)
Código: [Seleccionar]
<?php
$myset 
"PHPER@ AVANZADO";
echo 
"Yo soy".$myset;
?>

Desconectado Firex

  • PHPerit@
  • *
  • Mensajes: 23
  • Karma: 3
    • Ver Perfil
Re: [Codigo] Velocidad de tu CPU
« Respuesta #6 en: 30 de Abril de 2008, 11:10:17 am »
Juas no sabes ni explicar lo k posteas..

Este code es simplon :)


Desconectado naveda

  • Administrador General
  • PHPero Master
  • *****
  • Mensajes: 2.282
  • Karma: 165
  • Sexo: Masculino
    • Ver Perfil
    • naveda.me
Re: [Codigo] Velocidad de tu CPU
« Respuesta #7 en: 30 de Abril de 2008, 15:50:02 pm »
Juas no sabes ni explicar lo k posteas..

Este code es simplon :)



Te recomiendo que seas educado, porque de lo contrario no tendras derecho a ser tratado con educacion...
Por favor, leete las Normas