标题: 和任意QQ聊天,, [打印本页]

---

作者: zexuhu     时间: 2008-1-17 16:26    标题: 和任意QQ聊天,,

编了个小批处理,,可以和任意QQ聊天,,,
但有点问题,,,就FIND在查找的时候它认为1234 和12345是一个样的,,有没有解决办法?
@echo off
title 任意聊天
color 3
mode con: cols=35 lines=15
:toop
cls
echo         ^ 临 时 聊 天 ^
echo _______________________________
echo 1.同任意QQ聊天。
echo 2.清除以前的聊天记录。
echo 3.退出。
echo _______________________________
set /P a=
if %a%==1 goto 01
if %a%==2 goto 02
if %a%==3 goto 03
echo 输入错误，按任意键重新输入。
pause
goto toop
:01
d:
cd\
dir|find "聊天记录">nul&&goto kaishi
md 聊天记录
:kaishi
d:
cd\
cd 聊天记录
echo 注：同你聊天的QQ将被存储在"D:\聊天记录"目录中可以随时查找.......
echo _______________________________
:chongshu
echo 请输入你想聊的QQ号:
set /p QQ=
set /a bb=%qq%+1
if %bb%==1 (echo 您的输入有误，按任意键重新输入。) else goto chenggong
pause
goto chongshu
:chenggong
dir|find "%qq%.html">nul&&goto aa
echo ^<html^>>>d:\聊天记录\%qq%.html
echo ^<head^>>>d:\聊天记录\%qq%.html
echo ^<meta http-equiv="refresh" content="0;url=http://wpa.qq.com/msgrd?V=1&Uin=%qq%&Site=ioshenmue&Menu=yes"^>>>d:\聊天记录\%qq%.html
echo ^</head^>>>d:\聊天记录\%qq%.html
echo ^<body^>>>d:\聊天记录\%qq%.html
echo ^</body^>>>d:\聊天记录\%qq%.html
echo ^</html^>>>d:\聊天记录\%qq%.html
start d:\聊天记录\%qq%.html
goto toop
:aa
echo 你所要聊的QQ已经运行过，按任意键再次运行。
pause
start d:\聊天记录\%qq%.html
goto toop
:02
d:
rd /s /q d:\聊天记录||goto shibai
echo 清理成功
pause
goto toop
:03
exit
:shibai
echo 请重启程序再进行清除.....
pause
exit

---

作者: zexuhu     时间: 2008-1-17 16:40
高人指点一下

---

作者: zexuhu     时间: 2008-1-17 16:40
自已坐沙发了,,,

---

作者: zexuhu     时间: 2008-1-17 17:21
汗,,,是不是我写的太菜了

---

作者: HAT     时间: 2008-1-17 17:47
汗,,,是不是别人已经发过了

---

作者: zexuhu     时间: 2008-1-17 17:52
晕,有人发过吗?我自已创造的,,不过我倒不知道我不是第一个了,,,

---

作者: nanhui112     时间: 2008-1-17 20:30    标题: 我给你顶一个

dir|find "%qq%.html">nul&&goto aa
---------------------------------------------------
dir|findstr /c:"%qq%.html">nul&&goto aa 这样行不  我也是超级菜鸟
不知道得不 ^_^

---

作者: zexuhu     时间: 2008-1-17 21:17
呵呵，，可以了，，学习，，，，，

---

作者: JIANHUILAI     时间: 2008-1-27 11:10
VERY GOOD