underwurlde

El algoritmo en si, lo saque de aca, pero es creacion de un gringo, el problema es que la clave se puede ver facilmente, con este archivo en word NO, ya que borra cualquier rastro del archivo BAT. Para esto se necesita crear 2 archivos, uno en WORD (*.doc) y otro BAT (*.bat), les dan en nombre que deseen a cada uno., de ahora en adelante el word lo llamare driver.doc y el bat se llamara trk.bat, recuerden no colocarle nombres obvios, ya que lo que se pretende es que pase lo menos desapercibido posible. Paso 1: ver donde van a colocar la carpeta, por ejemplo puede ser en el disco d:/juegos o c:/juegos/cof4 o donde quieran. Para seguir el ejemplo supongamos que desean tener la carpeta protegida en c:/driverNVIDIA. Recomiendo ocupar los nombres de los archivos que doy y depuse modificarlos. paso 2: Asi dentro de c:/driverNVIDIA crean el archivo trk.bat con el bloc de notas y el codigo seria tan simple como: Driver.doc Driver.bat Lo guardan. Paso 3: abren el word, se van a herramientas ->macro->seguridad, ahí coloquen a word en niver bajo, cierran word y lo vuelven a abrir. Paso 4: pegar el siguiente codigo (donde dice clave aquí colocan su clave), donde dice driver.bat en rojo es el mismo nombre del archivo en WORD que guardaran posteriormente, pero con extensión BAT, pero para el ejemplo es driver.bat donde dice (dos puntos) colocan dos puntos ( : ) sin comillas. cls @ECHO OFF title Folder Private if EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto UNLOCK if NOT EXIST Private goto MDLOCKER :CONFIRM echo Are you sure you want to lock the folder(Y/N) set/p "cho=>" if %cho%==Y goto LOCK if %cho%==y goto LOCK if %cho%==n goto END if %cho%==N goto END echo Invalid choice. goto CONFIRM :LOCK ren Private "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" echo Folder locked goto End :UNLOCK echo Enter password to unlock folder set/p "pass=>" if NOT %pass%== CLAVE AQUI goto FAIL attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" Private echo Folder Unlocked successfully goto End (dospuntos)FAIL echo Invalid password goto end :MDLOCKER md Private echo Private created successfully goto End :End del driver.bat Paso 5: Guardar el word en la carpeta c:/driverNVIDIA como driver.doc (SOLO GUARDAR NO SALIR DE WORD) paso 6: En el archivo word ir a Herramientas->Opciones->pestaña “seguridad” y colocan clave de apertura y contraseña de escritua. Luego guardan (SIN SALIR DE WORD) Paso 7: Herramientas->macro->editor de visual basic. En el lado izquierdo veran una ventan donde dice +normal y debajo de este + Project(cls), pinchen en el + de normal y luego en el + de micosoft word objetos, luego pinchan en “Thisdocument”, en el lado derecho pegan el siguiente codigo (el primer rojo es el directorio donde eligen guardar y el segundo es el archivo doc que crearon pero con extensión BAT) Private Sub Document_Open() ChangeFileOpenDirectory "c:/driverNVIDIA" ActiveDocument.SaveAs FileName:="driver.bat", FileFormat:=wdFormatText, _ LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _ :="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _ SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _ False, Encoding:=1252, InsertLineBreaks:=False, AllowSubstitutions:=False _ , LineEnding:=wdCRLF Application.Quit End Sub Paso 8: pinchar en el disquete o archivo->guardar normal. Luego en archivo->cerrar volver a Microsoft word, y pueden cerrar el word. Ahora SOLO abrir el trk.bat, se abrira word y pedira las 2 claves creadas, luego de esto, el word se cerrara y se abrira una pantalla negra (cmd) y les pedira la clave creada en el punto 4, donde dice “CLAVE AQUÍ”. Se creara una carpeta llamada “private” que es donde colocaran sus archivos a proteger. Las claves no se pueden obtener por ningun lado, ya que es el word quien las tiene y al estar este archivo word igualmente protegido es muy difícil dar con ellas La macro es creacion mia, lo otro no, pero por lo menos funciona y funciona bien, ahora si no sabes nada de macro, con la explicacion de arriba no tendras problemas, pero si sabes algo te sera mucho mas sencillo, ademas que el archivo BAT se podria tener en cualquier sitio dandole la ruta correspondiente al doc. Ojala y les sirva. Un saludo desde Chile.