主题：复制股票代码到剪贴板的VBS代码

 非常感谢楼上各位指点！

顺便问几个剪贴板相关问题：
1. 剪贴板内容是否能同时被几个进程访问？这个问题很重要，涉及到进程间同步的问题。
2. 能否直接知道剪贴板内容是否为空？这样做的目的是省却无用的拷贝数据操作。
3. VBS怎么读剪贴板内容？

 剪贴板问题已经解决，多谢！

再问一个VBS的问题:
VB/VC都能直接使用内存映射文件，VBS有什么途径可以访问内存映射文件？是否需要写一个COM组件来间接读写内存映射文件？

 如果要频繁使用剪贴板，建议将objIE设置为全局变量，避免每次创建objIE时主程序窗口被一再激活的现象。
初始化代码放在Application_VBAStart()还是在Application_Start()请自己试验一下，我的电脑主板坏了暂时没法确认。

DIM    objIE

Sub Application_VBAStart()
    Set objIE = CreateObject("InternetExplorer.Application")
    objIE.Navigate("about:blank")
    objIE.Visible = False
    call Application.SetTimer(1,5*60*1000)
End Sub

Sub Application_Start()
End Sub

Sub Application_End()
    objIE.Quit
End Sub

Sub Application_Timer(ID)
    objIE.document.parentwindow.clipboardData.SetData "text", "Test"
End Sub