中国DOS联盟

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

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

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 结合ftp使用的一个自动上传照片的批处理

rs369007
初级用户

积分 147
发帖 131
注册 2008-9-22
状态离线

『楼主』: 结合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

此帖被 +4 点积分

点击查看详情

2008-12-4 23:15

HAT
版主

积分 9023
发帖 5017
注册 2007-5-31
状态离线

『第 2 楼』:

感谢分享。

若干不成熟的建议：
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

2008-12-5 10:04

rs369007
初级用户

积分 147
发帖 131
注册 2008-9-22
状态离线

『第 3 楼』:

谢谢二楼的宝贵建议！

2008-12-5 12:39

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: