NorfiPC
NorfiPC » Comandos » Ocultar archivos y carpetas

Comandos, archivos batch y scripts para ocultar carpetas y archivos en Windows

Métodos y opciones diferentes de ocultar el contenido de carpetas en Windows sin usar ni instalar ningún programa ni aplicación externo. Código para crear archivos batch y script para impedir que se muestren en el equipo documentos, informaciones, datos confidenciales, personales y privados.
Comandos, archivos batch y scripts para ocultar carpetas y archivos en Windows
Comparto el código para crear varias aplicaciones, que podemos emplear para ocultar carpetas, documentos y cualquier otro archivo en Windows.
Diferentes métodos que se pueden implementar, para de forma sencilla lograr que no se muestren documentos o datos personales a otras personas que usen nuestro equipo.
Como crear manualmente los archivos necesarios.
La gran mayoría de los métodos que se tratan en esta página, lo que hacen es simplemente manipular los atributos de los archivos en Windows.



¿Qué y cuáles son los atributos de los archivos en Windows?


Los atributos son características que Windows les asigna a cada archivo en nuestro equipo, dependiendo de la función o al objetivo que van a desempeñar.
Los principales son los siguientes (se identifica cada uno mediante una letra):
• Archivos de almacenamiento = A
• Archivos de solo lectura = R
• Archivos ocultos = H
• Archivos de sistema = S
Algunos ejemplos de sus diferencias:
✓ Los archivos que son de Solo lectura (R), Windows pide confirmación antes del usuario cambiarles el nombre o al moverlos a otra ubicación.
✓ Los archivos ocultos (H) generalmente son archivos auxiliares o temporales que no se muestran al usuario por no ser necesario y así evitar el abarrotamiento innecesario de archivos que solo utiliza Windows.
✓ Los archivos de sistema (S), como su nombre indica son archivos sensibles del sistema operativo y su modificación puede ocasionar trastornos en el funcionamiento de Windows, no se muestran, aun si se selecciona Mostrar archivos ocultos en el Panel de Control.
Todos los atributos se pueden modificar, usando el comando ATTRIB en la consola de CMD.



¿Cómo saber los atributos que posee un archivo en Windows?


Conocer los atributos que posee un archivo determinado es algo fácil, para eso haz lo siguiente:
• Abre la consola de CMD (Con la tecla Shift presionada, da un clic derecho con el ratón en el escritorio y escoge: Abrir ventana de comandos aquí)
• Escribe en la consola: ATTRIB
• Presiona la tecla espaciadora una vez
• Arrastra el archivo que quieres conocer sus atributos encima de la ventana de la consola y suéltalo.
• Presiona la tecla Enter.
Verás algo similar a la siguiente imagen:
Informacion del comando ATTRIB
Usando el comando ATTRIB sin otras opciones, solo informa de los atributos que poseen los archivos, pero se puede utilizar para establecer o retirar cualquier atributo a los archivos.
Lee toda la información sobre el uso del comando ATTRIB en la siguiente página:
Como usar la línea de comandos en Windows, ejemplos prácticos



Códigos y aplicaciones para ocultar informacion en Windows


Scripts para ocultar y mostrar archivos


A continuación comparto el código para crear dos scripts, que permiten ocultar y mostrar archivos.
Los scripts no son programas, no son necesario de instalar, son simples archivos de texto con un código en su interior, que cualquiera los puede crear con el sencillo Bloc de notas.
Solo es necesario copiar el código, pegarlo en el Bloc de notas y guardar el archivo con la extensión .VBS.
Lee más información.
Lo que hace el primero de ellos, es solo modificar los atributos de los archivos en el interior de la carpeta que se seleccione.
O sea, no oculta la carpeta, sino los archivos en su interior.
El segundo script al seleccionar la carpeta donde se encuentran archivos ocultos, restaura sus propiedades originales, por lo que se mostrarán.
Es un método rápido, sencillo y simple para ocultar archivos que se encuentren en el interior de carpetas que están a la vista en una ubicación pública, por ejemplo el Escritorio y necesitamos esconderlos de la vista de las demás personas que usen el equipo, no es necesario contraseñas ni nada complicado.
No son recursos verdaderamente seguros, porque si se activa en la herramienta Opciones de Carpeta, la opción de Ver los archivos de sistema, naturalmente no funcionará el método empleado.
Ocultar archivos(ocultar.vbs)
'---------------------------------------------------------
'(c) NorfiPC 2010 - http://norfipc.com
'All rights reserved. Provided as is
'with no guarantees, express or implied
'User assumes all responsibility
'---------------------------------------------------------
Option Explicit
Dim sFldrInput, introMsg
introMsg = msgBox("Este script va a ocultar archivos"& vbCrLf & "cambiando solo sus atributos",vbOKCancel)
If introMsg = vbCancel Then
	Wscript.Quit
