Страница: 1 | 2 | 3 |
Вопрос: Bat (Batch) to VBS
Добавлено: 11.09.08 20:51
Автор вопроса: Wu-Tang
Привет.
Помогите пожалуйста этот батник переделать в vbs.
@echo off
set key=HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnceEx
reg add %key%\001 /ve /d "delete" /f
reg add %key%\001 /v 1 /d "%WinDir%\Del Files & Folders.vbs" /f
exit
И верно ли я написал: он добавляется в автозагрузку и после одной загрузки удаляется из нее.ъ
Где только не спрашивал, никто не смог помочь.
Заранее спасибо.
Ответы
Всего ответов: 32
Номер ответа: 1
Автор ответа:
Администратор
ICQ: 278109632
Вопросов: 42
Ответов: 3949
Web-сайт:
Профиль | | #1
Добавлено: 12.09.08 12:32
тут надо цикл проверки существования файла, сли батником. с КПК не могу написать, буду дома - напишу
Номер ответа: 2
Автор ответа:
Wu-Tang
Вопросов: 1
Ответов: 16
Профиль | | #2
Добавлено: 17.09.08 18:30
Действительно везде молчок был на мой вопрос.
Говорите это:
Он добавит файл в автозагрузку, после ребуту запустит его и затем удалит из авторана.
Верно?
Номер ответа: 3
Автор ответа:
Wu-Tang
Вопросов: 1
Ответов: 16
Профиль | | #3
Добавлено: 19.09.08 21:57
И есть ли команда для vbs аналогичная def /f /q %0 в батнике?
Номер ответа: 4
Автор ответа:
Wu-Tang
Вопросов: 1
Ответов: 16
Профиль | | #4
Добавлено: 30.09.08 18:13
Ребят, куда вы пропали то?
Номер ответа: 5
Автор ответа:
Шпион
ICQ: 250543104
Вопросов: 13
Ответов: 118
Профиль | | #5
Добавлено: 08.10.08 06:59
target_folder="C:\TEMP"
Set objFSO=Createobject("Scripting.Filessystem"
Set objFolder=objFSO.GetFolder(target_folder)
objFiles=objFolder.Files
For Each objFile In objFiles
objFSO.DeleteFile objFile.Name
Next
Set objFile=Nothing
Set objFiles=Nothing
Set objFolder=Nothing
Set objFSO=Nothing
Номер ответа: 6
Автор ответа:
Wu-Tang
Вопросов: 1
Ответов: 16
Профиль | | #6
Добавлено: 09.10.08 00:41
Шпион
А что это, не понял?
Номер ответа: 7
Автор ответа:
Шпион
ICQ: 250543104
Вопросов: 13
Ответов: 118
Профиль | | #7
Добавлено: 09.10.08 04:59
ты спросил - есть команда аналогичная def /f /q %0 в батнике? (я так понял, что здесь имелась в виду команда del) и судя по параметрам - удаление без вопросов.
суть написанного мной кода - создаем объекты, цепляемся к нужной директории, удаляем из нее все файлы.
если просто один файл хочешь удалить:
еще вопросы? вообще работа с файлами хорошо описана в Майкрософтовом script56.chm
Номер ответа: 8
Автор ответа:
Шпион
ICQ: 250543104
Вопросов: 13
Ответов: 118
Профиль | | #8
Добавлено: 09.10.08 05:18
CHM если не найдешь - забирай здесь
http://files.mail.ru/90BL6X
Номер ответа: 9
Автор ответа:
Администратор
ICQ: 278109632
Вопросов: 42
Ответов: 3949
Web-сайт:
Профиль | | #9
Добавлено: 09.10.08 12:54
если уж один файл, то проще Kill "file"
Номер ответа: 10
Автор ответа:
Шпион
ICQ: 250543104
Вопросов: 13
Ответов: 118
Профиль | | #10
Добавлено: 09.10.08 13:35
нет такого метода (Kill) в VBS
Номер ответа: 11
Автор ответа:
Администратор
ICQ: 278109632
Вопросов: 42
Ответов: 3949
Web-сайт:
Профиль | | #11
Добавлено: 09.10.08 16:33
Хм, действительно. Прошу прощения за неточность.
Номер ответа: 12
Автор ответа:
Wu-Tang
Вопросов: 1
Ответов: 16
Профиль | | #12
Добавлено: 15.10.08 01:06
Скрипт не работает ((
http://rapidshare.com/files/154052492/StartUp.rar
Номер ответа: 13
Автор ответа:
alroy
Вопросов: 3
Ответов: 28
Профиль | | #13
Добавлено: 15.10.08 13:58
Wu-Tang
Честно не понял в чем проблема! вот я поменял твой скрипт может ты этого хотел ?????
Номер ответа: 14
Автор ответа:
alroy
Вопросов: 3
Ответов: 28
Профиль | | #14
Добавлено: 15.10.08 14:00
ну а так вот информация про это:
Объект WshShell
Методы
RegWrite
Синтаксис:
RegWrite(<Name>,<Value>,<Type>
Назначение:
Записываает в реестр заданный параметр или раздел.
Параметры:
<Name> - строка, наименование параметра или раздела.
<Value> - значение параметра или значение для раздела по умолчанию.
<Type> - необязательный, тип значения. Возможные значения: "REG_SZ", "REG_EXPAND_SZ", "REG_DWORD", "REG_BINARY". Если указано "REG_SZ" или "REG_EXPAND_SZ", параметр "Type" конвертируется в строку, если указано "REG_DWORD", параметр "Type" конвертируется в целое число, если указано "REG_BINARY", параметр "Type" должен быть целым числом.
Описание:
Если "Name" оканчивается символом "\", метод записывает раздел, в противном случае записывается параметр. Параметр "Name" должен начинаться с одного из корневых ключей:
HKEY_CURRENT_USER - HKCU
HKEY_LOCAL_MACHINE - HKLM
HKEY_CLASSES_ROOT - HKCR
HKEY_USERS - HKEY_USERS
HKEY_CURRENT_CONFIG - HKEY_CURRENT_CONFIG
Пример:
Set WshShell = CreateObject("WScript.Shell"
WshShell.RegWrite "HKCU\NewKey\","Value"
WshShell.RegWrite "HKEY_CURRENT_USER\NewKey\Param","Value","REG_SZ"
MsgBox WshShell.RegRead("HKEY_CURRENT_USER\NewKey\Param"
MsgBox WshShell.RegRead("HKEY_CURRENT_USER\NewKey\"
WshShell.RegDelete "HKEY_CURRENT_USER\NewKey\Param"
WshShell.RegDelete "HKEY_CURRENT_USER\NewKey\"
Номер ответа: 15
Автор ответа:
Wu-Tang
Вопросов: 1
Ответов: 16
Профиль | | #15
Добавлено: 15.10.08 21:29
alroy
Всмысле поменял?
Неее, с этим vbs я ноль, вот и прошу просто написать.
Буду тестить, то что ты подредактил.
Спасибо...