|
|
|
| 文本录入 |
| 运行环境： Win9x/NT/2000/XP/2003 |
（载入中...） |
| 文件大小： 1 K |
| 软件类别： BAT源码 |
| 软件语言： 简体中文 |
| 软件属性： 热 |
| 授权方式： 免费版 |
| 添加时间： 2008-3-25 16:54:58 |
| 软件等级： ★★★ |
| 软件绿化： 佚名 |
| 相关链接： 源码演示地址 源码注册地址 |
| 下载次数： 日： 周： 月： 总： |
| 软件添加： 审核:lodge 录入:lodge |
警告：运行BAT源码是一种危险的动作，如果你不熟悉，请不要尝试！
echo off
title 文本录入工具
color 0f
cls
echo 本程序只支持一次性录入
echo 录入后会生成excel.txt和bak.txt两个文本文件
echo 第一个文件可导入excel电子表格进行处理
echo 第二个文件可备份您录入的结果进行查找工作
echo 如果这两个文件丢失或者损坏将不能恢复
echo 您可以备份录入好的两个文本文件,以便以后使用或者查询
echo 备份好的文件可以用主程序调出
echo 谢谢您使用
pause
goto begin
:begin
cls
echo 您想要做什么？
echo ①录入
echo ②查找
echo ③退出
echo ④返回
set /p s=请选择:
if "%s%"=="1" goto l
if "%s%"=="2" goto c
if "%s%"=="3" goto t
if "%s%"=="4" goto begin
echo 不包含你选择的内容,请重新输入。。。
pause >nul
goto begin
:l
cls
echo 录前必读：
echo 请在学号中输入q退出程序，输入b返回开始。
echo 录入只能一次性完成。
echo 中途退出则会造成查询结果不完整。
echo 5秒后自动开始录入状态。。。
ping 127.1 -n 5 >nul
echo "学号","性别","姓名" >>excel.txt
echo 学号 性别 姓名 >>bak.txt
goto xh
:xh
set /p a=请输入学号:
if "%a%"=="q" goto t
if "%a%"=="b" goto begin
set /p b=请输入性别:
if "%b%"=="q" goto ts
if "%b%"=="b" goto ts1
set /p c=请输入姓名:
if "%c%"=="q" goto ts
if "%c%"=="b" goto ts1
echo "%a%","%b%","%c%" >>excel.txt
echo %a% %b% %c% >>bak.txt
goto xh
:c
cls
set/p no1=请输入学号：
for /f "tokens=1,2,3* delims= " %%a in ('findstr "%no1%" bak.txt') do echo 你好, %%b, %%c
pause
if "%no1%"=="b" goto begin
goto c
:t
exit
:ts
echo 您所执行的操作则会造成查询及录入结果不完整。
echo 按任意键继续执行您的操作。
pause >nul
goto t
:ts1
echo 您所执行的操作则会造成查询及录入结果不完整。
echo 按任意键继续执行您的操作。
pause >nul
goto begin
|
echo off
title 文本录入工具
color 0f
cls
echo 本程序只支持一次性录入
echo 录入后会生成excel.txt和bak.txt两个文本文件
echo 第一个文件可导入excel电子表格进行处理
echo 第二个文件可备份您录入的结果进行查找工作
echo 如果这两个文件丢失或者损坏将不能恢复
echo 您可以备份录入好的两个文本文件,以便以后使用或者查询
echo 备份好的文件可以用主程序调出
echo 谢谢您使用
pause
goto begin
:begin
cls
echo 您想要做什么？
echo ①录入
echo ②查找
echo ③退出
echo ④返回
set /p s=请选择:
if "%s%"=="1" goto l
if "%s%"=="2" goto c
if "%s%"=="3" goto t
if "%s%"=="4" goto begin
echo 不包含你选择的内容,请重新输入。。。
pause >nul
goto begin
:l
cls
echo 录前必读：
echo 请在学号中输入q退出程序，输入b返回开始。
echo 录入只能一次性完成。
echo 中途退出则会造成查询结果不完整。
echo 5秒后自动开始录入状态。。。
ping 127.1 -n 5 >nul
echo "学号","性别","姓名" >>excel.txt
echo 学号 性别 姓名 >>bak.txt
goto xh
:xh
set /p a=请输入学号:
if "%a%"=="q" goto t
if "%a%"=="b" goto begin
set /p b=请输入性别:
if "%b%"=="q" goto ts
if "%b%"=="b" goto ts1
set /p c=请输入姓名:
if "%c%"=="q" goto ts
if "%c%"=="b" goto ts1
echo "%a%","%b%","%c%" >>excel.txt
echo %a% %b% %c% >>bak.txt
goto xh
:c
cls
set/p no1=请输入学号：
for /f "tokens=1,2,3* delims= " %%a in ('findstr "%no1%" bak.txt') do echo 你好, %%b, %%c
pause
if "%no1%"=="b" goto begin
goto c
:t
exit
:ts
echo 您所执行的操作则会造成查询及录入结果不完整。
echo 按任意键继续执行您的操作。
pause >nul
goto t
:ts1
echo 您所执行的操作则会造成查询及录入结果不完整。
echo 按任意键继续执行您的操作。
pause >nul
goto begin
|
* 为了达到最快的下载速度，推荐使用网际快车下载本站软件。
* 如果您发现该软件不能下载，请通知管理员或点击【此处报错】，谢谢！
* 未经本站明确许可，任何网站不得非法盗链及抄袭本站资源；如引用页面，请注明来自本站，谢谢您的支持！ |
|
|
| 网友评论：（评论内容只代表网友观点，与本站立场无关！） |
【发表评论】 |
|
|