End If
ChooseFolder sFldrInput,"Seleccione la ubicacion: "
ChangeAttribute sFldrInput
Wscript.Quit
sub ChooseFolder(sFldrChoice, sSelectionString)
dim objShell, objFolder, objFolderItem, strPath, msgValue
Const DESK_TOP = &H10&
Const WINDOW_HANDLE = 0
Const OPTIONS = 0
sFldrChoice = ""
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(DESK_TOP)
Set objFolderItem = objFolder.Self
strPath = objFolderItem.Path
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.BrowseForFolder _
    (WINDOW_HANDLE, sSelectionString, OPTIONS, strPath) 
      
If objFolder Is Nothing Then
    Wscript.Quit
End If

Set objFolderItem = objFolder.Self
sFldrChoice = objFolderItem.Path

msgValue = msgBox("Usted selecciono "& sFldrChoice, vbOKCancel)
If msgValue = vbCancel Then
	Wscript.Quit
End If
If Len(sFldrChoice) = 3 then 
   chkForDrv sFldrChoice
End if
End sub

sub ChangeAttribute (sSourceFldr)

Const AttribR = "attrib +r +h +s "
Const sSwitch = " /s"
Const sWildCard = "\*.*"
dim sStatement
dim objWshell
Dim oIE, oIEDoc, sMsg
sStatement= AttribR & chr(34) & sSourceFldr& sWildcard & chr(34) &  sSwitch

'The next part is just to display a message while copying
set objWshell=Wscript.CreateObject("Wscript.Shell")
Set oIE = Wscript.CreateObject("InternetExplorer.Application")
oIE.Navigate "about:blank"
do while oIE.busy : wscript.sleep 10 : loop
Set oIEDoc = oIE.Document
oIE.AddressBar = False
oIE.StatusBar = False
oIE.ToolBar = False
oIE.height=200
oIE.width=300
oIE.Resizable = False
oIE.Visible = True
sMsg= "<p><center>Cambiando los atributos.<br>Espere por favor.<br></center></p>"
oIEDoc.Body.Innerhtml= sMsg

'remove R attribute
objWshell.Run sStatement,7,true

Set oIEDoc = Nothing
oIE.Quit
Set oIE = Nothing
set objWshell = Nothing
msgBox "Han sido ocultados los archivos"
End sub

Sub chkForDrv(sFldrChoice)
Dim oRe, bMatch
set oRe = New RegExp
oRe.pattern = "[a-zA-Z]:\\$"
bMatch= oRe.Test(sFldrChoice)
If bMatch Then sFldrChoice= Left(sFldrChoice, 2)
Set oRe = Nothing
End sub    

Mostrar archivos (mostrar.vbs)
'---------------------------------------------------------
'(c) NorfiPC 2010 - http://norfipc.com
'All rights reserved. Provided as is
'with no guarantees, express or implied
'User assumes all responsibility
'---------------------------------------------------------
Option Explicit
Dim sFldrInput, introMsg
introMsg = msgBox("Este script va a mostrar archivos que estan ocultos"& vbCrLf & "restaurando los atributos originales",vbOKCancel)
If introMsg = vbCancel Then
	Wscript.Quit
End If
ChooseFolder sFldrInput,"Seleccione el archivo o carpeta: "
ChangeAttribute sFldrInput
Wscript.Quit
sub ChooseFolder(sFldrChoice, sSelectionString)
dim objShell, objFolder, objFolderItem, strPath, msgValue
Const DESK_TOP = &H10&
Const WINDOW_HANDLE = 0
Const OPTIONS = 0
sFldrChoice = ""
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(DESK_TOP)
Set objFolderItem = objFolder.Self
strPath = objFolderItem.Path
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.BrowseForFolder _
    (WINDOW_HANDLE, sSelectionString, OPTIONS, strPath) 
      
