VBScript

クリップボードに文字列をコピーする

2012/4/3 追記:関連記事として「clipコマンドを利用してクリップボードに文字列をコピーするVBScript」を追加しました。

Internet Explorerを使って文字列をクリップボードにコピーするVBScriptです。

Option Explicit

Dim s

s = "a" & vbTab & "b" & vbTab & "c"
PutInClipboardText s
MsgBox "文字列をクリップボードにコピーしました。" & vbCrLf & "文字列:" & s

Public Sub PutInClipboardText(ByVal str)
  Dim txt
  
  With CreateObject("InternetExplorer.Application")
    .Visible = False
    .Navigate "about:blank"
    
    While .Busy Or .ReadyState <> 4
      WScript.Sleep 10
    Wend
    
    Set txt = .document.createElement("textarea")
    txt.Value = str
    .document.body.appendChild txt
    txt.Focus
    Set txt = Nothing
    
    .ExecWB 17, 0
    .ExecWB 12, 0
    .Quit
  End With
End Sub

スクリプトでクリップボードにテキストを設定する。」参照

Windowsのバージョン情報を取得する前のページ

ファイル選択ダイアログ次のページ

関連記事

  1. VBScript

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

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

  2. Windows 10

    Microsoft Edgeを起動するVBScript

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

  3. Windows関連

    ダウンロードフォルダーのパスを取得するVBScript

    ダウンロードフォルダーのパスを取得する必要があったので、過去に書いた記…

  4. VBScript

    指定したフォルダ内のemlファイルの情報をリスト化するVBScript

    emlファイルから件名や本文、宛先や送信日時といった各種情報を取得して…

  5. VBScript

    Internet Explorerのお気に入りを列挙するVBScript

    Internet Explorerのお気に入りにどの位のインターネット…

  6. VBScript

    文字コードを指定してURLエンコードを行う

    本題に入る前にまずは下記エントリーをご覧ください。・64ビット…

コメント

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

Time limit is exhausted. Please reload CAPTCHA.

最近の記事

アーカイブ

PAGE TOP