Page 1 of 1
Solicito sugerencias contra el pirateo
Posted: Thu Mar 13, 2008 8:01 am
by Loren
Compañeros:
Tengo un programa terminado que entregaré casi de inmediato. La cosa es que mi cliente quiere que le funcione además de las instalaciones de su empresa, que funcione en casa a través del PENDRIVE.
Como me puedo asegurar que mi cliente no piratea el programa a través del PENDRIVE ??
¿ Alguna sugerencia ??
Leí varios post publicados aquí al respecto pero no se adapta a mis necesidades.
LORENZO.
Posted: Thu Mar 13, 2008 9:18 am
by cmsoft
Hola Lorenzo:
Hay varias opciones, pero una (y creo que la mas interesante) es la proteccion mediante un Pen Drive que señala Antonio en el mensaje
http://fivetechsoft.com/forums/viewtopic.php?t=8806&
Otra opcion es utilizar dispositivos de proteccion anticopias como son las llaves Exekey u otras (
http://www.softplace.net/_borders/exek-s.html )
Espero te sirva esta info.
Posted: Thu Mar 13, 2008 3:58 pm
by Alfredo Arteaga
Yo insisto en que conviene dedicar tiempo para obtener un algoritmo que genere una contracuenta con los datos del cliente, de esta forma solo él podrá usarlo.
Podrá usarlo en cualquier equipo y/o dispositivo, obtener tantas copias como desee, etc. pero cualquier variación en los datos hará que el sistema sea una demo.
Posted: Thu Mar 13, 2008 4:13 pm
by pymsoft
Alfredo,
Yo uso la opcion que mencionas tu.
El programa registrado va con nombre cliente, codigo iva, numero de estacion de trabajo. Al cambiar algo, el programa funciona pero como demo.
Esta informacion la salvo en un archivo .ini para cada estacion de trabajo, y es un codigo generado muy simplemente, el numero ASC() de cada caracter,hago una operacion y salvo el numero, luego al entrar al programa, tomo los datos y hago el calculo, si el numero generado es igual al numero en el archivo .ini, todo ok, sino, es demo.
Saludos
Posted: Thu Mar 13, 2008 4:30 pm
by sysctrl2
Concuerdo con Alfredo,
lPirata := .f.
cEmpresa := _creaEmpresa()
if "PRODUCTORA AGRICOLA HERMANOS MAGAÑA" $ UPPER( ALLTRIM( (cEmpresa)->nombre ) )
lSerie := .t.
endif
if !lPirata
msginfo("PIRATA")
RETURN NIL
endif
Posted: Thu Mar 13, 2008 7:11 pm
by cuatecatl82
Saludos colega:
Esta tambien te podria servir, es otra alternativa y podria darte alguna otra idea de como proteger tu aplicación..
http://fivetechsoft.com/forums/viewtopic.php?t=10050
Saludos..