2 回答

TA貢獻1779條經驗 獲得超6個贊
'strDDir 要檢索的目錄,strSearchChr 要檢索的文件名
Private Function SetFileRB(ByVal strDDir As String, ByVal strSearchChr As String) As Integer
Dim dirInfo As New DirectoryInfo(strDDir)
Dim intCnt As Integer = 1
Dim intTemp As Integer = 0
If dirInfo.Exists Then
Dim files As FileInfo() = dirInfo.GetFiles(strSearchChr)
Dim i As Integer
For i = 0 To files.Length - 1
'自己的處理
Next
End If
Return intCnt
End Function

TA貢獻1794條經驗 獲得超8個贊
String[] files = Directory.GetFiles("BasePath", "*autoCAD2005\acad.exe");//*匹配路徑
然后是對BasePath的遞歸查找,如果是你全匹配的返回路徑。
- 2 回答
- 0 關注
- 552 瀏覽
添加回答
舉報