将文件路径通过cmd传递给python脚本

时间:2012-06-28 15:50:16

标签: python vb.net cmd argv

我正在使用vb.net和Arcobjects作为我的程序。我正在为ArcMap 10创建一个按钮,将kml转换为lyr文件。

我在将变量传递给python代码时遇到了问题。变量是文件路径,如果我用/而不是硬编码它们,它会很有效。当动态传入变量时,程序在路径名中的“/”处中断:

    Dim Filelocation As OpenFileDialog = New OpenFileDialog()

    Filelocation.Title = "Please point photo of the owner"
    Filelocation.InitialDirectory = "B:\GeoSpatialData\Projects\004402 Griffiths\File Structure\Geospatial\GPS\KML"

    If Filelocation.ShowDialog = DialogResult.OK Then
        Dim kmlFile As String
        kmlFile = Filelocation.FileName

        Dim args As String
        args = kmlFile & " " & kmlFile.Substring(0, kmlFile.LastIndexOf("\")) & " test"
        Dim args2 As String = args.Replace("\", "/")
        Dim procStartInfo As System.Diagnostics.ProcessStartInfo = New System.Diagnostics.ProcessStartInfo("C:\Python26\python", "C:\Users\KJacobsen\kml_to_shp.py " & args2)

        ' The following commands are needed to redirect the standard output.
        ' This means that it will be redirected to the Process.StandardOutput StreamReader.
        procStartInfo.RedirectStandardOutput = True
        procStartInfo.UseShellExecute = False
        ' Do not create the black window.
        procStartInfo.CreateNoWindow = False

        ' Now you create a process, assign its ProcessStartInfo, and start it.
        Dim proc As New System.Diagnostics.Process()
        proc.StartInfo = procStartInfo
        proc.Start()
        proc.WaitForExit()

        ' Get the output into a string.
        Dim result As String = proc.StandardOutput.ReadToEnd()
        ' Display the command output.
        Console.WriteLine(result)
    End If
Catch objException As Exception
    ' Log the exception and errors.
    Console.WriteLine(objException.Message)
End Try

我的python脚本如下所示:

import os
import arcpy
import sys
import glob
arcpy.KMLToLayer_conversion(sys.argv[1],sys.argv[2],sys.argv[3])
print 

2 个答案:

答案 0 :(得分:0)

"\"替换为"\\\"

有效吗?

答案 1 :(得分:0)

返回的路径是否包含空格?从您的初始目录看来似乎如此 在这种情况下,传递给脚本的命令参数可能是错误的。

尝试将所有内容用双引号括起来,避免直接操纵路径 使用 Path.GetDirectoryName()代替

Dim args As String         
args = """" + kmlFile + """ " 
args = args & """" & Path.GetDirectoryName(kmlFile) & """ test"