中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客注册登录会员网志搜索命令提示符 Bash 上传统计

中国DOS联盟论坛
现在时间是 2026-08-12 17:49

欢迎新会员 13383789659　 RSS
共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,256 会员排行不转换/ 简体中文/ 繁體中文（台灣）/ 繁體中文（香港）

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [己结]如何把获取的计算机名写入.ini 文件的指定位置查看 938　回复 4

楼主 [己结]如何把获取的计算机名写入.ini 文件的指定位置发表于 2010-02-06 11:44　·　中国江西南昌电信

sjp8208

新手上路

★

积分 2
发帖 4
注册 2009-02-10 17:01
17年会员
UID 138496
性别男

状态离线

@echo off
set name=%computername%

我想把得来的计算机名替换 .ini 文件里的二个 office

要写入的 refresh.ini 文件内容为:

web1=http://adlist.no1hdvdd.net/adlist.asp?uid=sjp8208&cn=office
web2=http://adlist.no1hdvdd.net/adlist2.asp?uid=sjp8208&cn=office
web3=about:blank
web4=about:blank
web5=about:blank
web6=about:blank
web7=about:blank
web8=about:blank
web9=about:blank

time1=1800
time2=1200
time3=1200
time4=1800
time5=600
time6=600
time7=600
time8=600
time9=600
time10=30
show=真

[ Last edited by sjp8208 on 2010-2-6 at 16:02 ]

第 2 楼发表于 2010-02-06 13:15　·　中国湖南株洲电信

bat-zw

金牌会员

★★★★

永远的学习者

积分 3,105
发帖 1,276
注册 2008-03-08 13:00
18年会员
UID 112398
性别男

状态离线



@echo off&setlocal enabledelayedexpansion

cd.>temp.txt

for /f "tokens=1* delims=:" %%a in ('findstr /n .* refresh.ini') do (

    set "str=%%b"

    if "!str:~-6!" equ "office" set /a n+=1

    if "!n!" equ "2" (

       echo !str:office=%computername%!>>temp.txt

       ) else (

       echo.!str!>>temp.txt

    )

)

del /q refresh.ini&ren temp.txt refresh.ini

start refresh.ini

[ Last edited by bat-zw on 2010-2-6 at 13:51 ]

批处理之家新域名：www.bathome.net

第 3 楼发表于 2010-02-06 13:52　·　中国北京海淀区联通

s11ss

银牌会员

★★★

积分 2,098
发帖 566
注册 2007-09-11 07:27
18年会员
UID 97070
性别男

状态离线

@echo off

set name=%computername%

set str=office

set file=refresh.ini

mshta vbscript:Execute("moveTo screen.width,0:With CreateObject(""Scripting.FileSystemObject""):s=Replace(.OpenTextFile(""%file%"").ReadAll,""%str%"",""%name%""):.OpenTextFile(""%file%"",2).Write s:End With:Close")

第 4 楼发表于 2010-02-06 16:00　·　中国江西南昌电信

sjp8208

新手上路

★

积分 2
发帖 4
注册 2009-02-10 17:01
17年会员
UID 138496
性别男

状态离线

谢谢楼上二位兄弟的指点，经测试，3楼的完全可以

二楼兄弟的，第一行的那个office不会更改，只会改第二个，然后在中间的空白二行，会写入

office=该机器名
office=该机器名

[ Last edited by sjp8208 on 2010-2-6 at 16:03 ]

第 5 楼发表于 2010-02-06 17:10　·　中国湖南株洲电信

bat-zw

金牌会员

★★★★

永远的学习者