自動在windows執行 每天刪除n天前的檔案

'自動化檔案維護管理程式
'天數
daysAgo = 7

'路徑
dirPath = "C:\\Temp2"

'副檔名
extName = ".txt"

';;;;;程式開始;;;;;
Set fs = CreateObject("Scripting.FileSystemObject")
Set w = WScript.CreateObject("WScript.Shell")

Set f = fs.GetFolder(dirPath)
Set fc = f.Files

dateBefore = Now() - daysAgo

For Each ff in fc
fileName = ff.Name
fileDate = ff.DateLastModified

If Right(fileName, Len(extName)) = extName And fileDate < dateBefore Then
fs.DeleteFile(dirPath & "\\" & fileName)
End If
Next

----------------------分格線-----------------------------------------
用途：自動在windows執行 每天刪除n天前的檔案
Step1：複製分格線以上ㄉ文字 貼在txt檔然後副檔名改成vbs
Step2：在windows的工作排程上使用該檔

後記：
上面是網路上找到ㄉ
試用後真ㄉ可以ㄝ!!
神奇ㄉVBS!!
有需要ㄉ可以參考看看!!
如果有直接使用command mode就可以完成ㄉ指令
也可以回覆我~~
3Q

windows下自動上傳檔案到FTP

傳輸單個檔案

一、先用記事本編輯一個檔案(ftp.txt)
open ip_address(hostname) /*要連接的ftp*/
userid /*登入id*/
password /*登入pw*/
binary /*以二進制傳送文件，可選項*/
cd remote_directory_path /*ftp上的資料夾路徑*/
put local_filename remote_filename /*將local端的檔案上傳到ftp*/(單一檔案)
get remote_filename local_filename /*將ftp上的檔案下載到local端*/(單一檔案)

bye /*離開ftp*/

二、執行
<Ⅰ>直接在command mode下輸入ftp -s:ftp.txt
<Ⅱ>製成一個批次檔(bat)，內容為 ftp -s:ftp.txt，然後排入工作排程!!即可自動執行
ps：批次檔跟txt檔需在同一個資料夾，批次檔命名可以特別些，勿與系統批次檔同名

傳輸多個檔案

一、先用記事本編輯一個檔案(ftp.txt)
open ip_address(hostname) /*要連接的ftp*/
userid /*登入id*/
password /*登入pw*/
prompt /*忽略對話窗，預設回答on*/
cd remote_directory_path /*ftp上的資料夾路徑*/

mput local_directory_pathfile_name /*將local端路徑資料夾的檔案上傳到ftp*/(多個檔案)

mget *.* /*將ftp資料夾路徑的檔案下載到ftp.txt放置的資料夾*/

bye /*離開ftp*/

二、執行
<Ⅰ>直接在command mode下輸入ftp -s:ftp.txt
<Ⅱ>製成一個批次檔(bat)，內容為 ftp -s:ftp.txt，然後排入工作排程!!即可自動執行
ps：批次檔跟txt檔需在同一個資料夾，批次檔命名可以特別些，勿與系統批次檔同名