[文本处理] [已解决]批处理如何将txt文本按每行行尾的数字大小排序？

zwgxsy

比如：
http://www.baidu.com/  排名：6
http://www.google.com/ 排名：1
http://www.bathome.net/ 排名：340977

结果：
http://www.google.com/ 排名：1
http://www.baidu.com/  排名：6
http://www.bathome.net/ 排名：340977

求解

CrLf

@echo off&setlocal enabledelayedexpansion
%1 for /f "tokens=1* delims=:" %%a in ('%0 ::^|sort') do echo %%b
%1 pause&exit
for /f "tokens=1* delims=：" %%a in (1.txt) do (
	set n=       %%b
	echo !n:~-6!:%%a：%%b
)
复制代码

ArdentMan

赞！
用::来做参数起到第二次注释二三句的作用
参数真是
用神了
神了
神

zwgxsy

@echo off&setlocal enabledelayedexpansion
%1 for /f "tokens=1* delims=:" %%a in ('%0 ::^|sort') do echo %%b
%1 pause&exit
for /f "tokens=1* delims=：" %%a in (11.txt) do (
        set n=       %%b
        echo !n:~-6!:%%a：%%b >>2.txt
)
结果怎么是
       1:http://www.google.com/ 排名：1
  340977:http://www.bathome.net/ 排名：340977
       6:http://www.baidu.com/  排名：6

CrLf

输出最终结果的是第一个 for，而不是第二个 for

zwgxsy

确实有点晕了，不过问题解决了，谢谢。

pcl_test

//&cls&dir /a-d/b 1.txt|cscript -nologo -e:jscript "%~f0"&pause&exit

var fso = new ActiveXObject('Scripting.Filesystemobject');
function SortNumber(file){
    var f = fso.OpenTextFile(file, 1);
    try{
        var txt = f.ReadAll().split(/\r\n/).sort(
            function(a, b){return Number(a.replace(/.*(\d+)\s*$/, '$1'))-Number(b.replace(/.*(\d+)\s*$/, '$1'))}
        ).join('\r\n');
        f.Close();
        fso.OpenTextFile(file, 2).Write(txt);
    }catch(e){}
}
while(!WSH.StdIn.AtEndOfStream)SortNumber(WSH.StdIn.ReadLine());
WSH.echo('Done');
复制代码