返回列表 发帖
yu2n

Rank: 5Rank: 5

帖子
715 
积分
1298 
技术
151  
捐助
0  
注册时间
2012-11-1 
1楼 跳转到 »
发表于 2014-10-16 11:23 | 显示全部帖子
本帖最后由 yu2n 于 2014-10-16 11:24 编辑
标题: VBS访问剪贴板的几种方法
作者: Demon
链接: http://demon.tw/programming/vbs-clipboard.html
用Word.Application也可以设置和获取剪贴板内容
'设置剪切板的内容
Dim Word
Set Word = CreateObject("Word.Application")
Word.Documents.Add
Word.Selection.Text = "忘记了，喜欢一个人的感觉"
Word.Selection.Copy
Word.Quit False
'获取剪切板的内容
Dim Word
Set Word = CreateObject("Word.Application")
Word.Documents.Add
Word.Selection.PasteAndFormat(wdFormatPlainText)
Word.Selection.WholeStory
str = Word.Selection.Text
Word.Quit False
WScript.Echo strCOPY


VBS访问剪贴板的几种方法
http://demon.tw/programming/vbs-clipboard.html
『千江有水千江月』千江有水，月映千江；万里无云，万里青天。    http://yu2n.qiniudn.com/

TOP

返回列表