想在wincc上做按钮 左键时，将新生成的objExcelApp.excel文件 复制到E：\111中去并取名为:日期+时间.xls 但是出现问题是:
dim pathstr1, pathstr2, pathstr3, pathstr,a,b
pathstr1 = HMIRuntime.Tags("day").read
Set a = HMIRuntime.Tags("time").read
Set b = CSng(a)
Set pathstr3 = CStr(b)
pathstr2 = "E:\111\"
pathstr = pathstr2 + pathstr1 +"_"+pathstr3+ ".xls"
objExcelApp.Sheets(1).SaveAs pathstr
因为日期 能写进去 11.05.2010 但是因为时间是11:32:20 文件名不允许 存在":" 所以 想处理一下 将其变成 单精度 再变成 字符串 再输进去 自己写的VB脚本 运行不起来,问题出在pathstr3上
请高手指点 一下 错误之处 及修改方法!
最佳答案
pathstr3 = hour(a.value) & "-" & Minute(a.value) & "-" & Second(a.value)
把时间格式改成10-05-09的格式,或者是别的格式.
提问者对于答案的评价：
谢谢
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc269319.html
微信扫一扫 
支付宝扫一扫 