a**s
发帖数: 9606 | 1 def ReadVDScript(strJsFile):
lstSubs=[]
lstVideoFile=[]
strOutFile = ""
fpJs=open(strJsFile, 'r')
strScript=fpJs.read()
fpJs.close()
# Get videos source(s)
# VirtualDub.Open("2012.12.08.vs.Tim.avi","",0);
# VirtualDub.append("2.MOV")
n1 = strScript.find('.Open') + 5
if n1>4:
n1 = strScript.find('"', n1) + 1
lstVideoFile.append(strScript[n1:strScript.find('"', n1)])
... 阅读全帖 |
|
a**s
发帖数: 9606 | 2 def ReadVDScript(strJsFile):
lstSubs=[]
lstVideoFile=[]
strOutFile = ""
fpJs=open(strJsFile, 'r')
strScript=fpJs.read()
fpJs.close()
# Get videos source(s)
# VirtualDub.Open("2012.12.08.vs.Tim.avi","",0);
# VirtualDub.append("2.MOV")
n1 = strScript.find('.Open') + 5
if n1>4:
n1 = strScript.find('"', n1) + 1
lstVideoFile.append(strScript[n1:strScript.find('"', n1)])
... 阅读全帖 |
|
x***y
发帖数: 72 | 3 code 见下。excel file 值是 235693.328673913， 用了format,显示为235,693
。转成csv后为"235,693"，请问，如何在csv中存为没有格式的数字？
--------------------------------------------
Dim strExcelFileName
Dim strCSVFileName
Rem strExcelFileName = WScript.Arguments.Item(0) 'file name to parses
strExcelFileName = "test.xlsx"
Rem get path where script is running
Set fso = CreateObject ("Scripting.FileSystemObject") 'use this to find
current path
strScript = Wscript.ScriptFullName
strScriptPath = fso.GetAbsolutePathName(strScript & ".."... 阅读全帖 |
|
