VBScript杀死文本文件之前的程序

我做了一个VBScript打开一个Excel文档,然后运行一个Python程序,从文档表中拉出数据并将其打印到文本文件。 该脚本应该等到python程序完成创build文本文档,然后closuresexcel文档,但无论出于什么原因,我的Python程序closures之前,甚至有机会使该文本文档。

我甚至改变了python代码,只是在一个新的文本文档中打印一个简单的“Hello World”,以防从Excel中提取数据导致问题,但文本文档仍然没有创build。

这是我正在运行的脚本:

Set xl = CreateObject("Excel.application") xl.Application.Workbooks.Open "C:\Users\V\Documents\_PROGRAMS_\TEST.xlsx" xl.Application.Visible = True Dim oshell Set oshell = WScript.CreateObject("WScript.Shell") oshell.CurrentDirectory = "C:\Users\V\Documents\_PROGRAMS_\" windowStyle = 1 waitUntilFinished = True oshell.run "python table.py", windowStyle, waitUntilFinished xl.Application.Quit 

我不认为添加Python程序是重要的,因为这不是真正的问题。 虽然我会说,我试图拖延在Python程序,看看是否会改变什么(它没有)。

我虽然增加了两个额外的参数.run会让它等待,直到过程完成,但我想我一定是错过了什么?

我刚开始学习如何使用VBScript,所以任何代码的解释将被欢迎!

谢谢!

编辑:所以经过更多的testing,似乎它确实有访问Excel文档,因为只是打印“Hello World”到一个文件确实工作,并创build了文件(我错误地在错误的目录中我在找错地方)。 但是用excel文件中的数据来创build没有文件,程序就结束了

所以这里是我写的python代码:

 #!/usr/bin/python27 import pandas as pd table = pd.read_excel("TEST.xlsx") #Get excel doc file = open("text.txt", "w") #Open new file file.write(table.columns.values) #Print out column headers file.write("Hello!") file.close()