hanyeguxing

按电话区号分组排列手机区段：

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1,2" %%a in (data.txt) do (if not "%%b"=="!b!" set @%%b@%%a=a
echo.正在预处理%%a %%b&set b=%%b)
echo.正在进行后期处理...
for /f "tokens=1,2" %%a in (quhao.txt) do set @%%b#%%a=b
(for /f "tokens=2,3 delims==@#" %%a in ('set @') do if %%b==b (set a=%%a) else echo.%%a !a!)>结果.txt
echo.已经完成&pause
复制代码

如果想加快处理速度，不看到处理过程，则：

@echo off&setlocal enabledelayedexpansion&echo.正在处理中。。。
for /f "tokens=1,2" %%a in (data.txt) do (if not "%%b"=="!b!" set @%%b@%%a=a
set b=%%b)
for /f "tokens=1,2" %%a in (quhao.txt) do set @%%b#%%a=b
(for /f "tokens=2,3 delims==@#" %%a in ('set @') do if %%b==b (set a=%%a) else echo.%%a !a!)>结果.txt
复制代码

[ 本帖最后由 hanyeguxing 于 2010-5-5 17:47 编辑 ]

hanyeguxing

你是直接运行我在15楼的代码，没做任何修改？

hanyeguxing

1，检查data.txt和quhao.txt的文件名是否正确
2，提供两个文本的编码分别是什么？
或者运行下面这个批处理测试：

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1,2" %%a in (data.txt) do set "#data=%%a %%b"
for /f "tokens=1,2" %%a in (quhao.txt) do set "#quhao=%%a %%b"
echo.测试结果：
set #
pause
复制代码

并说明最后显示什么？

[ 本帖最后由 hanyeguxing 于 2010-5-5 14:45 编辑 ]

hanyeguxing

新建一个文本，命令为临时.txt。
然后打开data.txt，全选并复制里面所有内容，在临时.txt里粘贴。
保存后，删除data.txt，并把临时.txt改名为data.txt
然后再运行我在15楼的代码

[ 本帖最后由 hanyeguxing 于 2010-5-5 15:02 编辑 ]

hanyeguxing

按电话区号分组排列手机区段：

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1,2" %%a in (data.txt) do (if not "%%b"=="!b!" set @%%b@%%a=a
echo.正在预处理%%a %%b&set b=%%b)
echo.正在进行后期处理...
for /f "tokens=1,2" %%a in (quhao.txt) do set @%%b#%%a=b
(for /f "tokens=2,3 delims==@#" %%a in ('set @') do if %%b==b (set a=%%a) else echo.%%a !a!)>结果.txt
echo.已经完成&pause
复制代码

如果想加快处理速度，不看到处理过程，则：

@echo off&setlocal enabledelayedexpansion&echo.正在处理中。。。
for /f "tokens=1,2" %%a in (data.txt) do (if not "%%b"=="!b!" set @%%b@%%a=a
set b=%%b)
for /f "tokens=1,2" %%a in (quhao.txt) do set @%%b#%%a=b
(for /f "tokens=2,3 delims==@#" %%a in ('set @') do if %%b==b (set a=%%a) else echo.%%a !a!)>结果.txt
复制代码

[ 本帖最后由 hanyeguxing 于 2010-5-5 17:36 编辑 ]