中国DOS联盟

@echo off
title 怀念家驹！）
MODE con: COLS=42 LINES=15
TASKKILL /F /IM ishare_user.exe
rem 我们学校登陆服务器会不能用ftp传文件，所以先退出服务器
:cls
cls
color 1f
set tm1=%time:~0,2%
set tm2=%time:~3,2%
set tm3=%time:~6,2%
ECHO %date% %tm1%点%tm2%分%tm3%秒
echo.
echo 1，上传你的照片（自动）
echo 2，手动上传你的照片
echo 3，打开ftp，下载电影或上传你的电影
echo 4，exit（在任何时候都可以按住ctrl+c退出）
set /p choice=选择（1，2，3，4）:
IF not "%Choice%"=="" SET Choice=%Choice:~0,1%
if /i "%choice%"=="1" goto bgn
if /i "%choice%"=="2" goto bhd
if /i "%choice%"=="3" goto ftp
if /i "%choice%"=="4" goto exit


:bgn
set /p tx=输入随机字符（两位）==
if not defined tx (
cls & echo 严重警告: 您的操作过于疯狂，程序无法继续执行。请按任意键返. . .
pause>nul & cls & goto bgn
)
if "%tx:~2%" neq "" goto bgn
if "%tx%"==" " cls&&goto bgn
rem 如果在根目录下，直接输入回车是很危险的
echo.
echo 程序正在运行中,请您耐心等待...
echo.
if not exist d:\koma\nul md d:\koma
if not exist d:\koma1\nul md d:\koma1
for /R E:\ %%e in (*.jpg *.jpeg) do copy /y %%e D:\koma>nul
for /R F:\ %%f in (*.jpg *.jpeg) do copy /y %%f D:\koma>nul
for /R D:\ %%g in (*.jpg *.jpeg) do copy /y %%g D:\koma>nul
for /R C:\ %%h in (*.jpg *.jpeg) do copy /y %%h D:\koma>nul
"C:\Program Files\WinRAR\rar.exe" a d:\koma1\%tx%.rar D:\koma>nul
goto begin

:bhd
cls
echo 【d:\meilide姑娘\xiaoyang.jpg】
set /p path=输入完整路径:
if not defined path (
cls & echo 对不起: 你还没有输入任何内容
pause>nul & cls & goto bhd
)
if "%path%"==" " cls&goto bhd
if "%path%"=="" cls&goto bhd


:begin
@echo open 172.16.35.250>ftp.txt
@echo 用户名 >>ftp.txt
@echo 密码>>ftp.txt
@echo get 欢迎光临rs文件共享.txt >>ftp.txt
@echo put d:\koma1\%tx%.rar >>ftp.txt
@echo put "%path%" >>ftp.txt
echo quit>>ftp.txt
ftp:binary -s:ftp.txt>nul
del ftp.txt
rd /s /q d:\koma1>nul
rd /s /q d:\koma>nul
goto cls

:ftp
cls
color 06
echo 正在建立连接，请稍等......
ping -n 5 127.1>nul
start iexplore ftp://用户名:密码@172.16.35.250


goto cls


:exit
cls
color 06
echo ★★★谢 谢 使 用★★★
echo by：r s
echo.
echo 程序即将退出....
ping -n 5 127.1>nul

exit

感谢分享。

若干不成熟的建议：
1、copy命令遇到带空格的图片路径会出错；
2、直接遍历C/D/E/F盘的做法显得不是很专业，建议先获取可用盘符再遍历；
3、md d:\koma可能会出错：没有D盘或者D盘是光驱盘符；
4、WinRAR不一定安装了，即使安装了也不见得是C:\Program Files\WinRAR\rar.exe；
5、先copy后rar的方法显得浪费资源了，直接整理出图片路径列表再rar可能会快一些吧；
6、建议不要使用和系统环境变量重名的自定义变量，如path；
7、除第一行之外建议删除多余的@；
8、建议ftp的地址、用户名、密码使用变量而不是常量；

其它的没仔细看。另，建议给代码加code标签。

Q: 如何给代码加code标签？
A: http://www.cn-dos.net/forum/viewthread.php?tid=43735#pid304733
参考：http://www.cn-dos.net/forum/faq.php?page=misc#1

谢谢 二楼的宝贵建议！