accès refusé pour des fichiers après formatage

**Yamour** · 11/11/2013, 15h50

après formatage de mon pc , j'ai essayé d'ouvrir des fichier pdf, word, etc placé dans le D: mais j'arrive pas à les ouvrir une fenêtre s'affiche "Accès refusé' j'ai essayé de décocher "chiffrer le contenu..." mais l'accès est refusé
Comment peux je accéder à mes fichiers !!

**hackoofr** · 11/11/2013, 16h15

Tu n'as pas fait un vrai formatage, mais je crois une réinstallation de windows ou bien formatage d'une seule partition; n'est-ce-pas

Tu peux essayer ceci , on sait jamais

Lancer l'ordinateur en mode sans échec
connectes-toi sous la session administrateur
sélectionnes les dossiers ou bien les fichiers problématiques
Clic droit dessus
Propriété
Onglet Sécurité
Paramètres avancés
Onglet propriétaire
coches "Remplacer le propriétaire des ..."
OK

Ou bien consultes cette Discussion : Accès refusé sur un dossier partagé après formatage

**Yamour** · 11/11/2013, 18h00

J'ai essayé comme tu m'as dit mais ça ne marche pas :/ ya t il une autre solution !

**hackoofr** · 12/11/2013, 09h02

Tu n'as pas préciser ton système d'exploitation :
Lis cet article : Définir, afficher, modifier ou supprimer les autorisations spéciales des fichiers et dossiers dans Windows XP

**Yamour** · 12/11/2013, 10h42

Bonjour ,
Mon système d'exploitation est Win 7.

**hackoofr** · 13/11/2013, 23h33

Testez ce Vbscript

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
'Vbscript pour modifier des Droits NTFS d'un Dossier et de son contenu (sous-dossiers et Fichiers)
'© Hackoo 25/03/2012
Dim oFSO,oFld 
Set oFSO = CreateObject("Scripting.FileSystemObject")
Dossier = "D:\Essai"

If oFSO.FolderExists(Dossier) Then
	ControlTotale(Dossier) ' Pour rendre un controle Totale du dossier
End If

Function ControlTotale(objet)
	Set Ws = CreateObject("WScript.Shell")
	Set ProcessEnv = Ws.Environment("Process")
	NomUtilisateur = ProcessEnv("USERNAME")
	Command = "%COMSPEC% /c Echo o| cacls "& objet &" /g " & qq(NomUtilisateur) & ":f administrateurs:f"
	Result = ws.Run(Command,0,True) 'exécution de la commande sans afficher la console MS-DOS
End Function

Function qq(strIn)
	qq = Chr(34) & strIn & Chr(34)
End Function

**Yamour** · 16/11/2013, 14h08

comment je vais tester ce script !

**hackoofr** · 16/11/2013, 16h02

Envoyé par Yamour

comment je vais tester ce script !

Laisse tomber le 1er script

Tu fais copier et coller ce code amélioré ci-dessous dans ton notepad et enregistre-le sous le nom ControlTotal.vbs

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
Call ControlTotale(qq(BrowseForFile()))

Function ControlTotale(objet)
	Set Ws = CreateObject("WScript.Shell")
	Set ProcessEnv = Ws.Environment("Process")
	NomUtilisateur = ProcessEnv("USERNAME")
	Command = "%COMSPEC% /c Echo o| cacls "& objet &" /g " & qq(NomUtilisateur) & ":f administrateurs:f"
	Result = ws.Run(Command,0,True) 'exÃ©cution de la commande sans afficher la console MS-DOS
End Function

Function qq(strIn)
	qq = Chr(34) & strIn & Chr(34)
End Function

