中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [己结]如何把获取的计算机名写入.ini 文件的指定位置
作者:
标题: [己结]如何把获取的计算机名写入.ini 文件的指定位置 上一主题 | 下一主题
sjp8208
新手上路





积分 2
发帖 4
注册 2009-2-10
状态 离线
『楼 主』:  [己结]如何把获取的计算机名写入.ini 文件的指定位置

@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 ]

2010-2-6 11:44
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
bat-zw
金牌会员

永远的学习者


积分 3105
发帖 1276
注册 2008-3-8
状态 离线
『第 2 楼』:  


@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
2010-2-6 13:15
查看资料  发送邮件  发短消息 网志  OICQ (841615149)  编辑帖子  回复  引用回复
s11ss
银牌会员





积分 2098
发帖 566
注册 2007-9-11
状态 离线
『第 3 楼』:  


@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")


2010-2-6 13:52
查看资料  发短消息 网志   编辑帖子  回复  引用回复
sjp8208
新手上路





积分 2
发帖 4
注册 2009-2-10
状态 离线
『第 4 楼』:  

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

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

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

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

2010-2-6 16:00
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
bat-zw
金牌会员

永远的学习者


积分 3105
发帖 1276
注册 2008-3-8
状态 离线
『第 5 楼』:  



  Quote:
Originally posted by sjp8208 at 2010-2-6 16:00:
谢谢楼上二位兄弟的指点,经测试,3楼的完全可以

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

...

看错题意,汗。。。



批处理之家新域名:www.bathome.net
2010-2-6 17:10
查看资料  发送邮件  发短消息 网志  OICQ (841615149)  编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: