欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → vbs脚本运行时报错

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有4172人关注过本帖平板打印复制链接

主题:vbs脚本运行时报错

帅哥哟,离线,有人找我吗?
wangwatercup
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:103 积分:532 威望:0 精华:0 注册:2010/11/8 18:27:01
  发帖心情 Post By:2015/4/3 16:22:57 [只看该作者]

补充一下:
问题出在倒数第5行:
上下文如下:

  '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''         
            NameFolder= year(date)*10000+month(date)*100+day(date)
  ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
            outputf = "e:\dataTickCmmdt\"&NameFolder&"\"&marketName(j)& "\"&prefixStockNameCur&"\"
            Set fso = CreateObject("scripting.filesystemobject")
               create fso, outputf
            set fso = Nothing
            If suffixStockNameCur>="00" And suffixStockNameCur<="99" And reportData.Volume>0 Then     '最好在收盘之后运行,否则成交量未必有           
                myTickCmmdt reportData.label,marketName(j),outputf
            End If
        Next    
    Next

 回到顶部