[クリップボードの内容を取得する]

クリップボードに保存されている、テキストデータを取得します。
InternetExplorer の設定によっては、確認ウィンドウが表示されます。

【ソースコード】

[tips0170.vbs]
Option Explicit
On Error Resume Next

Dim objIE           ' IE オブジェクト
Dim strCbData       ' クリップボードデータ

Set objIE = CreateObject("InternetExplorer.Application")
If Err.Number = 0 Then
    objIE.Navigate("about:blank")
    strCbData = objIE.document.parentwindow.clipboardData.GetData("text")
    WScript.Echo strCbData
    objIE.Quit
Else
    WScript.Echo "エラー：" & Err.Description
End If

Set objIE = Nothing