标题: 结合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
作者: rs369007
时间: 2008-12-5 12:39
谢谢 二楼的宝贵建议!