Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Como Puedo Obtener el numero de serie de un disco

21/07/2003 - 22:54 por Millenko | Informe spam
Ayuda Hacer una pregunta
Hola Amigos

He estado utilizando el siguiente codigo en Visual foxpro instalado en una
plataforma Win98

oFS=CreateObject('scripting.filesystemobject')
cadena=str(oFS.Drives('c').SerialNumber,9)
release ofs

pero ahora tengo una maquina con win-XP y ya no resulta, o al menos me trae
caracteres como "***".

me podrian ayudar.

gracias de antemano
email Siga el debateRespuesta 4 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Millenko
22/07/2003 - 16:34 | Informe spam
Lo intente, pero en windows xp- me sale

*********.**********

y no se como trabajarlo, podrias indicarme como trabajar este valor para
que me salga algo asi como:

3A59-7E52

yo asi lo podria trabajar

gracias


"David Amador (Davphantom)" escribió en el mensaje
news:
Me parece que el problema es el STR( ,9) porque haces eso ???''

Mejor utiliza Transform y sin ningun parametro adicional ...

oFS=CreateObject('scripting.filesystemobject')
cadena = Transform(oFS.Drives('c').SerialNumber)
release ofs

David Amador Tapia
Webmaster de "La Web de Davphantom"
www.davphantom.cjb.net
Cartagena. Colombia
Tel (5) 6621502 - 6581523


"Millenko" escribió en el mensaje
news:#cNv#
> Hola Amigos
>
> He estado utilizando el siguiente codigo en Visual foxpro instalado en


una
> plataforma Win98
>
> oFS=CreateObject('scripting.filesystemobject')
> cadena=str(oFS.Drives('c').SerialNumber,9)
> release ofs
>
> pero ahora tengo una maquina con win-XP y ya no resulta, o al menos me
trae
> caracteres como "***".
>
> me podrian ayudar.
>
> gracias de antemano
>
>


Preguntas similares

 

Busqueda sugerida :