Mrrrr's Forum (VIEW ONLY)
Un forum care ofera solutii pentru unele probleme legate in general de PC. Pe langa solutii, aici puteti gasi si alte lucruri interesante // A forum that offers solutions to some PC related issues. Besides these, here you can find more interesting stuff.
|
Nou pe simpatie:
pisi_dulce pe Simpatie.ro
 | Femeie
25 ani
Maramures
cauta Barbat
28 - 57 ani |
|
|
Mrrrr's Forum (VIEW ONLY)ReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
TRaPModerator
Postari: 960
|
|
The following code is to create a bat file whose shortcut I add at startup, since Windows 11 doesn't restart my folders as it should when I leave them open at shutdown.
Dim objFSO, outFile
Set objFSO = CreateObject("Scripting.FileSystemObject")
'Open write stream
Set outFile = objFSO.CreateTextFile("PATH_TO_BAT_FILE\Open Folders.bat", True)
'Write each command line
outFile.WriteLine "Start %SystemRoot%\explorer.exe ""FOLDER PATH 1"""
outFile.WriteLine "Start %SystemRoot%\explorer.exe ""FOLDER PATH 2"""
outFile.WriteLine "Start %SystemRoot%\explorer.exe ""FOLDER PATH 3"""
outFile.WriteLine "Start %SystemRoot%\explorer.exe ""FOLDER PATH 4"""
outFile.WriteLine "Start %SystemRoot%\explorer.exe ""FOLDER PATH 5"""
outFile.WriteLine "Start %SystemRoot%\explorer.exe ""FOLDER PATH 6"""
'Close write stream
outFile.Close
WScript.Echo "Done." |
Additionally, between each line you can write an empty line using: outFile.WriteLine ""
Source:
https://social.technet.microsoft.com/Fo ... forum=ITCG
|
|
| |
|
