VS2015 VB ClickOnce应用System.IO.IOException异常排查求助

针对你遇到的VS2015 VB ClickOnce应用在调用My.Computer.FileSystem.GetFiles访问网络共享文件夹时，随机触发System.IO.IOException: Invalid Signature的问题，提供以下针对性修复建议：

1. 验证共享文件夹权限与身份凭据 #

• 确保运行应用的用户账户对目标共享路径\\erdtd4587\DataStorage同时拥有共享权限（读取权限）和NTFS权限（读取文件夹及文件权限）。
• 异常的随机性可能与凭据缓存有关：首次运行时身份验证未通过，重启后系统缓存了有效凭据暂时恢复，后续凭据过期或失效再次触发异常。可让用户手动添加共享凭据：
  控制面板 → 凭据管理器 → 添加Windows凭据，输入共享服务器地址、用户名和密码。

2. 替换为更稳定的文件枚举API #

My.Computer.FileSystem.GetFiles在处理网络共享时可能存在底层签名验证逻辑的兼容性问题，建议替换为System.IO命名空间下的原生API：

方案A：使用Directory.GetFiles #

Imports System.IO

' 替换原有代码
Dim UpfileNames As String() = Directory.GetFiles(spath, "DR087*.OLD", SearchOption.TopDirectoryOnly)

方案B：使用DirectoryInfo（更易扩展异常处理） #

Imports System.IO
Imports System.Linq

Dim dirInfo As New DirectoryInfo(spath)
Dim fileInfos As FileInfo() = dirInfo.GetFiles("DR087*.OLD", SearchOption.TopDirectoryOnly)
Dim UpfileNames As String() = fileInfos.Select(Function(f) f.FullName).ToArray()

3. 添加异常捕获与重试机制 #

针对随机触发的异常，添加重试逻辑可有效缓解问题，示例代码：

Imports System.IO
Imports System.Threading

Dim retryCount As Integer = 3
Dim success As Boolean = False
Dim UpfileNames As String() = Nothing

While retryCount > 0 AndAlso Not success
    Try
        UpfileNames = Directory.GetFiles(spath, "DR087*.OLD", SearchOption.TopDirectoryOnly)
        success = True
    Catch ex As IOException When ex.Message.Contains("Invalid Signature")
        retryCount -= 1
        Thread.Sleep(1000) ' 间隔1秒后重试
    End Try
End While

If Not success Then
    ' 处理最终失败场景，例如提示用户检查共享连接或联系管理员
    MessageBox.Show("无法访问共享文件夹，请检查网络连接或权限设置。")
End If

4. 调整ClickOnce安全权限配置 #

• 打开项目属性 → 安全 → 勾选"启用ClickOnce安全设置"，将权限设置为完全信任（访问网络共享需要较高权限，部分信任环境下可能触发随机权限验证异常）。
• 重新生成并发布应用，确保应用程序清单中的权限配置生效。

5. 排查网络与服务器端问题 #

• 检查共享服务器的SMB协议版本兼容性：若服务器禁用了SMB1而客户端仍使用该版本，可能导致随机通信异常。可在客户端调整SMB版本（通过组策略或注册表设置）。
• 运行服务器端磁盘检查：在共享文件夹所在服务器执行chkdsk /f命令，排查是否存在文件系统损坏导致的签名验证错误。

内容的提问来源于stack exchange，提问作者johnnyjojo