Question

无论如何在VB中在桌面上搜索文件（快捷方式文件）？我试过了：如果My.Computer.FileSystem.FileExists（“Desktop \ MYFILE.lnk”）不会返回任何东西

如果My.Computer.FileSystem.FileExists（“Desktop \ MYFILE.exe”）不会返回任何东西

如果My.Computer.FileSystem.FileExists（Environment.SpecialFolder.Desktop \ MYFILE.lnk“）不会返回任何东西

如果My.Computer.FileSystem.FileExists（Environment.SpecialFolder.Desktop \ MYFILE.exe“）不会返回任何东西

我在谷歌搜索过这个似乎也找不到任何东西。

感谢。

Answer 1

System.IO.File.Exists(Environment.GetFolderPath(Environment.SpecialFolder.Desktop) & "\MYFILE.exe")

Answer 2

Public Function DesktopShortcutExists(ByVal sShortCutName As String) As Boolean
    Dim sPublicPath As String = Environment.GetFolderPath(Environment.SpecialFolder.CommonDesktopDirectory) & "\" & sShortCutName & ".lnk"
    Dim sUserPath As String = Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory) & "\" & sShortCutName & ".lnk"
    Return File.Exists(sPublicPath) = True Or File.Exists(sUserPath) = True
End Function

Answer 3

除非你的问题输入错误，并原谅我的VB技能，但不应该是：

> If My.Computer.FileSystem.FileExists(Environment.GetFolderPath(Environment.SpecialFolder.Desktop) & "\MYFILE.lnk")
> Then
>     ' Do Something
> End

C＃我会用：

if(System.IO.File.Exists(string.format("{0}{1}", Environment.GetFolderPath(System.Environment.SpecialFolder.Desktop), @"\MYFILE.lnk")))
{
  // do something with file
}

Answer 4

您是否尝试过这样：

If My.Computer.FileSystem.FileExists(My.Computer.FileSystem.SpecialDirectories.Desktop & "\myfile.lnk")

基本上我只是想知道你是否确保你的字符串连接是正确的，并在必要时使用\。

在VB中检查桌面上的文件

4 个答案: