Windows: Wie deaktivieren Sie das ausgeblendete Attribut für alle Dateien und Verzeichnisse auf einem Laufwerk?

18746
Pete Alvin

Mein Windows 7 wurde kürzlich vom system-fix.com-Virus infiziert und verdeckte alle meine Dateien und Verzeichnisse. Ich glaube, ich habe den Virus entfernt, finde aber immer noch nicht viele Dateien und Programme.

Gibt es ein einzelnes Befehlszeilenprogramm in Windows, das das verborgene Attribut für ein gesamtes Laufwerk rekursiv deaktivieren kann?

1
Wenn auf Ihrem Computer ein Virus vorhanden ist, ist das einzig sichere Verfahren die Sicherung Ihrer Dateien und Apps und die Neuinstallation Ihres Betriebssystems von neuen Medien. Joel Coehoorn vor 12 Jahren 2
SuperUser hat bereits ["Computer ist mit einem Virus oder einer Malware infiziert, was mache ich jetzt?"] (Http://superuser.com/questions/100360/), Hinweis. JdeBP vor 12 Jahren 1

4 Antworten auf die Frage

4
joeqwerty

Ich denke, attrib -H /S /Dsollte den Trick tun.

1
Andrew Lambert

Unhide wurde speziell zur Behebung dieses Symptoms entwickelt.

Bei der Ausführung werden alle + H-Dateien auf den Festplatten Ihres Computers angezeigt (-H). Es werden jedoch keine Dateien eingeblendet, die auch das + S-Attribut haben.

Weitere Informationen finden Sie im Removal Guide für System Fix .

1
Mr. Xymon

You may also try this simple windows script for unhiding files and directories. It only prompts the user to input the drive letter then executes the vbscript.

Run your notepad, copy the code below, then save it as unhide.vbs

pc_drive = InputBox("Input drive letter" & vbnewline & "example: E:\", "Drive","E:\") ryt = Right(pc_drive,2) If Len(pc_drive) <> 3 or ryt <> ":\" Then Call MsgBox("Either your input was invalid or the drive you specified doesn'texist",vbokonly,"Error") End If Set FSO = CreateObject("Scripting.FileSystemObject") ShowSubfolders FSO.GetFolder(pc_drive) Sub ShowSubFolders(Folder) str ="" For Each Subfolder in Folder.SubFolders str =str & " " & Subfolder.Path subFolder.Attributes = 0 ShowSubFolders Subfolder Next End Sub

You could save it in your USB drive for more accessibility. Instruction how to use it can be found in the link below.

Windows Script For Unhiding Folders Hidden By Worm Virus

EDIT: provided the vbscript code.

Während dies die Frage theoretisch beantworten kann, ist es [bevorzugt] (http://meta.stackexchange.com/q/8259), die wesentlichen Teile der Antwort hier aufzunehmen und den Link als Referenz bereitzustellen. Sathya vor 11 Jahren 1
Ich habe gerade meine Antwort bearbeitet. Ich freue mich über Ihren Vorschlag. Mr. Xymon vor 11 Jahren 0
Vielen Dank, dass Sie sich die Zeit genommen und den Inhalt hinzugefügt haben. Der Grund, warum wir dies tun, besteht darin, den Verlust von Inhalten aufgrund von Link-Rot zu verhindern. Prost. Sathya vor 11 Jahren 0
0
Cristian Ciocău

I had the same problem and I found a solution on Stackoverflow (you can take a look at https://stackoverflow.com/questions/8095002/windows-batch-script-to-unhide-files-hidden-by-virus ).

This code will make visible only the directories.

So, create a BAT file ( open the Notepad, copy + paste the below code and rename the file to fix.bat) which will contains:

echo "Enter Drive letter" set /p driveletter= attrib -s -h -a /s /d %driveletter%:\*.*

Also, I modified a bit the code provided by Mr. Xymon to avoid make Recycled Bin visible and to avoid Windows Permission Error.

Here is the code:

Sub ShowSubFolders(CurrentFolder) ' Skip some folders to avoid Windows Error Message If (CurrentFolder.Name <> "RECYCLER") and (CurrentFolder.Name <> "System Volume Information") and (CurrentFolder.Name <> "$RECYCLER.BIN") and (CurrentFolder.Name <> "Config.Msi") Then For Each Subfolder in CurrentFolder.Subfolders If (Subfolder.Name <> "RECYCLER") and (Subfolder.Name <> "System Volume Information") and (Subfolder.Name <> "$RECYCLER.BIN") and (Subfolder.Name <> "Config.Msi") Then Subfolder.Attributes = Subfolder.Attributes AND 0 End If ShowSubFolders(Subfolder) Next End If End Sub ' Main program pc_drive = InputBox("Input drive letter." & vbnewline & vbnewline & "Example: G:\", "Drive","G:\") ryt = Right(pc_drive,2) If Len(pc_drive) = 3 or ryt = ":\" Then Set FSO = CreateObject("Scripting.FileSystemObject") ' Check if the path exists or if the drive is ready If FSO.FolderExists(pc_drive) Then Call MsgBox("Our script will start after you click OK. Please wait the Finish Message!!!",vbokonly,"Starting...") ' TO DO: Add a progress bar here ShowSubfolders(FSO.GetFolder(pc_drive)) Call MsgBox("Done!",vbokonly,"Finished") Else Call MsgBox("Either your input was invalid or the drive you specified doesn't exist.",vbokonly,"Error") End If End If

Cheers!

Verwandte Probleme