Hola. Tengo un pequeño soft de facturacion que estoy vendiendo y estoy buscando algun metodo para evitar que me lo copien y me lo roben, que no sea tan complicado; ¿conocen alguna funcion de fivewin h que me devuelva caracteristicas del mother o del bios? o bien si tienen algun algoritmo que valide este tipo de cosas (para evitar que con una copia del disco, o que con el transpaso del disco a otro cpu me roben el sistema). Gracias. Atte.
Diego.
Diego,
Puedes usar el número de serie del disco duro, y tambien el número de serie de la tarjeta de red.
Revisa nSerialHD() y GetNetCardID()
Tambien podrias usar un pendrive, de forma parecida. Hoy hemos puesto un ejemplo.
tanbien lo puede validar via el registro de windows
QAZWSX2K wrote:tanbien lo puede validar via el registro de windows
ahi va para todos
EN EL MAIN COLOCAR
LUEGO LLAMAR A LAS FUNCIONES SEGUN CORRESPONDA
function gregistro() // PARA INTRODUCIR, SI NO EXISTE LA CREA Y SI EXISTE LA REEMPLAZA
LOCAL oReg
oReg := TReg32():Create( HKEY_LOCAL_MACHINE, "SOFTWARE\FiveWin\siaperca" )
oReg:Set( "", "Sistema cualquiera" )
oReg:Set( "Version", 4 )
oReg:Set( "Instalado", DATE() )
oReg:Set( "Vencido", .F. )
MsgStop( "Clave introducida en el Registro OK" )
oReg:Close()
return nil
function lregistro() // PARA LEER
LOCAL oReg, uVar1, uVar2, uVar3, uVar4
oReg := TReg32():New( HKEY_LOCAL_MACHINE, "SOFTWARE\FiveWin\siaperca" )
uVar1 := oReg:Get( "" )
uVar2 := oReg:Get( "Version",0 )
uVar3 := oReg:Get( "Instalado" )
uVar4 := oReg:Get( "Vencido" )
if uVar4=".F."
msginfo("El sistema:"+uVar1+", Version:"+strzero(Uvar2,2)+", instalado el dia:"+uVar3+", NO Esta en Demo")
endif
return nil
a mi me funciona perfecto en xharbour
Bueno, en mi caso creo que conviene dejar que todo el mundo conozca mis productos y que los usen.
Con restricciones, porsupuesto.
Inicié con esta forma de trabajo hace unos tres años, hoy mi sitio refleja mas de 20,000 descargas, tengo registrados a mas de 2,000 usuarios y sospecho que hay otros miles que lo tienen en uso sin solicitar registro.
El resultado es a largo plazo y se está haciendo publicidad por si solo, al menos una revista ya ha publicado algunas referencias (Emprendedores de la FCA UNAM, bimestre sep-oct).
Hay mas de una forma de restringir el uso por tiempo indefinido, en mi caso utilizo fechas, acumuladores (de usuarios y empresas) y contracuentas para identificar a los clientes.
En mis versiones DOS fui muy celoso y restrictivo, solo yo y unos cuantos clientes conocimos la funcionalidad.
Antonio Linares wrote:...GetNetCardID()...
Jose M,
Tenemos que modificar GETNETCARDID() para que en esos casos devuelva un array
