搜索字符串 - 路徑中的非法字符

Question

我有這個搜索字符串。

Dim files As String() = IO.Directory.GetFiles("\\192.168.0.2\shares\be\" & functiicomune.numeclient & "\" & r & " " & codnumeric & "*" & "\" & "PROD\", "*" & codnumeric & "*" & "DECOMPOSITION" & "*" & ".pdf") 

我得到非法字符的路徑，我不知道爲什麼。有人可以提供一個提示嗎？

在網絡上的路徑爲：

\\192.168.0.2\shares\be\BERTHOUD\BA 390683 L\PROD\BA390683 L - PP. DECOMPOSITION 160630.pdf 

的numeclient功能碼是：

Public Shared Function numeclient() 
    Dim codclient As String = Form1.TextBox4.Text.Substring(0, 2) 
    Dim r As String 
    Select Case codclient 
     Case "BA" 
      r = "BERTHOUD" 
     Case "CN" 
      r = "CARUELLE" 
     Case "TT" 
      r = "TECNOMA" 
     Case "PR" 
      r = "PRECICULTURE" 
     Case "KR" 
      r = "KREMLIN" 
    End Select 
    Return r 
End Function 

R和codnumeric代碼是：

Dim rgx As New Regex("[^0-9]") 
    Dim codnumeric As String = rgx.Replace(TextBox4.Text, "") 
    Dim r As String = TextBox4.Text.Substring(0, 2) 

的textbox4包含字符串這個形式：BA390683 L

Answer 1

你可以先簡化代碼，並調用函數時加括號：

Dim files As String() = IO.Directory.GetFiles("\\192.168.0.2\shares\be\" & functiicomune.numeclient() & "\" & r & " " & codnumeric & "*PROD\","*" & codnumeric & "*DECOMPOSITION*.pdf" 

和第二，檢查它通過你的調試器組成路徑或擴展的值： functiicomune.numeclient r codnumeric