If objFolder Is Nothing Then
    Wscript.Quit
End If

Set objFolderItem = objFolder.Self
sFldrChoice = objFolderItem.Path

msgValue = msgBox("Usted selecciono "& sFldrChoice, vbOKCancel)
If msgValue = vbCancel Then
	Wscript.Quit
End If
If Len(sFldrChoice) = 3 then 
   chkForDrv sFldrChoice
End if
End sub

sub ChangeAttribute (sSourceFldr)

Const AttribR = "attrib -r -h -s "
Const sSwitch = " /s"
Const sWildCard = "\*.*"
dim sStatement
dim objWshell
Dim oIE, oIEDoc, sMsg
sStatement= AttribR & chr(34) & sSourceFldr& sWildcard & chr(34) &  sSwitch

'The next part is just to display a message while copying
set objWshell=Wscript.CreateObject("Wscript.Shell")
Set oIE = Wscript.CreateObject("InternetExplorer.Application")
oIE.Navigate "about:blank"
do while oIE.busy : wscript.sleep 10 : loop
Set oIEDoc = oIE.Document
oIE.AddressBar = False
oIE.StatusBar = False
oIE.ToolBar = False
oIE.height=200
oIE.width=300
oIE.Resizable = False
oIE.Visible = True
sMsg= "<p><center>Se estan restaurando los atributos<br>Por favor espere.<br></center></p>"
oIEDoc.Body.Innerhtml= sMsg

'remove R attribute
objWshell.Run sStatement,7,true

Set oIEDoc = Nothing
oIE.Quit
Set oIE = Nothing
set objWshell = Nothing
msgBox "Han sido restaurados los atributos de los archivos seleccionados"
End sub

Sub chkForDrv(sFldrChoice)
Dim oRe, bMatch
set oRe = New RegExp
oRe.pattern = "[a-zA-Z]:\\$"
bMatch= oRe.Test(sFldrChoice)
If bMatch Then sFldrChoice= Left(sFldrChoice, 2)
Set oRe = Nothing
End sub    



Archivos batch para ocultar y mostrar archivos y carpetas


Sistema algo similar al anterior que funciona cambiando los atributos de los elementos.
En este caso se emplean dos archivos batch, uno de ellos al ejecutarlo oculta todos los archivos y subcarpetas situadas en el directorio donde se encuentre, incluyéndose el mismo.
El otro al ejecutarlo, muestra todos los archivos y subcarpetas ocultas.
Es un método sencillo e ingenioso de ocultar y mostrar directorios completos, sin emplear contraseñas ni ninguna aplicación.

Ocultar.cmd
@echo off
attrib +r +h +s /s /d

Mostrar.cmd
@echo off
attrib -r -h -s /s /d
Usar este sistema tiene la desventaja que al usar el primero de los archivos batch, el segundo automáticamente queda oculto y no lo podremos emplear.
Podemos usar otra alternativa.



Archivos batch para ocultar y mostrar carpetas


Otra opción similar a la anterior, pero perfeccionada.
Al dar clic en el archivo batch "Ocultar.cmd", se abre la ventana del Símbolo del sistema.
Debemos arrastrar y soltar encima de ella la carpeta a ocultar, la cual puede estar en cualquier directorio.
A continuación presionar la tecla Enter.
Para mostrar dicha carpeta, usamos el segundo archivo batch llamado "Mostrar.cmd" y solo necesitamos presionar la tecla Enter.
¿Cómo funcionan?
Al usar el primero de ellos se crea un archivo de texto de nombre "reg.txt", que funciona como un registro, con la ruta a la carpeta oculta.
El segundo batch, simplemente lee esta ruta u restaura los atributos modificados.

