中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [已解决]读取文件名,按特定的格式保存在文本中
作者:
标题: [已解决]读取文件名,按特定的格式保存在文本中 上一主题 | 下一主题
ganjie
初级用户





积分 49
发帖 37
注册 2007-5-8
状态 离线
『楼 主』:  [已解决]读取文件名,按特定的格式保存在文本中

某目录下有若干文件夹

若03里有3个文件


小弟想用批处理读取文件名,然后生成如下形式,保存在相同文件名的文本中


1.txt 内容为:           01.jpg  02 下一张
2.txt 内容为:01 上一张  02.jpg  03 下一张
3.txt 内容为:02 上一张  03.jpg

若04文件中有4个文件

取文件名,然后生成如下形式,保存在相同文件名的文本中

1.txt 内容为:           01.jpg  02 下一张
2.txt 内容为:01 上一张  02.jpg  03 下一张
3.txt 内容为:02 上一张  03.jpg  04 下一张
4.txt 内容为:03 上一张  04.jpg

同理若只有两个文件时:
1.txt 内容为:           01.jpg  02 下一张
2.txt 内容为:01 上一张  02.jpg

只有一个文件时:
1.txt 内容为:          01.jpg
请论坛里的朋友们帮忙写个批,谢谢!


[ Last edited by ganjie on 2009-10-10 at 00:20 ]

   此帖被 +15 点积分         点击查看详情   
评分人:【 yishanju 分数: +15  时间:2009-10-8 16:18


2009-10-8 14:51
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
yishanju
银牌会员

[b]看你妹啊[/b]


积分 1488
发帖 1357
注册 2006-5-20
状态 离线
『第 2 楼』:  

问题描述清晰,加分




有问题请发论坛或者自行搜索,再短消息问我的统统是SB
2009-10-8 16:20
查看资料  发短消息 网志   编辑帖子  回复  引用回复
Hanyeguxing
银牌会员

正在学习中的菜鸟...


积分 1039
发帖 897
注册 2009-3-1
来自 在地狱中仰望天堂
状态 离线
『第 3 楼』:  

如果你是想在网页内切换显示图片,推荐内嵌js,这样就可以只使用一个网页文件。
没必要为每个图片生成一个网页文件。
你可以通过对网上chm电子书的反编译来看一下如何使用js切换显示内容、背景、模板等等的。



批处理之家 http://bbs.bathome.net/forum-5-1.html
2009-10-8 16:52
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ganjie
初级用户





积分 49
发帖 37
注册 2007-5-8
状态 离线
『第 4 楼』:  

楼上的说得不错,我是要做个网页切换,JS相册幻灯片,我倒会弄,已经在蓝色经典论坛上找到了,但这个是帮我一个朋友做,他就要用这种网页来做,我以前倒懂一点批处理,现在好久不弄后,觉得好难。

2009-10-8 17:48
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
netbenton
银牌会员

批处理编程迷


积分 1916
发帖 752
注册 2008-12-28
来自 广西
状态 离线
『第 5 楼』:  


@echo off
::在 %1 指定要处理的目录,如果所给目录不存在或不指定,则处理当前目录。
if '%1'=='#benton#' goto :bengin
if not '%1==' pushd %1
for /f "tokens=* delims=" %%a in ('dir /ad /s /b^&cd') do (
        pushd %%a
        call %0 #benton#
        popd
)
if not '%test%=='t echo 目录"%cd%"下找不到任何*.jpg文件
if not '%1==' popd
pause
goto :eof

:bengin
if not exist *.JPG goto :eof
set test=t&echo.
if exist *.TXT echo 目录"%cd%"已有txt文件,本次跳过,&echo.如果要重加,请把该目录的TXT文件删除后,再试。&goto :eof
echo 目录%cd%
setlocal enabledelayedexpansion


set/a n=0
for %%a in (*.jpg) do (
        set /a n+=1
        set fn!n!=%%~na
)

for /l %%a in (1,1,!n!) do (
    echo 正在写入文件: !fn%%a!.txt
        set/a pup=%%a-1,pdo=%%a+1
        for /f "tokens=1-2" %%m in ("!pup! !pdo!") do (
                if defined fn%%m set "str=!fn%%m! 上一张"
                set "str=!str! !fn%%a!.jpg"
                if defined fn%%n set "str=!str! !fn%%n! 下一张"
        )
        echo;!str!>"!fn%%a!.txt"
)
endlocal
echo 写入完成
goto :eof
[ Last edited by netbenton on 2009-10-9 at 10:50 ]

   此帖被 +2 点积分    点击查看详情   
评分人:【 ganjie 分数: +2  时间:2009-10-8 23:55




精简
[你的+我的+他的]=>[大家的]    个人网志   
2009-10-8 23:05
查看资料  发送邮件  发短消息 网志  OICQ (37659560)  编辑帖子  回复  引用回复
ganjie
初级用户





积分 49
发帖 37
注册 2007-5-8
状态 离线
『第 6 楼』:  

谢谢netbenton,论坛高手很多,但像你这样有水平又乐于助人的不多,诚心的谢谢你,谢谢了!

2009-10-9 12:27
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
netbenton
银牌会员

批处理编程迷


积分 1916
发帖 752
注册 2008-12-28
来自 广西
状态 离线
『第 7 楼』:  

论坛很多乐于解答的人的,只是不可能时时都在线,未能巧遇而已



精简
[你的+我的+他的]=>[大家的]    个人网志   
2009-10-9 12:53
查看资料  发送邮件  发短消息 网志  OICQ (37659560)  编辑帖子  回复  引用回复

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


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



论坛跳转: