请教 f.open Storage_Path & \Log_data6.csv,8,3的中的8,3的含义-技术论坛-工业支持中心-西门子中国

请教 f.open Storage_Path & "\Log_data6.csv",8,3的中的8,3的含义

adeyan

帖子

700
精华

2
被关注

10

论坛等级：侠士

注册时间：2009-09-23

普通如何晋级?

请教 f.open Storage_Path & "\Log_data6.csv",8,3的中的8,3的含义

1323

9

2011-06-22 11:22:57

Dim fso1, f, Storage_Path,title_str,data_str

Storage_Path = "\Storage Card MMC\Logs" ' 定义存储路径

Set fso1 = CreateObject("FileCtl.FileSystem")
Set f = CreateObject("FileCtl.File")
If fso1.Dir(Storage_Path & "\Log_data6.csv") = "" Then
f.open Storage_Path & "\Log_data6.csv",8,3
title_str="Date_Time,variable1,variable2,variable3,variable4,variable5,variable6,variable7,variable8,variable9,variable10
f.LinePrint title_str
data_str=Now & "," & SmartTags("V.VD1290x") & "," & SmartTags("V.VD124x")& "," & SmartTags("V.VD1204x")& "," & SmartTags("V.VD1208x")& "," &SmartTags("V.VD1212x") & "," & SmartTags("V.VD1216x") & "," & SmartTags("V.VD600x")& "," & SmartTags("V.VD872x")& "," & SmartTags("V.VD1230x")& "," & SmartTags("V.VD1240x")
f.LinePrint data_str