Ocultar.cmd
:: (c) NorfiPC 2019 - http://norfipc.com
@echo off
Set /p PTH= Arrastre a esta ventana y suelte en ella la carpeta a ocultar y presione Enter.
echo %PTH% >reg.txt
set /p var= <reg.txt
cls
echo La carpeta en la ruta %var%se va a ocultar. 
echo Presione Enter para continuar.
pause>nul
attrib %PTH% +r +h +s

Mostrar.cmd
:: (c) NorfiPC 2019 - http://norfipc.com
@echo off
set /p var= <reg.txt
echo La carpeta en la ruta %var%esta oculta. 
echo Presione Enter para mostrarla.
pause>nul
attrib %var% -r -h -s



Archivo batch para ocultar carpeta con contraseña


Archivo batch que permite ocultar una carpeta y solo la muestra si se usa la contraseña correcta.
Funciona ocultando una carpeta llamada Documentos que debe encontrarse en el mismo directorio que el archivo batch.
En dicha carpeta se puede introducir y guardar todos los archivos que se necesiten tener ocultos.
Usa el siguiente código:
:: (c) NorfiPC 2019 - http://norfipc.com
@echo off
For /F "Delims=" %%I In ('Attrib Documentos^') Do Set _Attribs=%%I
If "%_Attribs:~4,1%"=="H" (
goto password
) ELSE (
Attrib +S +H Documentos
Attrib /D /S +S +H Documentos\*.*
)
:end
exit
:password
cls
echo Escriba la contrase¤a y presione Enter:
set/p password=
if %password%==cambiarcontra goto YES
if not %password%==cambiarcontra goto NO
:YES
cls
echo Es correcta la contrase¤a.
pause
goto unlock
:NO
cls
echo La contrase¤a que has escrito es incorrecta.
pause
goto end
:unlock
Attrib -S -H Documentos
Attrib /D /S -S -H Documentos\*.    
Sustituye los caracteres "cambiarcontra" en las dos líneas donde se encuentran, por los de la contraseña que deseas emplear.
Crea una carpeta de nombre "Documentos" en el mismo directorio donde se encuentra el archivo batch.
En su interior sitúa todo lo que necesitas ocultar.

Métodos alternos de ocultar archivos en Windows


Ocultar carpetas o archivos dentro de una imagen

Una forma curiosa de ocultar archivos, en este caso es dentro de una imagen.
Sigue los siguientes pasos:
• Selecciona cualquier imagen JPG, lo ideal es que no sea muy grande porque su tamaño crecerá en relación con los archivos a ocultar.
• Renómbrala a: foto.jpg
• Los archivos a ocultar si son varios, ya sean fotos, música, documentos, etc. agrúpalos en una carpeta y comprímela en formato .zip o .rar.
• Dale de nombre al archivo comprimido: file.zip.
• Abre una ventana de comandos en la carpeta o directorio donde están los archivos.
Para eso da un clic en la barra de direcciones de la carpta, escribe CMD y presiona Enter.
• En la ventana de negra de MSDOS que se abre, escribe o pega lo siguiente y presiona la tecla Enter.
copy /b foto.jpg + file.zip foto.jpg
Hecho, verás que el tamaño de la imagen foto.jpg ha crecido en proporción a los archivos que ocultaste, la imagen puedes verla igual que antes sin ninguna diferencia.
Para extraer los archivos solo da un clic derecho con el ratón en la imagen y escoge: "Extraer aquí", ya sea en Winrar, 7-Zip o en el asistente de carpetas comprimidas de Windows.
¡Ojo! Este método no funciona en Windows 10.

Ocultar carpeta sin descargar ningún archivo

Método de hacer relativamente invisible una carpeta, aunque no la ocultas por completo.
• Accede a sus Propiedades.
• Da un clic en la pestaña Personalizar, Cambiar icono.
• En la ventana que aparece llena de iconos, si te fijas bien, en la columna 13 o 14 hay tres espacios vacios, escoge uno y presiona Aceptar.
• Comprobarás que ahora no tiene icono alguno, solo el nombre.
• El siguiente paso es dejarla sin nombre, para eso selecciona en el menú contextual Cambiar nombre o pulsas la tecla F2 y entonces con el teclado numérico activado oprime la tecla ALT y sin soltarla escribe: 0160.
Hecho la carpeta esta ahora sin icono y sin nombre.

Paginas relacionadas