Function BrowseForFile()
	Dim Title
	Title = "Browse for file optimized by Hackoo"
	Dim shell : Set shell = CreateObject("WScript.Shell")
	Dim fso : Set fso = CreateObject("Scripting.FileSystemObject")
	Dim tempFolder : Set tempFolder = fso.GetSpecialFolder(2)
	Dim tempName : tempName = fso.GetTempName()
	Dim tempFile : Set tempFile = tempFolder.CreateTextFile(tempName & ".hta")
	tempFile.Write _
	"<html>" & _
	"    <head>" & _
	"        <title>Browse</title>" & _
	"    </head>" & _
	"    <body>" & _
	"        <input type='file' id='f'>" & _
	"        <script type='text/javascript'>" & _
	"            var f = document.getElementById('f');" & _
	"            f.click();" & _
	"            var shell = new ActiveXObject('WScript.Shell');" & _
	"            shell.RegWrite('HKEY_CURRENT_USER\\Volatile Environment\\MsgResp" & tempName & _
	"', f.value);" & _
	"            window.close();" & _
	"        </script>" & _
	"    </body>" & _
	"</html>"
	tempFile.Close
	shell.Run tempFolder & "\" & tempName & ".hta",0,True
	BrowseForFile = shell.RegRead("HKEY_CURRENT_USER\Volatile Environment\MsgResp" & tempName)
	shell.RegDelete "HKEY_CURRENT_USER\Volatile Environment\MsgResp" & tempName
	fso.DeleteFile(tempFolder & "\" & tempName & ".hta")
	Msgbox "Le fichier " & qq(BrowseForFile) & " a été traité",64,Title
End Function

**Yamour** · 21/11/2013, 13h35

j'ai ajouté ce script et rien n'a changé! mes fichiers sont encore inaccessible

**owenho** · 22/11/2013, 13h34

c'est quoi le message d'erreur qui vous donne,

as tu installé le logiciel de lecture de fichier pdf, AcrobatReader, et la suite Microsoft office.

Crdt

**hackoofr** · 28/11/2013, 21h55

Envoyé par Yamour

j'ai ajouté ce script et rien n'a changé! mes fichiers sont encore inaccessible

Est-ce-que tu peux nous envoyer un fichier en pièce-jointe ?

**hackoofr** · 29/11/2013, 06h24

Testez ce nouveau Vbscript

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
Call ControlTotale(qq(BrowseForFile()))

Function ControlTotale(objet)
	Set Ws = CreateObject("WScript.Shell")
	Command1 = "cmd /c takeown /f " & qq(objet) & "> %tmp%\TmpTakeown.txt"
	Command2 = "cmd /u /c Type %tmp%\TmpTakeown.txt > %tmp%\LogTakeown.txt"
	Command3 = "cmd /c start %tmp%\LogTakeown.txt"
	Result1 = ws.Run(Command1,0,True)
	Result2 = ws.Run(Command2,0,True)
	Result3 = ws.Run(Command3,0,False)
End Function

Function qq(strIn)
	qq = Chr(34) & strIn & Chr(34)
End Function

Function BrowseForFile()
	Dim Title
	Title = "Browse for file optimized by Hackoo"
	Dim shell : Set shell = CreateObject("WScript.Shell")
	Dim fso : Set fso = CreateObject("Scripting.FileSystemObject")
	Dim tempFolder : Set tempFolder = fso.GetSpecialFolder(2)
	Dim tempName : tempName = fso.GetTempName()
	Dim tempFile : Set tempFile = tempFolder.CreateTextFile(tempName & ".hta")
	tempFile.Write _
	"<html>" & _
	"    <head>" & _
	"        <title>Browse</title>" & _
	"    </head>" & _
	"    <body>" & _
	"        <input type='file' id='f'>" & _
	"        <script type='text/javascript'>" & _
	"            var f = document.getElementById('f');" & _
	"            f.click();" & _
	"            var shell = new ActiveXObject('WScript.Shell');" & _
	"            shell.RegWrite('HKEY_CURRENT_USER\\Volatile Environment\\MsgResp" & tempName & _
	"', f.value);" & _
	"            window.close();" & _
	"        </script>" & _
	"    </body>" & _
	"</html>"
	tempFile.Close
	shell.Run tempFolder & "\" & tempName & ".hta",0,True
	BrowseForFile = shell.RegRead("HKEY_CURRENT_USER\Volatile Environment\MsgResp" & tempName)
	shell.RegDelete "HKEY_CURRENT_USER\Volatile Environment\MsgResp" & tempName
	fso.DeleteFile(tempFolder & "\" & tempName & ".hta")
	Msgbox "Le fichier " & qq(BrowseForFile) & " a été traité",64,Title
End Function

**meziantou** · 29/11/2013, 09h51

J'essaye de comprendre ta situation :
1) Tu as 2 partittions : C et D
2) Avant le formatage tu as chiffré les fichiers sur la partition D en utilisant l'outil fourni par Windows ("j'ai essayé de décocher chiffrer le contenu...")
3) Tu as réinstallé Windows ("formatage de mon pc")
4) Tu n'arrives plus à ouvrir tes fichiers sur la partition D

Est-ce cela ?

**Yamour** · 02/12/2013, 11h47

Bonjour ,
Oui en faite j'ai deux partitions mais j'ai rien fait avant le formatage de la partition C.
après le formatage de la partition , j'ai essayé d'accéder à mes fichiers mais j'ai le msg accès refusé. Alors j'ai voulu comprendre c quoi le problème et j'ai essayé de décocher chiffrer le contenu mais rien n'a changé , une msg s'affiche que je suis pas l'administrateur et je peux pas décocher cette case.

**hackoofr** · 02/12/2013, 12h11

Envoyé par Yamour

Bonjour ,
Oui en faite j'ai deux partitions mais j'ai rien fait avant le formatage de la partition C.
après le formatage de la partition , j'ai essayé d'accéder à mes fichiers mais j'ai le msg accès refusé. Alors j'ai voulu comprendre c quoi le problème et j'ai essayé de décocher chiffrer le contenu mais rien n'a changé , une msg s'affiche que je suis pas l'administrateur et je peux pas décocher cette case.

Avez-vous tester le dernier script que j'ai posté dernièrement ?

Si oui poster moi son Logfile

**geroma** · 04/12/2013, 23h25

Je comprend tu a du appliqué des stratégies de sécurité sur la racine à savoir le disque ''D'' sinon surement une activité virale et cette stratégie a été appliqué à l'utilisateur en cours....j ai été confronté à ce problème et je l 'ai résolu de la façon suivante:
- j'ai fait un live ''USB UBUNTU'', à partir d'ubuntu tu accède au disque ''D'' tu y copie toutes les données dans une partition tiers ou une unité de stockage externe ,après cette copie tu formates toute la partition ''D'' (étant sur UBUNTU )en suite tu remet tes données en place ,tu retournes sur windows et le tout est joué.

c "est vrai que c est pas professionnelle mais c est une solution rapide

accès refusé pour des fichiers après formatage

Sécurité

Discussions similaires

Partager

Partager