新手请教:wincc VBS 脚本(按钮触发)将一个文件夹里的EXCEL文件复制到另一个文件夹,重命名,请各位前辈指导

已锁定

goodshiyu

  • 帖子

    1
  • 精华

    0
  • 被关注

    0

论坛等级:新手

注册时间:2013-12-09

普通 普通 如何晋级?

新手请教:wincc VBS 脚本(按钮触发)将一个文件夹里的EXCEL文件复制到另一个文件夹,重命名,请各位前辈指导

1192

1

2013-12-22 11:07:07

Dim DTP_Date
Dim DTP_Date_a
Dim strDate,strDate_a
Set DTP_Date = HMIRuntime.ActiveScreen.ScreenItems("控件1")
strDate = CStr(Year(DTP_Date.Value))
strDate = strDate & "-" & Right("00" & CStr(Month(DTP_Date.Value)),2)
strDate = strDate & "-" & Right("00" & CStr(Day(DTP_Date.Value)),2)
strDate_a = CStr(strDate)
DTP_Date_a = CStr(strDate)& "备份"
HMIRuntime.Tags("test3").Write DTP_Date_a
shell "cmd.exe/c copy D:\report1\minute\"&strDate_a&".xls D:\report2\minute\"&DTP_Date_a&".xls"


使用FileCopy 需要声明什么吗?怎么做
新手请教:wincc VBS 脚本(按钮触发)将一个文件夹里的EXCEL文件复制到另一个文件夹,重命名,请各位前辈指导 已锁定
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有31150条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

top
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。