@echo off
set b=%data:~0,4%%data:~5,2%%data:~8,2%

setlocal enabledelayedexpansion
for /d %%i in (源路径) do (
set n=%%i
set name=%%~ni
set a!=name!
set d=%%~fi
set c=!a:~0,8!


 if "!c!"=="%b%" (
set DataPath=!n!\
set DestPath=D:\TEST\
set DataExt=*.文件格式
set w=\文件格式\
set rar=rar.exe
set rarname=!a!.rar

 
set ftpserver=地址
set user=用户名
set pass=密码
set ftppath=目的路径
set Ftp=目的路径/!a!

@echo open !ftpserver!>ftpcmd3
@echo !user!>>ftpcmd3
@echo !pass!>>ftpcmd3
@echo prompt>>ftpcmd3
@echo cd !ftppath!>>ftpcmd3
@echo mkdir !a! >>ftpcmd3

@echo bye>>ftpcmd3
ftp -s:ftpcmd3>nul
del /f ftpcmd3
echo !d!!w!!DataExt!
for /f %%i in ('dir /b /A-D /s !d!!w!!DataExt!') do (
set src=%%i
set dest=%%~ni
set e=!src!

echo !Ftp!
echo uploading !dest! to !ftpserver!......
::下面这是数字1，不是字母l
@echo open !ftpserver!>ftpcmd13
@echo !user!>>ftpcmd13
@echo !pass!>>ftpcmd13
@echo prompt>>ftpcmd13
@echo cd !Ftp!>>ftpcmd13
@echo bin>>ftpcmd13
@echo bin !e!>>ftpcmd13
@echo bye>>ftpcmd13
ftp -s:ftpcmd13 >nul
del /f ftpcmd13

echo uploading !rarname! to !ftpserver! OK.
)
)
)

CMD 脚本，也只看得一个大概。
set b=%data:~0,4%%data:~5,2%%data:~8,2%
取日期中的数字拼起来

setlocal enabledelayedexpansion
for /d %%i in (源路径) do (
set n=%%i
set name=%%~ni
set a!=name!
set d=%%~fi
set c=!a:~0,8!
这一段，第一句不知道，你要查一下，第二句，不记得参数类型了。

if "!c!"=="%b%" (
set DataPath=!n!\
set DestPath=D:\TEST\
set DataExt=*.文件格式
set w=\文件格式\
set rar=rar.exe
set rarname=!a!.rar
这一段，与前面差不多，都是组合设置一些环境参数，

set ftpserver=地址
set user=用户名
set pass=密码
set ftppath=目的路径
set Ftp=目的路径/!a!
这一段，不解释

@echo open !ftpserver!>ftpcmd3
@echo !user!>>ftpcmd3
@echo !pass!>>ftpcmd3
@echo prompt>>ftpcmd3
@echo cd !ftppath!>>ftpcmd3
@echo mkdir !a! >>ftpcmd3
@echo bye>>ftpcmd3
生成 FTP 用的命令列表，写入 ftpcmd3 这个文件
> 转向输出，  >> 转向追加输出

ftp -s:ftpcmd3>nul           调用FTP这个外部命令，并且从 ftpcmd3 这个文件读命令，返回结果写到空
del /f ftpcmd3       删刚生成的命令行

再下面的与这个类似。

设置环境参数完全看不懂...

看不懂，你分段调试一下。

第一段：
@echo off
set b=%data:~0,4%%data:~5,2%%data:~8,2%

setlocal enabledelayedexpansion
for /d %%i in (源路径) do (
set n=%%i
set name=%%~ni
set a!=name!
set d=%%~fi
set c=!a:~0,8!

if "!c!"=="%b%" (
set DataPath=!n!\
set DestPath=D:\TEST\
set DataExt=*.文件格式
set w=\文件格式\
set rar=rar.exe
set rarname=!a!.rar

set ftpserver=地址
set user=用户名
set pass=密码
set ftppath=目的路径
set Ftp=目的路径/!a!

@echo open !ftpserver!>ftpcmd3
@echo !user!>>ftpcmd3
@echo !pass!>>ftpcmd3
@echo prompt>>ftpcmd3
@echo cd !ftppath!>>ftpcmd3
@echo mkdir !a! >>ftpcmd3

@echo bye>>ftpcmd3

然后查看 ftpcmd3 是内容，这里面的内容，对照 FTP 命令表去看。
环境变量，做 SET 命令查看整个列表，太多的话，
查看单个的命令是 ： echo %变量名%

最后一段

echo !Ftp!
echo uploading !dest! to !ftpserver!......
::下面这是数字1，不是字母l
@echo open !ftpserver!>ftpcmd13
@echo !user!>>ftpcmd13
@echo !pass!>>ftpcmd13
@echo prompt>>ftpcmd13
@echo cd !Ftp!>>ftpcmd13
@echo bin>>ftpcmd13
@echo bin !e!>>ftpcmd13
@echo bye>>ftpcmd13
ftp -s:ftpcmd13 >nul
del /f ftpcmd13
：：如果我要删除已经上传的源文件，是不是在这里用“rm -rf +文件路径+文件名”就可以了
echo uploading !rarname! to !ftpserver! OK.
)
)
)

还有就是我怕万一文件没成功传上去，就把源文件给删了，能不能加个判断，成功上传了再删

不太懂 FTP 的命令，
感觉没办法判断这个。
DOS下面，如果是 内部命令退出，有些命令是可以设置返回值的，
但FTP这个程序，读到服务器文件列表，怎么比较文件是否上传完毕，然后怎么返回比较结果，我想不出来。

我能想到的就是你还是用 VB6 自己写一个 相应的客户端吧，因为所有的协议都自己控制，业务逻辑也是自己控制，所以这些都不是问题。
主要就是工程稍微偏大。

这是我接触脚本第二天。。。没有那么多时间来写了，就只能改以前师兄写的代码，这样会快一些。。。
而且，根本没有头绪。。

基本上大家对脚本都是一知半解，必竟 DOS 时代太遥远了。

版主的意思是不是，脚本已经没落了？