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

    Expression WebでVBScriptのコードを書いてみる。

    今日たまたま下記の記事を見つけました。10年近く前の古い記事です。…

  2. Office関連

    Officeファイルから作成者などのプロパティを取得するVBScript

    下記記事でも書いていますが、xlsxやdocxといった、OOXML形式…

  3. Windows 10

    Microsoft Edgeを起動するVBScript

    前回の記事の関連ですが、下記コードのようにShellExecuteメソ…

  4. Windows関連

    特殊フォルダーのパスを取得するVBScript

    ファイルのコピーや移動を行う場合に特殊フォルダーのパスが必要になること…

  5. Office関連

    ヘッドレス ChromeとSeleniumBasicでWebページ全体のスクリーンショットを撮る方法…

    先日、ヘッドレス ChromeでWebページ全体のスクリーンショットを…

  6. VBScript

    Adobe Illustratorを操作するVBScript

    Acrobatと同様にタイプライブラリが用意されているため、VBAやV…

コメント

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

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

Time limit is exhausted. Please reload CAPTCHA.

※本ページはプロモーションが含まれています。

Translate

最近の記事

アーカイブ

PAGE TOP