Protección Anticopia - Ayuda

04/06/2004 - 18:37 por José Torrano | Informe spam
Hola al grupo. Reconozco que no tengo ni idea de VBasic ni de programación y
por eso pido ayuda.
Se trata de proteger una hoja de cálculo contra copia ya que las contraseñas
son fáciles de crakear con el software adecuado.
Mi idea es que al instalar en un disco duro la hoja de cálculo
"ejemplo.xls", copiar también un fichero de texto oculto llamado por ejemplo
"winxls.ddl" o algún nombre disimulado que dificulte su localización, p.e. "
. " (espacio.espacio). Este fichero se podría copiar a la carpeta
Windows\System. Una vez instalados los dos ficheros en el ordenador se trata
de que al intentar abrir la hoja de cálculo "ejemplo.xls", una macro busque
el fichero oculto "winxls.ddl" en la carpeta Windows\System y, si no lo
encuentra, que ho se abra la hoja de cálculo devolviendo agún mensaje de
error, y si lo encuentra que se abra la hoja de cálculo sin mostrar mensaje
alguno.
Siento la extensión del mensaje, pero agradecería mucho que alguien me
echara una mano.
Gracias por adelantado y saludillos

pepetorrano@ya.com
 

Leer las respuestas

#1 Henry Sanchez
04/06/2004 - 20:56 | Informe spam
Hola Jose,
Que te garantiza que el archivo no va a ser abierto con
las macros deshabilitadas?
Si quieres averiguar si el archivo winxls.ddl se
encuentra en la carpeta Windows\System usa el siguiente
codigo:
Dim archivo As String
archivo=Dir("Windows\system\winxls.ddl")

Si el archivo no se encuentra, la variable tomara el
valor de "".

Saludos,

Henry

Hola al grupo. Reconozco que no tengo ni idea de VBasic


ni de programación y
por eso pido ayuda.
Se trata de proteger una hoja de cálculo contra copia ya


que las contraseñas
son fáciles de crakear con el software adecuado.
Mi idea es que al instalar en un disco duro la hoja de


cálculo
"ejemplo.xls", copiar también un fichero de texto oculto


llamado por ejemplo
"winxls.ddl" o algún nombre disimulado que dificulte su


localización, p.e. "
.. " (espacio.espacio). Este fichero se podría copiar a


la carpeta
Windows\System. Una vez instalados los dos ficheros en


el ordenador se trata
de que al intentar abrir la hoja de


cálculo "ejemplo.xls", una macro busque
el fichero oculto "winxls.ddl" en la carpeta


Windows\System y, si no lo
encuentra, que ho se abra la hoja de cálculo devolviendo


agún mensaje de
error, y si lo encuentra que se abra la hoja de cálculo


sin mostrar mensaje
alguno.
Siento la extensión del mensaje, pero agradecería mucho


que alguien me
echara una mano.
Gracias por adelantado y saludillos




.

Preguntas similares