ganjie

测试成功了，生成的文本里，再没有多出一个<tr>，很完美了，我把存放的文本路径改了，它就不需要读取生成的文本文件名了，谢谢了！

lhjoanna

哦？刚开始是还没生成文本文件啊，楼主是要反复使用吗？如果是可以修改为建立文本文件到一个其他地址。第二个问题一开始没注意到，已经修改，在楼上更新。

ganjie

测试了一下，总体是可以了，但有几个小问题，比如有60个文件，他应生成2个文本，但却生成了3个文本，因为它把生成的文本文件名都加进去了，还有生成的文本里，在结尾里总是多出一个<tr>

[ 本帖最后由 ganjie 于 2008-12-30 16:43 编辑 ]

lhjoanna

看看这个行不？

@echo off
setlocal enabledelayedexpansion
set "cd_=%cd%"
:loop
set "cd_=%cd_:*\=%"
set "cd_tmp=%cd_:\=%"
if not "%cd_tmp%"=="%cd_%" goto loop
set "folder_name=%cd_%"
set n=0
set sign1=1
for /r "%cd%\" %%i in (*.*) do (
  if not "%%~nxi" equ "%~nx0" (
    set /a n+=1
    set /a sign2=n%%30
    if !sign2! equ 1 ( 
       cd.>"!folder_name!_!sign1!.txt"
       echo ^<tr^>>>"!folder_name!_!sign1!.txt"
    )
    echo ^<td^>%%~ni^</td^>>>"!folder_name!_!sign1!.txt"
    set /a sign3=n%%3
    if !sign3! equ 0 (
       echo ^</tr^>>>"!folder_name!_!sign1!.txt"
       if not !sign2! equ 0 echo ^<tr^>>>"!folder_name!_!sign1!.txt"
    )
    set /a sign1=n/30+1
)
)
if not !sign3! equ 0 echo ^</tr^>>>"!folder_name!_!sign1!.txt"
echo 执行完毕！&pause>nul
复制代码

[ 本帖最后由 lhjoanna 于 2008-12-30 18:14 编辑 ]