Форум программистов, компьютерный форум, киберфорум
Batch (CMD/BAT)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
CMD/BAT Как получить параметры переданные в BAT-файл https://www.cyberforum.ru/ cmd-bat/ thread488961.html
Народ, напомните как получить параметры переданные в BAT-файл
CMD/BAT Команда AT
При запуске бат-файла q.bat, содержащего одну строчку COPY c:1.xls L: где L-сетевой диск все копируется нормально. Если же этот бат запускается через AT (AT 10:00 c:q.bat) то файл копироваться...
CMD/BAT Написать bat-файл под NT, который удалял бы из каталога все файлы больше 1 Mb Надо написать bat файл под NT, который удалял бы из каталога все файлы больше 1 Mb. Заранее признательна. https://www.cyberforum.ru/ cmd-bat/ thread479752.html CMD/BAT Как убить процесс из батника? нужно убить выполняющийся в системе процесс из bat-файла. как ?????? система win2k предполагается, что батник запущен администратором... https://www.cyberforum.ru/ cmd-bat/ thread475180.html
CMD/BAT Как в bat-файле реализовать запись слова без кавычек?
Есть спецы по батникам? нужна помощь. Допустим у меня есть перенная %my% содержащая слово в кавычках, допустим 'The Beatles'. т.е echo %my% дает нам 'The Beatles' Мне нужно сделать так, чтобы...
CMD/BAT Рандомная переменная, которая получает значение от 10 до 20 Приветствую. Нужна помощь в создании рандомной переменной, которая получает значение от 10 до 20. Узнал что переменные задает команда set. Долго читал разные статьи про данную команду(в том числе и... https://www.cyberforum.ru/ cmd-bat/ thread456704.html
CMD/BAT При использовании команды CALL весь код в батнике игнорируется Добрый вечер! Я делаю кое что с ncftp, но столкнулся с проблемой call ncftp.exe -u *** -p *** *~*~*~*.ftp.narod.ru После использования call, весь код в батнике игнорируется. Как мне подать еще... https://www.cyberforum.ru/ cmd-bat/ thread456080.html CMD/BAT Показывать определённое сообщение только после удачного выполнения PING
Здравствуйте, Нужен батник Проверка соединения с другим компьютером пока нет соединения с ip 10.0.0.5 надо повторять проверку снова и снова, пока соединение не появится. Если пинг...
CMD/BAT Как реализовать запуск bat-файла так, чтобы его окно было свернуто? https://www.cyberforum.ru/ cmd-bat/ thread455547.html
Доброго времени суток всем, подскажите как реализовать запуск bat файла, что бы черное окошко было свернуто
CMD/BAT Запуск cmd в нужной папке https://www.cyberforum.ru/ cmd-bat/ thread455165.html
Привет. Надоело все время писать cd чтобы перейти в нужный каталог. Как можно запустить cmd из папки и чтобы путь уже был в этой папке?
Получение первых строк двух файлов в переменные и сравнение значений этих переменных CMD/BAT
Приветствую... Народ прошу помогите написать бат программу...я бы и сам написал, но знаю только pascal а мне нужно чтоб пошло не только на 32 бит винду но и еще 64.. Программа простая... просто у...
CMD/BAT Создать таймер, который через 24 часа после начала отсчета выполнит команду Всем доброго дня, недавно созрела небольшая проблема. Дело в том, что я держу серверы по Minecraft и LineAge II в локальной сети. После запуска компьютера и серверов процессор достигает загрузки 100%... https://www.cyberforum.ru/ cmd-bat/ thread453764.html
Messir
25.02.2011, 02:10 0

Помогите написать BACH FILE . - CMD/BAT - Ответ 2687710

25.02.2011, 02:10. Показов 904. Ответов 3
Метки (Все метки)

Ответ

Пример:
copy.vbs:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
Dim a, b, x, i, fso
set fso = CreateObject('Scripting.FileSystemObject')
' Тут указываем имя исходного файла:
x = 'пример.txt'
 
i=InStrRev(x, '.')
If i > 0 then
    a = left(x, i-1)
Else
    a = x
End If
a = a & Year(Now)
b = Month(Now): If Len(b) = 1 Then b = '0' & b
a = a & b
b = Day(Now): If Len(b) = 1 Then b = '0' & b
a = a & b
b = Hour(Now): If Len(b) = 1 Then b = '0' & b
a = a & b
b = Minute(Now): If Len(b) = 1 Then b = '0' & b
a = a & b
if i > 0 Then a = a & Mid(x, i)
' Тут что-то делаем с файлами, например копируем первый во второй:
If fso.FileExists(x) Then
    if fso.FileExists(a) Then fso.GetFile(a).Delete
    fso.GetFile(x).Copy(a)
Else
    MsgBox 'File '' & x & '' does not exist!', vbCritical, 'Error'
End If
set fso = nothing


Вернуться к обсуждению:
Помогите написать BACH FILE . CMD/BAT
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.02.2011, 02:10
Готовые ответы и решения:

Помогите написать batch file!!!!!!!!
Очень нужно написать batch file, который бы использовал в качестве параметра название какого-нибудь...

Помогите отладить программу. Can't find include file <alloc>.
Доброго времени суток,вобщем нужно сделать так,чтобы она заработала.Я запутался в ошибках.Помогите...

Помогите подключится к базе: The Microsoft Jet database engine cannot open the file '(unknown)'
Когда с Asp-страницы пытаюсь подключиться к базе , в Explorer впишет ошибку: The Microsoft Jet...

Не получается написать код для File>Open
Создал проект по шаблону &quot;MDI Application&quot;. В форму MDIChild добавил компоненту Memo. По книжке...

3
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.02.2011, 02:10

Помогите написать формулу ,никак немогу написать (2k)! в ней
Помогите написать формулу ,никак немогу написать (2k)! в ней

Написать header file для производного класса class
Vsem privet,kto mojet napisat zdes header file. Vse funkcii uje zapisal. Nujno zapisat...

Нужно написать программу которая сохраняет данные dat.file
Нужно написать программу которая сохраняет данные dat.file Почему не создает &quot;dat.file&quot;! где...

Как написать CGI на С или на Delphi для Upload File на сервер?
Как написать CGI на С или на Delphi для Upload File на сервер,

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru