[网络工具] QQ小帮手批处理版

solitude

已经改成了exe文件,bat原版弄丢了

放心,绝对无毒无后门.

要p的话我尽量去找回来,不知道放哪里了


晕了,好像发错版了

我这个是自己写的,管理员帮忙移到原创区


原版已找到了
公布源码:

@echo off
color 0a
:start
echo                     ┌────────────┐
echo                     │QQ小帮手 by Jun.Solitude│  现在时间: %time%
echo                     └────────────┘
echo.
echo.
echo               ┌──────────────────┐
echo               │                                    │
echo               │          １.强行与某人聊天         │
echo               │                                    │
echo               │          ２.查看某人的QQ秀         │
echo               │                                    │
echo               │          ３.进入某人QQ空间         │
echo               │                                    │
echo               │          ４.查看某人QQ相册         │
echo               │                                    │
echo               │          ５.查看当日QQ新闻         │
echo               │                                    │
echo               └──────────────────┘
title QQ小帮手 by Jun.Solitude --------- http://www.thedm.cn
echo.
echo.
set /p start=
if "%start%"=="1" goto liaotian
if "%start%"=="2" goto qqxiu
if "%start%"=="3" goto qzone
if "%start%"=="4" goto qqp
if "%start%"=="5" goto qqnews
cls
goto start

:liaotian
cls
set /p num1=输入要聊天的QQ号码:
echo.
echo.
echo               ┌───────────────────┐
echo                       你要聊天的QQ号码是:%num1%   
echo               └───────────────────┘
echo.
echo.
echo                            ┌──────┐
echo                            │  １.返回   │
echo                            │  ２.继续   │
echo                            └──────┘
set /p no=
if "%no%"=="1" (cls&goto liaotian) else goto liaotian1
:liaotian1
start tencent://message/?uin=%num1%
cls
echo      ┌──────────────────────────────────┐
echo      │                                                                    │
echo      │              如没有正常运行QQ,本程序已自动运行一QQ程序!            │
echo      │                                                                    │
echo      │               如已经正常运行QQ程序,是否继续运行本工具!             │
echo      │                                                                    │
echo      │                       １.返回    ２.退出                           │
echo      │                                                                    │
echo      └──────────────────────────────────┘
set /p what=
if "%what%"=="1" cls&goto start
if "%what%"=="2" exit
cls
goto start
:qqxiu
cls
set /p num2=输入要查看的QQ秀号码:
echo.
echo.
if "%num2%"=="" (goto qqxiu) else start %systemdrive%\progra~1\intern~1\IEXPLORE.EXE "http://qqshow-user.tencent.com/%num2%/10/00/"
cls
echo                            ┌──────┐
echo                            │  １.返回   │
echo                            │  ２.退出   │
echo                            └──────┘
set /p what1=
if "%what1%"=="1" cls&goto start
if "%what1%"=="2" exit
cls
goto start

:qzone
cls
set /p num3=输入要进入的QQ空间号码:
echo.
echo.
if "%num3%"=="" (goto qzone) else start %systemdrive%\progra~1\intern~1\IEXPLORE.EXE "http://%num3%.qzone.qq.com/"
cls
echo                            ┌──────┐
echo                            │  １.返回   │
echo                            │  ２.退出   │
echo                            └──────┘
set /p what2=
if "%what2%"=="1" cls&goto start
if "%what2%"=="2" exit
cls
goto start

:qqp
cls
set /p qqp=输入要查看的QQ相册号码:
echo.
echo.
echo               ┌───────────────────┐
echo                    你要查看相册的QQ号码是:%qqp%   
echo               └───────────────────┘
echo.
echo.
echo                            ┌──────┐
echo                            │  １.返回   │
echo                            │  ２.继续   │
echo                            └──────┘
set /p no1=
if "%no1%"=="1" (cls&goto qqp) else goto qqp1
:qqp1
start %systemdrive%\progra~1\intern~1\IEXPLORE.EXE "http://photo.qq.com/portal/albumMain.shtml?%23uin=%qqp%#uin=%qqp%"
cls
echo                            ┌──────┐
echo                            │  １.返回   │
echo                            │  ２.退出   │
echo                            └──────┘
set /p what4=
if "%what4%"=="1" cls&goto start
if "%what4%"=="2" exit
cls
goto start

:qqnews
cls
echo                            ┌───────┐
echo                            │  　１.新闻 　│
echo                            │  　２.返回 　│
echo                            │  　３.退出 　│
echo                            └───────┘
set /p numnews=请选择:
if "%numnews%"=="1" start %systemdrive%\progra~1\intern~1\IEXPLORE.EXE "http://minisite.qq.com/all/allinone.shtml"
if "%numnews%"=="2" cls & goto start
if "%numnews%"=="3" exit
if "%numnews%"=="" goto qqnews
cls
echo                            ┌──────┐
echo                            │  １.返回   │
echo                            │  ２.退出   │
echo                            └──────┘
set /p what3=
if "%what3%"=="1" cls&goto start
if "%what3%"=="2" exit
cls
goto start
复制代码

狱渊

写一个13年版的呗

solitude

对的.这个工具如果现在写的话会写的更好.而且命令也会很精简.
最主要还能加入一些防止被盗用的命令,就算给出全部源码不了解的还是没有办法转载的

不过这个QQ小帮手真的是刚学批处理的时候写的,对于6楼的质疑我很郁闷!

Batcher

对于那些拿来主义者，我们只能予以深深的鄙视。

另一方面，我们也不必跟他们斤斤计较，我们应该把时间和精力多花在提高自己的水平上面。让他们跟在我们屁股后面跑吧，那些心术不正的人不会成为高手的^_^

solitude

- -!
今天百度了下QQ小帮手.发现转载的很多.
都是改了title的.

solitude

这个完全自己写,什么叫不像,像这样的批处理好像很容易
说真的没有难度!知识点很少很少

安静

很好很强大！！！

天...

有谁能告诉我为什么我总看不懂那些dir.errorlevel什么的...

学批处理到现在也只会到处收集好玩的批处理....

自己从来没写过...

最多改改别人的文字................

hongyuhulu

这个是你自己的么
不像啊

84918930

LZ很强大..顶了..

youxi01

呵呵，支持！
不过，要学习一下如何使用bat里的“函数”，这样就可以将代码大为精简！

553850000

这东西有什么用
顶

随风

给几个建议：
一、最好能有bat源码 （代码不是很长的话，尽量不要用附件）
二、最好在顶楼给出一定的说明，比如功能，使用方法，注意事项等。
三、可以移动到 原创区。