Thread Rating:
  • 297 Vote(s) - 2.73 Average
  • 1
  • 2
  • 3
  • 4
  • 5
独自アプレットでのファイルダウンロードダイアログについて
05-07-2012, 06:25 PM,
#1
独自アプレットでのファイルダウンロードダイアログについて
サーバのファイルをダウンロードする際、保存先ダイアログを表示する方法については、
http://developers.curlap.com/faq/48-faq-...ialog.html
に方法が載っていますが、これはcurlアプレット(start.curl)での動作かと思われます。
ブラウザを介さない独自アプレット(start.dcurl)から同様に保存先ダイアログを表示させるためにはどのような方法を行えばよいでしょうか?
Reply
05-07-2012, 07:17 PM,
#2
RE: 独自アプレットでのファイルダウンロードダイアログについて
choose-file を style="save-as" で呼出す。で回答になってますでしょうか?
Reply
05-08-2012, 09:59 AM,
#3
RE: 独自アプレットでのファイルダウンロードダイアログについて
例えば、URLがhttp://curl.com/test.zip
というファイルをファイルダイアログを表示させてダウンロードしたい場合、
Code:
let ul:Url = {url "http://curl.com/test.zip"}
{{get-the-applet}.browse-url ul, target="_self"}
このように記述すると、ブラウザが立ち上がり、ブラウザの機能によって保存先を指定できるのですが、
ブラウザを起動せず、独自アプレットのみでこれをchoose-fileによって実現する方法はあるのでしょうか?



Reply
05-08-2012, 02:25 PM,
#4
RE: 独自アプレットでのファイルダウンロードダイアログについて
ありがとうございます。choose-fileを使って自己解決しました。
以下のようにするとできそうです。

Code:
{try
    def dlString:String = "http://curl.com/test.zip"
    let in-url:Url = {abs-url dlString}
    let out-file:#Url =
        {choose-file
            default-location={url {get-host-working-directory-url} & "/" & in-url.filename},
            style=FileDialogStyle.save-as,
            title="名前をつけて保存"
        }
    {if-non-null out-file then
        {copy in-url, {non-null out-file}, error-if-exists? = false, recurse? = false}
    }
catch e:Exception do
    {popup-message
        {VBox
            halign = "center",
            "ファイルのダウンロードに失敗しました。",
            e.message
        }
    }
}
Reply

Forum Jump:


Users browsing this thread:
1 Guest(s)

MyBB SQL Error

MyBB has experienced an internal SQL error and cannot continue.

SQL Error:
1017 - Can't find file: 'mybb_threadviews' (errno: 2)
Query:
INSERT INTO mybb_threadviews (tid) VALUES('489')