忍者ブログ

別館 まじサビ

[PR]

×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。

HOME   |  もうやめて！国民のライフはゼロよ。 ≫

ZIPファイル構造 - 番外編2

番外編の前にやること(以下略)、今度はウィンドウズ的なものに丸投げしてZIPファイルを展開できるかやってみました(笑)

こんな感じ。ソースはHSP製です。


    newcom ShellApp, "Shell.Application"
    comres targetfolder  : ShellApp->"NameSpace" "ここに解凍先フォルダパスを入れる"
    comres zipFile       : ShellApp->"NameSpace" "ここに解凍元のZIPファイル名を入れる"
    comres zipItems      : zipFile->"Items"

    targetfolder->"CopyHere" zipItems

    delcom zipItems
    delcom zipFile
    delcom targetfolder
    delcom ShellApp

    mes "end"
    stop

何やってんのかっていえばCOM呼んでファイルコピーしろって言っただけ…。
ついでに言えば(とても大事な事です！)ボクってばCOM呼び初心者ですよ。安全性の検証もろくに出来ていないという意味ではとてもとっても危険なコードです。やってみたらできちゃった系の怪しいコードなので実行の際はマジで自己責任でお願いします。
PR

HOME   |  もうやめて！国民のライフはゼロよ。 ≫

comment

お名前
タイトル
E-MAIL
URL
コメント
パスワード

TemplateDesign by KARMA7

このブログはステキなTemplateを少し改造して利用しています。

忍者ブログ [PR]