中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-15 15:20
中国DOS联盟论坛 » DOS疑难解答 & 问题讨论 (解答室) » 制作同学录 查看 858 回复 1
楼 主 制作同学录 发表于 2009-05-23 11:58 ·  中国 山东 济南 联通
新手上路
积分 8
发帖 3
注册 2009-03-14 08:51
17年会员
UID 141294
性别 男
状态 离线
@Echo Off
setlocal enabledelayedexpansion
title QQ临时对话!
:start
cls
set numb=
set numa=
echo.
ECHO ╭──§──────────§──╮
ECHO │ § QQ临时对话 § │
ECHO │ §──────────§ │
ECHO │ A. 输入姓名或学号 │
ECHO │ B. 直接输入QQ号 │
ECHO │ C. 退出 │
ECHO │ │
ECHO ╰────────────────╯
echo.
SET Choice=
SET /P Choice=操作(A/B/C):
ECHO.

IF NOT '%Choice%'=='' SET Choice=%Choice:~0,1%
IF /I '%Choice%'=='A' GOTO A
IF /I '%Choice%'=='B' GOTO B
IF /I '%Choice%'=='C' GOTO C
GOTO Start
:B
Set /p numb=对方QQ号码:
IF /I '%numb%'=='' GOTO start
start tencent://Message/?Uin=%numb%
cls
GOTO Start
:a
Set /p numa=输入姓名或学号:
IF /I '%numa%'=='' GOTO start

start tencent://Message/?Uin=%numa%

cls
GOTO Start
:C
cls
EXIT

制作同学录时遇到了问题:
输入姓名或学号还没制作
1想输入后,从一个文本里查找qq号并start tencent://Message/?Uin=QQ号
2那一个txt 添加起来要方便(别太乱)
3txt内容 一是学号 二是姓名 三是QQ号
4顺序乱不要紧 中间有命令也不要紧 但有规律最重要
5最好不要生成临时文件
如果用vb 太大 关键是一个dll
汇编不会 c不会
其他软件忒大了
这就想到了dos
帮帮我
xiexie
2 发表于 2009-05-25 01:02 ·  中国 四川 南充 电信
超级版主
★★★★
我爱DOS
积分 5,310
发帖 2,044
注册 2005-09-26 12:00
20年会员
UID 42843
性别 男
来自 四川南充
状态 离线
论坛跳转: