FiveTech Software tech support forums

... on this small test when I press a button "Articolo1" or "articolo2" it insert a rcord on aItems array AaDd(aItems,{nInvoice,nSerial,cImmagine,cCode,cProdotto,nQuantita,nPrezzo,ntotaleQ,; dCheck_in,dCheck_out,nDays,nDiscount,nTotal,cItemStruct,lItemMulti,lItemPrnA4,lItemPrnPos ...

... FUNCTION GetSerialHD( cDrive ) LOCAL cLabel := Space(32) LOCAL cFileSystem := Space(32) LOCAL nSerial := 0 LOCAL nMaxComp := 0 LOCAL nFlags := 0 DEFAULT cDrive := "C:\" GetVolInfo( cDrive, @cLabel, Len( cLabel ), @nSerial, @nMaxComp, ...

In the MakeKey() function, change nSerial to a larger number. When the MsgGet() pops up, just delete all the 9's and enter your -1974753522.    if Empty(nKey)      lVisable:=.t.      nKey:=1  ...

Hola, ¿y así?...
local cSerial:=space(20), nSerial:=0

MsgGet("Key Generator","Enter Serial Number",@cSerial)
MsgInfo( nSerial:=Val(alltrim(cSerial)) )
MsgInfo(Valtype(nSerial))

Saludos.

Sorry do you use key gen of Jeff Barnes ? I not use a text value but nserial is a number and on init is = 0 I have if Empty(nKey) lVisable:=.t. nKey:=1 nSerial:=0 MsgGet("Key Generator","Enter Key: ",@nKey) MsgGet("Key Generator","Enter ...

... insert on msgget a number serial sample : -1974753522 on my application I use MsgGet("Key Generator","Enter Serial Number: ",@nSerial) but when I try to insert the serial number it make error because I can insert only -197475352 and I cannot insert the last "2" WHY ?

Hola Waldemar: Desconozco la existencia de otras funciones, aparte de GetNetCardId() y nSerialHD(). GetNetCardId() funciona con tarjetas inalámbricas perfectamente. La pega que le veo es que, aunque no haya tarjeta pinchada en el PC, también te da un número como si existiera. Muchas Gracias manuel ...

Hola Waldemar:

Desconozco la existencia de otras funciones, aparte de GetNetCardId() y nSerialHD().

GetNetCardId() funciona con tarjetas inalámbricas perfectamente. La pega que le veo es que, aunque no haya tarjeta pinchada en el PC, también te da un número como si existiera.

Manuel Aranda wrote:Pues, por ejemplo, tienes GetNetCardId()

Gracias Manuel Me imagino que por lo que dice la funcion entrega el nº id de la terjeta de red, ¿Funciona para tarjetas inalambricas, conoces más funciones?

Saludos

Waldemar

Pues, por ejemplo, tienes GetNetCardId()

Hola Estimados del Foro

Conocen otras funciones para reconocer el entorno del PC como nSerial(), ya sea fecha Bios, serial Windows, etc. La idea que sean funciones relacionadas más con el Hardware.

Muchas Gracias

Waldemar

Bendiciones

Jairo,

nSerialHD( "D:\" ) --> nSerial

By default, "C:\" is used

Jairo,

Prueba con nSerialHD( "D:\" ) --> nSerial

Puedes pasarle la unidad deseada. Por defecto usa "C:\"

... - 2003 // //----------------------------------------------------------------------------// METHOD Default() CLASS TDiskInfo Local cDrive, cLabel, nSerial, cFileSystem Local nSBCluster, nBBSector, nFreeClusters, nTotalClusters, nDiskType Local acDrive := { "No Instalado",; "Disco Removible",; "Disco ...

... old message that may help. I haven't tried it. Regards, James ------------------------- From: "GNR" <gnr@hyderabadwater.gov.in> Subject: Re: nSerialHd() to work with all drives Date: Saturday, February 15, 2003 10:04 AM nSerialID() works well on all drives, mapped and physical. I have tested ...