TemaZosin
Full Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
1.
rd folder /q /s
как сделать так, чтобы терлось все в этой папке, кроме какой-либо? какие папки внутри я не знаю, хочу, чтобы все удалились, кроме заданной мной.
2.
подскажите скрипт, чтобы создать ярлык для internet explorer %program files%\internet explorer\iexplore.exe в быстрый запуск %appdata%\icrosoft\Internet Explorer\Quick Launch
Нашел скрипт, но не получается: переменные не знаю как задать.
Нашел для локаппдаты http://www.activexperts.com/admin/scripts/vbscript/0276/ пробовал application_data но не получилось.
Подскажите готовый код. Нужно только ярлык, больше ничего не нужно.
Код: Option Explicit
Dim Args1, Args2
Args1 = ""
Args2 = ""
On Error Resume Next
Args1 = Wscript.Arguments.Item(0)
Args2 = Wscript.Arguments.Item(1)
Dim objWshShell, objWshShortcut, objFSO
Dim strDesktop, ShortcutName, ShortcutExt, ShortcutPath
Set objWshShell = WScript.CreateObject("WScript.Shell")
strDesktop = objWshShell.SpecialFolders("Desktop")
Set objFSO = WScript.CreateObject("Scripting.FileSystemObject")
ShortcutName = objFSO.GetBaseName(Args1)
ShortcutExt = objFSO.GetExtensionName(Args1)
ShortcutPath = objFSO.GetParentFolderName(Args1)
If Len(Args2)=0 Then Args2=ShortcutName
Set objWshShortcut = objWshShell.CreateShortcut _
(strDesktop &"\"& Args2 &".lnk")
With objWshShortcut
.WorkingDirectory = ShortcutPath
.TargetPath = ShortcutName &"."& ShortcutExt
.IconLocation = Args1 &", 0"
.Save
End with |
3.
Использовал код для того, чтобы несколько строчек были как одна записана для запуска через start
Код: start /b "" "cmd /c "ping ya.ru ^& ping ya.com""
|
Все хорошо работало. Но не получается для кода с переменными применить.
Код: for /f "tokens=2,*" %%C in ('reg query "hkcu\software\microsoft\windows\currentversion\explorer\shell folders" /v startup') do call set "CUSTART=%%D"
for /f "tokens=2,*" %%E in ('reg query "hkcu\software\microsoft\windows\currentversion\explorer\shell folders" /v Personal') do call set "DOCS=%%F"
rd "%CUSTART%" /q /s
rd "%DOCS%" /q /s
|
Как бы запихать все внутрь одной строчки? Я бы оставил так, но бывает, что иногда повисает на какой-то строчке и скрипт дальше не идет. Если же использовать start /b или start cmd /c то тогда получаемые переменные значения не передаются в новое окно. Как вариант, если возможно для всех создаваемых новых окон передавать значения полученные, то это решило бы проблему. |
Всего записей: 512 | Зарегистр. 30-08-2012 | Отправлено: 05:11 23-05-2013 | Исправлено: TemaZosin, 06:22 23-05-2013 |
|
на рабочий стол, в итоге там образуется очень быстро болото. И я уже утомился чистить это каждые пару дней. 
