OpenFileDialog设置完整路径

时间:2015-10-10 10:17:49

标签: vb.net

        Dim streamf As System.IO.Stream
        Dim stringf As String
        stringf = OpenFileDialog1.FileName.ToString()
        streamf = OpenFileDialog1.OpenFile()

我在应用程序安装路径上附加了一个文件ScreenShot.png,这意味着如果用户从Desktop运行.exe文件,它会将ScreenShot.png存储在他的桌面上,依此类推。

现在我需要获得要在传真中发送的ScreenShot.png文件的完整路径

    Dim srcBt As Byte()
    Dim encodedBase64 As String
    Dim filereader As New IO.FileStream(stringf, IO.FileMode.Open)

    ReDim srcBt(filereader.Length)
    filereader.Read(srcBt, 0, filereader.Length)
    filereader.Close()

    encodedBase64 = System.Convert.ToBase64String(srcBt)

所以问题部分是如何将文件的位置放到Stringf?因为示例我有强制用户使用OpenFileDialog定位文件,我有预定义的文件

1 个答案:

答案 0 :(得分:0)

这应该将任何(相对)路径转换为绝对路径:

Dim stringf_info As New System.IO.FileInfo(stringf)
stringf = stringf_info.FullName