请懂VBS的大师帮忙转个代码

紫色风林

坛里 有懂VBS的吗？
  这里有个VBS的脚本，我想看看它是如何取得股票代码的，请大师帮我转成AU3的

Sub fzdm()     
   Application.ActivateFrame("Technic")
    '与该窗格关联的证券代码 
   Set Grid = Technic.GetGridByName("Main") 
   Label = Grid.StockLabel        
   Set objIE = CreateObject("InternetExplorer.Application")    '复制股票代码到剪贴板 
   objIE.Navigate("about:blank") 
   objIE.document.parentwindow.clipboardData.SetData "text", Label 
   objIE.Quit 
   MsgBox "复制成功" 
End Sub 

紫色风林

先下了，不等了，有路过的大师帮忙看看啊

紫色风林

还没人来啊。。。。。

紫色风林

看来贴子又得沉了

星雨朝霞

搜索了一下,得知你用的是"金字塔决策交易系统"
这是此VBA的帮助http://www.weistock.com/WeisoftH ... sic_application.htm

Application.ActivateFrame("Technic") '开打名为"Technic"的框架
Set Grid = Technic.GetGridByName("Main") '' 得到框架名称为"Technic"，窗格名称为"Main"的窗格对象
Label = Grid.StockLabel ;取得与该窗格关联的证券代码  
这些你可以查看帮助里的[obj/COM 管理]分类里的函数来实现
其它那几句只是设置剪辑板内容而以.可以用ClipPut 代替

link369

不懂。学习学习。。。。