Бат на удаление - вставление текста

[Hancog]

\del

[Iska]

См.: CMD/BAT - [решено] bat файл, при запуске которого в файле .cfg стирался весь текст и вставлялся новый (http://forum.oszone.net/thread-285370.html).

[Hancog]

\del

[Iska]

подскажите что не так »
Возможно, кодировка. В оригинале она — UTF-8. Полагаю, Вам проще будет создать файл-образец «Preferences» и просто копировать его поверх существующего. Возможно, Вы где-то ошиблись в количестве открывающих/закрывающих тэгов в JSON.

[Hancog]

\del

[Hancog]

\del

[Iska]

Для XP:
copy /y "Local State" "%UserProfile%\Local Settings\Application Data\Google\Chrome\User Data\Local State"
copy /y "Preferences" "%UserProfile%\Local Settings\Application Data\Google\Chrome\User Data\Default\Preferences"

В Windows 7 путь к конечным файлам будет иной, смотрите сами.

[Hancog]

\del

[Iska]

Спасибо еще раз,у меня все таки получилось с заменой текста, »
Ровно до тех пор, пока в Ваших файлах отсутствует кириллица.

как в 1 батник записать изменении текста в двух файлах в такой форме »
Именно в такой форме — никак.

P.S. Освойте тэг [code] (http://forum.oszone.net/misc.php?do=bbcode#code).

[Hancog]

\del

[Iska]

кирилицы нету »
Да ну?! Ладно, я допускаю, что у Вас пользователь имеет латинское имя. А что у Вас в «\profile\name», в «\ntp\app_page_names», в «\ntp\promo_line»?

[Georgio]

да мне больше в принципе не чего не надо,разобраться как 2 в 1 сделать и все »





Разбирайтесь:



@echo off
setlocal enableextensions enabledelayedexpansion
<"%~f0" (for %%i in (.) do call:sub)
exit /b

:sub
setlocal enableextensions enabledelayedexpansion
:sub.1
(
set "line="
set /p "line="
if not "!line!"==":::::::::::::::::::::::::::::::::::::" goto %0.1
)
copy nul "some file 1.cfg">nul
:sub.2
(
set "line="
set /p "line="
if not "!line!"=="#####################################" (echo.!line!& goto %0.2)
)>>"some file 1.cfg"
copy nul "some file 2.cfg">nul
:sub.3
(
set "line="
set /p "line="
if "!line!"=="*************************************" goto %0.4
echo.!line!
goto %0.3
)>>"some file 2.cfg"
:sub.4
endlocal
exit /b


:::::::::::::::::::::::::::::::::::::
Здесь
расположен
Ваш первый текст!
#####################################
Здесь
расположен
Ваш второй текст!
*************************************



.

[Hancog]

Разбирайтесь: »
Подскажите пожалуйста как сделать 9 файлов? и как указать путь к файлам,а не что бы в той папке где батник было

[Hancog]

ап тему

[Georgio]

@echo off
set quantity=9
for %%i in (
"D:\Work\82\1.txt"
"D:\Work\82\2.txt"
"D:\Work\82\3.txt"
"D:\Work\82\4.txt"
"D:\Work\82\5.txt"
"D:\Work\82\6.txt"
"D:\Work\82\7.txt"
"D:\Work\82\8.txt"
"D:\Work\82\9.txt"
) do (
for /f %%j in ('
set /a quantity+12
') do (
<"%~f0">%%i more +%%j
)
)
exit /b
####################
Здесь (начиная со слова "Здесь")
расположен
Ваш текст!

[Hancog]

У меня в 9 файлах разный текст,как сделать что бы во всех файлах был нужный текст

[Georgio]

У меня в 9 файлах разный текст,как сделать что бы во всех файлах был нужный текст »


@echo off
goto:#

#####################################
Здесь
расположен
Ваш 1-ый текст!
#####################################
Здесь
расположен
Ваш 2-ой текст!
#####################################
Здесь
расположен
Ваш 3-ий текст!
#####################################
Здесь
расположен
Ваш 4-ый текст!
#####################################
Здесь
расположен
Ваш 5-ый текст!
#####################################
Здесь
расположен
Ваш 6-ой текст!
#####################################
Здесь
расположен
Ваш 7-ой текст!
#####################################
Здесь
расположен
Ваш 8-ой текст!
#####################################
Здесь
расположен
Ваш 9-ый текст!
#####################################

:#
set quantity=9
for %%i in (
"D:\Work\79\1.txt"
"D:\Work\79\2.txt"
"D:\Work\79\3.txt"
"D:\Work\79\4.txt"
"D:\Work\79\5.txt"
"D:\Work\79\6.txt"
"D:\Work\79\7.txt"
"D:\Work\79\8.txt"
"D:\Work\79\9.txt"
) do (
set /a count+=1
call set %%count%%=%%i
)

for /l %%i in (1 1 %quantity%) do (
set /p="WScript.Echo(Split(WScript.CreateObject("Scripting.FileSystemObject").OpenTextFile("%~fs0").ReadAll(), vbCrLf&"#####################################"&vbCrLf)(%%i))"<nul>.vbs
for /f %%j in ('
call echo %%%%i%%
') do (
cscript //nologo .vbs| clip
for /l %%i in (1 1 5000) do (
pause<nul>nul
)
mshta "vbscript:CreateObject("Scripting.FileSystemObject").GetStandardStream(1).Write(ClipboardData.GetData("text"))&Close()">%%j
)
)
del .vbs

exit /b

[Hancog]

Спасибо

[Hancog]

Еще спросить хотел,не получается сохранить файлы где переменные пути т.е к примеру в %appdata%
Просто я так понял что он создает отдельный vbs и через него уже записует,а в нем не поддержуется такой вид пути,точнее подерживается но по другомы выглядит,поэтому подскажите пожалуйста

[Iska]

Hancog, Вы сейчас о чём? Ваш вопрос как-то связан с данной темой?