批处理之家 - Powered by Discuz! Board

标题: [文本处理] 批处理如何获取两个指定数字之间的的连续数字 [打印本页]

作者: fs999 时间: 2013-8-21 09:41 标题: 批处理如何获取两个指定数字之间的的连续数字

本帖最后由 pcl_test 于 2016-8-26 20:04 编辑

求高地位电话号码变成连续号码的批处理。
各位大神早上好，

      本人有一需求，有一text文本，里面是电话号码，只有高地位，想输出为连续的号码，如下

低位号码          高位号码                         经过批处理得出的要得出连续的结果
88800111       8880222                      88800111、88800112、88800113、... ... 连续的号码 ... ... 、8880020、88800221、88800222
88800330       88800333                   8880330 、88800331、88800332、88800333
88800339       88800339                   88800339 (若高地位相同，则显示该一个号码)

输出的结果，可保存到ok.txt 文本或Excel 。分割符号不作要求，  如  结果 88800111\88800112\88800113\ 或 88800111、88800112、88800113

谢谢

作者: fs999 时间: 2013-8-21 10:45

有人吗？在线等着呢。。。

作者: DAIC 时间: 2013-8-21 10:48

第二行没有高位号码？

作者: terse 时间: 2013-8-21 12:46

本帖最后由 terse 于 2013-8-22 13:46 编辑

@echo off
::如果号码不大于2147483646 这样试
(for /f "tokens=1-2" %%a in (text.txt) do (
	set/p=%%a,%%b,<nul
        for /L %%i in (%%a,1,%%b) do set/p=%%i,<nul
	echo;
))>ok.txt
start "" ok.txt
复制代码

作者: fs999 时间: 2013-8-22 10:52

感谢 terse 热心提供代码，执行了一下，看内容似乎可行，但是没有保存结果。

我编辑了问题的内容，请帮忙优化一下代码。谢谢

另外补充，电话号码最大长度为 8位，最短为 3 位，如 110 119

输出的结果必须与原高低位号码同行，不能转行，否则导入 excel 会出错。

作者: ADSL0125 时间: 2013-8-22 12:00

回复 1# fs999

@ECHO OFF

REM 高位不能大于2147483646

REM 源文件路径
SET "SourecFile=D:\a.txt"

IF "%1" NEQ "" SET "SourecFile=%1"

REM 输出文件路径
SET "OutputFile=D:\ok.txt"

REM 高低位间分隔符
SET DelimsChar=、

REM 输出用分隔符
SET SplitChar=,

SET /P=""<NUL>%OutputFile%

FOR /F "tokens=1-3 delims=%DelimsChar% " %%a IN (%SourecFile%) DO (
	FOR /L %%a IN (%%a,1,%%b) DO (
		IF %%a NEQ 0 (
			IF %%a EQU %%b (
				ECHO %%a>>%OutputFile%
			) ELSE (
				SET /P="%%a%SplitChar%"<NUL>>%OutputFile%
			) 
		)
	)
)

ECHO DONE,OUTPUT TO %OutputFile%
PAUSE
复制代码

作者: terse 时间: 2013-8-22 13:46

回复 5# fs999

已修改

欢迎光临批处理之家 (http://bbs.bathome.net/)