Dim clipboard Set clipboard = CreateObject("htmlfile") clipboard.ParentWindow.ClipboardData.GetData "text"
5.在Blueprism自己的VB脚本中使用以下代码将文本从剪贴板复制到字符串变量中:
Dim objIE : Set objIE = CreateObject("InternetExplorer.Application") objIE.Navigate "about:blank" Do While objIE.ReadyState <> 4: Loop Dim objDoc : Set objDoc = objIE.Document Dim objData : objData = objDoc.ParentWindow.ClipboardData.GetData("text") objIE.Quit Set objIE = Nothing 返回字符串变量objData即可。