Clipper/FiveWin - Me urge super ayuda

 
Vista:

Me urge super ayuda

Publicado por Eloy Zamarripa (2 intervenciones) el 11/09/2000 00:00:00
Como puedo leer la serie del disco duro ,la serie del fabricante (NO la del volumen la que sale con dir)me urge!!!!!!!!!!!!!!!!!!gracias
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:Me urge super ayuda

Publicado por Cesar Cortes Cruz (11 intervenciones) el 11/09/2000 00:00:00
en ca-tools hay una funcion,,
volseria("c")
o
en fivewin, esxiste otra..
nSerialhd() //te da por default el volserial de
c:

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:Me urge super ayuda

Publicado por Jorge A. González Cano (39 intervenciones) el 13/09/2000 00:00:00
Estimado Clippero Eloy:

Soy nuevo clippero, pues llevo poco tiempo desarrollando en este programa, pero si tu buscas leer el No. de Serie (N/S) del fabricante, nunca lo podrás hacer, pues éste es dado en forma administrativa por el fabricante para llevar a cabo un control interno fiscal y/o contable, ademas no está grabado físicamente en el disco sino en la etiqueta...No te confíes mucho, pero lo poco que yo sé es que ningun lenguaje lo hará.
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:Me urge super ayuda

Publicado por Cesar Cortes Cruz (11 intervenciones) el 13/09/2000 00:00:00
Oyes Jorge A.
Checa la function nSerialHd() de FIVEWIN 1.95
o
la function Volserial("c") de CA-TOOLS

todo esto librerias para CLIPPER 5.2. o superior.

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:Me urge super ayuda

Publicado por Manuel Abel Ange Otzoy (1 intervención) el 15/09/2000 00:00:00
Estimado amigo:

En muchas ocasiones uno no tiene las librerías
necesarias para ciertas cosas, CLIPPER en si mismo nos presenta la solución.
He aquí una forma de leer el NUMERO DE SERIE del disco, sin utilizar librerias de terceros.

Si en algo te ayudo mi respuesta, mucho te agradecería me lo hagas saber.

//----------------------------
#include "fileio.ch"
procedure main
local cArchivo:="",nManejador:=0,cBuffer:=""
local nPos:=0
run dir > XX.txt
nManejador:=fopen("XX.txt",FC_NORMAL)
if ferror() == 0
cBuffer=freadstr(nManejador,92)
cBuffer=trim(cBuffer)
nPos=rat(" ",cBuffer)

cls
// AQUI ESTA EL NUMERO DE SERIE
? "EL NUMERO DE SERIE ES-->",substr(Buf fer,nPos)
wait
* cierra el archivo y suelta el manejador
fclose(nManejador)
ferase("XX.TXT")
else
? " ERROR"
WAIT

endif



quit
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:Me urge super ayuda

Publicado por Jorge A. Gonzalez Cano (39 intervenciones) el 16/09/2000 00:00:00
Mis estimados Clipperos:
Se que soy nada comparado con sus conocimientos de Clipper, pero nuestro amigo Eloy nos está pidiendo que el No. de serie NO sea el de VOL (que NO sea el No. del Volúmen de Disco duro), sino que sea el del fabricante, COSA QUE NO APARECE EN EL SISTEMA SINO EN LA ETIQUETA QUE PEGA LA COMPAÑIA QUE LO HACE (Maxtor, Quantum, Seagate, etc.). Sin embargo, si estoy en un error háganmelo saber...por fa...
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:Me urge super ayuda

Publicado por fernando blanco (40 intervenciones) el 22/09/2000 00:00:00
Hola , utiliza FASTLIB 4.0 , tiene una función que hace lo que tú buscas(PROTECCIÓN?) , yo guardo la primera vez que el usuario utiliza el Sistema el No. de serie del fabricante , lo escondo en cualquier lugar del disco duro y listo.
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:Me urge super ayuda

Publicado por Eloy (2 intervenciones) el 26/09/2000 00:00:00
Fernando tu si saves lo que quiero muchas gracias
de donde podria bajar la libreria FastLib 4.0 o si tu la tienes me la podrias mandar por fabor
gracias
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:Me urge super ayuda

Publicado por fernando blanco (40 intervenciones) el 26/09/2000 00:00:00
Mandame un email y te la mando.
Fernando
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