Vraag : Waarom word ik gesloten uit mijn dossiers?

Vensters 7 heeft onlangs beslist me toegang tot DOCUMENTEN EN MONTAGES op mijn computer te ontzeggen.  (Het bericht dat ik is eenvoudig ONTKENDE TOEGANG) heb gekregen
Can iedereen helpt me met dit probleem.  (Het pictogram van de dossieromslag voor DOCUMENTEN EN MONTAGES heeft een gesloten die hangslot op it.
wordt getoond

Antwoord : Waarom word ik gesloten uit mijn dossiers?

geef het gaan
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:
schemerige filename, placeholder, gegevens, tekenen, subtokens, tok

Als (WScript.Arguments.Count = 2) toen
  filename = WScript.Arguments (0)
  placeholder = WScript.Arguments (1)
Anders
  WScript.Echo „niet enugh argumenten: verwachte 2 (filename + placeholder).“
  WScript.Quit
Eind als
 
START_TOKEN = "" & placeholder & ""
END_TOKEN = „„Plaats fso = CreateObject („Scripting.FileSystemObject“) plaatsen input = (filename) gegevens fso.OpenTextFile = input input.ReadAll. Sluit Vastgestelde input = niets tekenen = verdelen (gegevens, START_TOKEN) voor elke tok in tekenen subtokens = verdelen (tok, END_TOKEN) als UBound (subtokens) > 0 toen als subtokens (0) <> "" dan WScript.Echo subtokens (0) als eind als daarna beëindigt 
Andere oplossingen  
 
programming4us programming4us