[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
lzwudi

Rank: 4

帖子
88 
积分
399 
技术
0  
捐助
0  
注册时间
2008-1-13 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2008-10-28 21:12 | 只看该作者

[文本处理] 读取文本内容后设置为变量

假设A.TXT内容如下(内容不固定):
  1. 19830608 26ZHU

  2. 19840726 25SHU

  3. 19850319 24NIU
复制代码
读取A.TXT内容后:
把19830608设置变量为A1
把26ZHU设置变量为A2
把19840726设置变量为B1
把25SHU设置变量为B2
把19850319设置变量为C1
把24NIU设置变量为C2
代码越精简越好,运行时间越少越好!
请指教!
收藏 分享
帮助别人是快乐
被人帮助是幸福

pusofalse

Rank: 8Rank: 8

帖子
1166 
积分
5174 
技术
13  
捐助
0  
注册时间
2008-3-11 
2楼
发表于 2008-10-28 21:34 | 只看该作者 
  1. @echo off&setlocal enabledelayedexpansion

  2. set "var=A B C D E F G H I J K L M N O P Q R S T U V W X Y Z"

  3. for %%a in (%var%) do set /a nn+=1 & set "_!nn!=%%a"

  4. for /f "tokens=1*" %%a in (a.txt) do (

  5.       set /a aa +=1

  6.       call set "%%_!aa!%%1=%%a"

  7.       call set "%%_!aa!%%2=%%b"

  8. )

  9. for %%a in (%var%) do (

  10.      for %%i in (1 2) do (

  11.      if defined %%a%%i echo %%a%%i:  !%%a%%i!

  12. ))

  13. pause
复制代码

[ 本帖最后由 pusofalse 于 2008-10-28 21:47 编辑 ]
心绪平和，眼藏静谧。

TOP

lzwudi

Rank: 4

帖子
88 
积分
399 
技术
0  
捐助
0  
注册时间
2008-1-13 
3楼
发表于 2008-10-28 21:39 | 只看该作者
请问此文本中有多行字符可以做到吗?
帮助别人是快乐
被人帮助是幸福

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14816 
积分
45993 
技术
848  
捐助
745  
注册时间
2008-6-9 
4楼
发表于 2008-10-28 21:40 | 只看该作者

回复 3楼 的帖子

请问你能亲自做下测试再提问吗?
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

pusofalse

Rank: 8Rank: 8

帖子
1166 
积分
5174 
技术
13  
捐助
0  
注册时间
2008-3-11 
5楼
发表于 2008-10-28 21:43 | 只看该作者

回复 3楼 的帖子

上面的代码你测试过了吗？？
多行？多少行？一共就26个字母，也就最多只能26行，超过26行，引用变量时就会出错，因为赋值的是1、2、3，用%1% %2%引用变量时会被误当作%1、%2、%3 参数处理。。。你说应该怎样做？、、、
心绪平和，眼藏静谧。

TOP

lzwudi

Rank: 4

帖子
88 
积分
399 
技术
0  
捐助
0  
注册时间
2008-1-13 
6楼
发表于 2008-10-28 21:46 | 只看该作者
别急别急,我只是好奇,想问问,不明白嘛!惹你生气了,我就是有死不要脸的精神,^_^
帮助别人是快乐
被人帮助是幸福

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14816 
积分
45993 
技术
848  
捐助
745  
注册时间
2008-6-9 
7楼
发表于 2008-10-28 21:49 | 只看该作者

回复 6楼 的帖子

本论坛提倡先亲自测试后提问的精神
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

jellyhk

Rank: 6Rank: 6

帖子
356 
积分
2177 
技术
6  
捐助
0  
注册时间
2008-8-4 
8楼
发表于 2008-10-29 03:59 | 只看该作者
完全看不懂！
看起眼睛花呢！
我只知道   <      可以付值
本人已死！不用联系！~
要联系下来联系！~~

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14816 
积分
45993 
技术
848  
捐助
745  
注册时间
2008-6-9 
9楼
发表于 2008-10-29 09:58 | 只看该作者

回复 8楼 的帖子

那就多看看for的教程吧
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表