![]() |
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-08-05 04:19 |
共 48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行 |
| DOS批处理 & 脚本技术(批处理室) » dos 通讯录 |
| 可打印版本 832 / 1 |
| 第1楼 superhacker | 发表于 2007-06-21 12:43 |
| 初级用户 发帖 32 积分 66 | |
|
dos 通讯录 @echo off
title Gift_pzf-QQ:364950776 color 9f &mode con: cols=45 lines=25 echo. echo. echo (-------------------------------------------) echo 欢迎使用 dos 通讯录 echo 作者:Gift_pzf echo (-------------------------------------------) pause>nul :kaishi cls echo. echo. echo )-------------------------------------------( echo 1. 舔 加 通 讯 录 echo. echo 2. 查 看 通 讯 录 echo. echo 3. 退 出 本 程 序 echo )-------------------------------------------( set /p xuanze=请输入你的选择: if '%xuanze%'=='1' goto shuru if '%xuanze%'=='2' goto chakan if '%xuanze%'=='3' (goto tuichu) else goto tishi :chakan cls set /p aaa=请输入姓名: if '%aaa%'=='' goto 22 cls echo. echo _____________________________________________ echo 下面是你查找的号码: echo. type 通讯录.txt | find /i "%aaa%" echo. echo 按任意键返回主菜单 pause>nul goto kaishi :22 echo _____________________________________________ echo 下面是通讯录中所以的信息: echo. type 通讯录.txt echo. echo 按任意键返回主菜单 pause>nul goto kaishi :tuichu exit :tishi cls echo. echo. echo. echo --------------------------------------------- echo. echo 你的输入无效,按任意键重新输入 echo. echo --------------------------------------------- pause>nul goto kaishi :shuru cls echo. echo. echo (-------------------------------------------) echo 欢迎使用 dos 通讯录 echo 作者:Gift_pzf echo (-------------------------------------------) echo. set /p name=请输入姓名: if %name% equ kaishi goto kaishi set /p Tp=请输入联系电话: if %TP% equ kaishi goto kaishi echo %name% 的电话是:%Tp%>>通讯录.txt cls echo. echo 添加信息完毕 echo. echo. echo (-------------------------------------------) echo 欢迎使用 dos 通讯录 echo 作者:Gift_pzf echo (-------------------------------------------) set /p type=继续录入通讯录吗?(y/n) if '%type%'=='y' goto ye if '%type%'=='n' (goto n) else goto tishi :ye goto shuru :n goto kaishi :no goto shuru |
|
| 第2楼 cl02 | 发表于 2007-06-27 23:37 |
| 新手上路 发帖 5 积分 12 | |
|
支持一下~~不错呢~~~
|
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |