Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/asp.net/34.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/17.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Asp.net VB.NET从路径获取目录和子目录_Asp.net_Vb.net - Fatal编程技术网

Asp.net VB.NET从路径获取目录和子目录

Asp.net VB.NET从路径获取目录和子目录,asp.net,vb.net,Asp.net,Vb.net,我正在尝试从vb.net中的路径中获取完整路径减去文件名。我使用一个文本框和一个浏览按钮来获取完整路径,但我只想保存目录 如何只获取目录和子目录 示例文件名: c:\Users\jsmith\Desktop\file.aspx 所需结果: c:\Users\jsmith\Desktop\ Protected Sub btnBackupFolderName_Click(sender As Object, e As EventArgs) Handles btnBackupFolderName.

我正在尝试从vb.net中的路径中获取完整路径减去文件名。我使用一个文本框和一个浏览按钮来获取完整路径,但我只想保存目录

如何只获取目录和子目录

示例文件名:

  • c:\Users\jsmith\Desktop\file.aspx
所需结果:

  • c:\Users\jsmith\Desktop\

    Protected Sub btnBackupFolderName_Click(sender As Object, e As EventArgs) Handles btnBackupFolderName.Click
    
    ' Call ShowDialog.
    Dim result As DialogResult = openFD.ShowDialog()
    
    ' Test result.
    If result = Windows.Forms.DialogResult.OK Then
        Dim FileNameText As String = openFD.FileName.ToString()          
    
        Dim backupFolderName = Path.GetFileName(Path.GetDirectoryName(FileNameText))  'this just gives me 'Desktop'
        txtBackupFolder.Text = di.ToString 'backupFolderName          
    End If
    
    End Sub
    

谢谢你的帮助

获取文件的完整路径,然后使用GetDirectoryName()检索文件夹路径,如下所示:

Dim openFD As OpenFileDialog = New OpenFileDialog()

Dim result As DialogResult = openFD.ShowDialog()
If result = DialogResult.OK Then
    Dim FileNameText As String = openFD.FileName.ToString()
    ' This gets the folder-path, sans filename.
    txtBackupFolder.Text = Path.GetDirectoryName(openFD.FileName)
End If

获取文件的完整路径,然后使用GetDirectoryName()检索文件夹路径。@R.J.Dunnill,成功了,如果您想回答的话?谢谢你的帮助!不客气。我会回答的。