Board logo

标题: 结合ftp使用的一个自动上传照片的批处理 [打印本页]

作者: rs369007     时间: 2008-12-4 23:15    标题: 结合ftp使用的一个自动上传照片的批处理

@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
作者: HAT     时间: 2008-12-5 10:04
感谢分享。

若干不成熟的建议:
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
作者: rs369007     时间: 2008-12-5 12:39
谢谢 二楼的宝贵建议!