scpで対象フォルダ内の全てのファイルをアップロードするttl

scp_MultiFile_UL.ttl

; *****************************************************
; scpで転送元フォルダ内の複数ファイルをアップロードする
; ※注意点
;   事前に file_UL フォルダ内に
;   アップロード対象ファイルのみ格納しておく
; *****************************************************
souceFolder = 'C:\Users\test\Desktop\file_UL'       ; 転送元フォルダ
destFolder = '/tmp/'                                ; 転送先ディレクトリ

; マクロを実行してるフォルダから、転送元フォルダへ変更する
setdir souceFolder

extpat = '*.*'                                      ; 検索対象ファイル名
; 転送元フォルダ内のファイル名を取得
findfirst dh extpat filename

While result
	; .(ピリオド)と..フォルダを除外させる
	getfileattr filename
	If result and not $10 then
		If result and not $11 then
			; 転送元ファイルのフルパスを取得
			makepath fName_fullPath souceFolder filename
			scpsend fName_fullPath destFolder   ; scpでアップロード
			pause 1
		EndIf
	EndIf
	findnext dh filename
EndWhile
findclose dh