中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-09 14:37 		共 47,811 主题排行 / 349,896 发帖 / 今日 1 篇 / 48,254 会员排行
DOS批处理 & 脚本技术（批处理室） » 记事本的查找问题
可打印版本 　2,039 / 22
第16楼　HAT 发表于 2008-08-25 00:38
版主　发帖 5,017　积分 9,023
你是怎么改的？代码贴出来
第17楼　dragonamd 发表于 2008-08-25 01:59
中级用户　发帖 100　积分 209
@echo off
setlocal enabledelayedexpansion
for /f "tokens=*" %%a in ('dir /b /tc /o-d /a *.txt') do (
set NewFile=%%a
goto :next
)
:next
for /f "usebackq delims=" %%i in ("%NewFile%") do (
for %%j in (%%i) do (
set str=%%j
if "!str:~,1!"=="5" (
set/a n+=1
if !n! equ 1 echo %%j 这2行能不能显示在同一行上
if !n! equ 3 echo %%j&pause&exit 这2行能不能显示在同一行上
do mshta vbscript:createobject("wscript.shell").popup(" %ScdLine:~1,-1% %%j ")
)
)
)
第18楼　dragonamd 发表于 2008-08-25 18:36
中级用户　发帖 100　积分 209
有人可否回答一下，。新手都没人指点吗
第19楼　HAT 发表于 2008-08-25 19:35
版主　发帖 5,017　积分 9,023
这样可以吗？

不知道你的%ScdLine:~1,-1%从哪里来的，只好跟着你乱写了。

[ Last edited by HAT on 2008-8-26 at 12:35 AM ]
第20楼　dragonamd 发表于 2008-08-26 00:13
中级用户　发帖 100　积分 209
HAT大哥的代码多了一个DO，。呵呵，已经改好了，不过
@echo off
setlocal enabledelayedexpansion
for /f "tokens=*" %%a in ('dir /b /tc /o-d /a *.txt') do (
set NewFile=%%a
goto :next
)
:next
set str=
for /f "usebackq delims=" %%i in ("%NewFile%") do (
for %%j in (%%i) do (
set str=%%j
if "!str:~,1!"=="5" (
set/a n+=1
if !n! equ 1 set str=!str!%%j
if !n! equ 3 set str=!str!&goto :end
)
)
)
goto :eof
:end
mshta vbscript:createobject("wscript.shell").popup(" !str! !str! ")
这样只能显示一个，上面的1和3能不能同时显示在popup(" !str! !str! ") 不过这样做不成功，。希望大哥再帮忙修改一下，
第21楼　HAT 发表于 2008-08-26 00:35
版主　发帖 5,017　积分 9,023
为什么多了一个do呢？因为19楼的代码是从17楼拷贝的。
19楼已经更新，运行一下，结果贴出来看看。
第22楼　dragonamd 发表于 2008-08-26 00:40
中级用户　发帖 100　积分 209
是更新了，。但20楼的问题能解决吗？
第23楼　HAT 发表于 2008-08-26 00:49
版主　发帖 5,017　积分 9,023
上一页　 1 2
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023