趣味のためのMacに関するサイト > AppleScript > ソースコード > 【FTP】楽してFTPサーバにアップロードするAppleScript
ソースコード

【FTP】楽してFTPサーバにアップロードするAppleScript

簡単にFTPでファイルをアップロードできるしくみはないものかと考えていました。

ブログのサイトにデータをアップロードして、それを訪問者にダウンロードしてもらう。

というしくみを考えていたのですが、

特定のサイトに上げるようになりますと、そのサイトがデータが多くなって重くなります。

重くなる → 動きが悪くなる。ということになりますから、

ダウンロード専用のサイトが必要になる訳です。

そうすると次の選択は、データ専用サイトに

  1. WordPressをインストールし、テーブル形式にしてMarsEditを使ってアップロード
  2. FTPソフトを使ってへアップロード。

ということになります 。

データのアップロードのために、Wordpressをインストールするのも手間がかかり、

また、FTPでアップロードするのも、ドラッグ&ドロップで可能なのですが、

いちいちFileZillaを立ち上げて操作するのも、階層が深いと面倒だなと思います。

定型操作なら、AppleScriptで出来ないだろうかと考えました。

「AppleScript ftp アップロード」で検索したところ、下記のコードを見つけました。

これだと簡単にアップロードできますので試してみたいと思います。 

  1. property user : <ユーザ名>
  2. property passwd : <パスワード>
  3. property serverRoot : ftp://<サーバ名もしくはIPアドレス>
  4. on open drop
  5.     tell application Finder
  6.         activate
  7.                 
  8.         set dirList to {/, /html, /img} –アップロード先のディレクトリを3つ設定 
  9.                 
  10.         set str to 1.  & 1st item of dirList & return & 2.  & 2nd item of dirList & return & 3.  & 3rd item of dirList
  11.         display dialog serverRoot & return & return & ディレクトリを選択 & return & str buttons {1, 2, 3} default button 2
  12.         set num to button returned of result
  13.         set destDir to serverRoot & item num of dirList
  14.                 
  15.         if last character of destDir is not / then
  16.             set destDir to destDir & /
  17.         end if
  18.         display dialog destDir & return & にアップロードします
  19.         repeat with theFile in drop
  20.             set fPath to quoted form of (POSIX path of theFile as Unicode text)
  21.             set myScript to curl T  & fPath &  u  & user & : & passwd &   & destDir
  22.             –display dialog myScript
  23.             try
  24.                 set myResult to (do shell script myScript)
  25.             on error
  26.                 display dialog シェルスクリプトのエラーです buttons {終了}
  27.                 error number 128
  28.             end try
  29.         end repeat
  30.         set myResult to do shell script curl u  & user & : & passwd &   & destDir
  31.         beep
  32.         display dialog myResult
  33.     end tell
  34. end open

楽してFTPサーバにアップロードするAppleScript: “”

(Via.)

ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー

ページトップに戻る↑                           ページ一番下へ↓

Mac

About 1q3

ツールとしてのMacについてのメリットデメリットなどの事について書いています。

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

*

Optionally add an image (JPEG only)

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください