VBScript

OWSPostDataオブジェクトを使って文字列をエンコードするVBS

OWSPostDataオブジェクトのURLEncodeメソッドで文字列をエンコードするスクリプトです。

※ Microsoft Office Web Discussions Client Type Library(owsclt.dll)が必要となります。

MsgBox CreateObject("OWS.PostData").URLEncode("こんにちは")

上記コードを実行するとescape関数と同様の結果が返ってきますので、下記のようにunescape関数で元の文字列にデコードすることもできます。

Option Explicit

Const s = "こんにちは"

MsgBox CreateObject("OWS.PostData").URLEncode(s) & vbCrLf & escape(s)
MsgBox unescape(CreateObject("OWS.PostData").URLEncode(s)) 'デコード

わざわざ上記のような処理を使う場面は中々無いだろうと思いますが、頭の片隅にでも入れておけばどこかで役に立つかもしれないですね。

Google TTSで文字列を読み上げるExcelアドイン前のページ

Google翻訳で文字列を翻訳するマクロ次のページ

関連記事

  1. VBScript

    Office付属のVBEでVBScriptコードを書くのを助けるVBScript

    VBScriptのコードを書くとき、メモ帳等のテキストエディタではイン…

  2. VBScript

    GUIDを作成するVBScript

    Office アドインを作成するのに必要(マニフェストのId要素)なG…

  3. VBScript

    ドラッグ&ドロップされたファイルの内容をクリップボードにコピーするVBScript

    「clipコマンドを利用してクリップボードに文字列をコピーするVBSc…

  4. Windows関連

    右クリックメニューからフォルダを管理者権限で開く(コマンド プロンプト)

    フォルダをShiftキーを押しながら右クリックすると、「コマンド ウィ…

コメント

  1. この記事へのコメントはありません。

  1. この記事へのトラックバックはありません。

Time limit is exhausted. Please reload CAPTCHA.

Translate

最近の記事

アーカイブ

PAGE TOP