VB6 开发生成的exe文件无法访问局域网网络映射盘或共享目录中的文件或文件夹的解决办法

VB6 开发生成的exe文件无法访问局域网网络映射盘或共享目录中的文件或文件夹的解决办法 (网上几乎找不到解决这个问题的答案，特别是解决办法中的注意事项。折腾了好几天才解决） 一、问题症状 在Win10 或 Win11 64位 环境 使用VB6生成的exe访问，局域网网络映射盘或共享目录中的文件或文件夹，发现出现 文件名或文件与出错 或错误 ： 76 path not found 中错误 ：52 bad file name or number 或这样的错误提示: Run-time error '438': Object doesn't support this property or method 尝试了各种办法均没有解决 Set fso = CreateObject("Scripting.FileSystemObject") MsgBox fso.FolderExists(App.Path) 'true ' MsgBox Dir("\\192.168.0.8\ssy\Upd\Update.ini") '出错 52， bad file name or number 只要改名为Update.exe 系统就会自动加上一个安全图标，且执行这些操作就不行，不要使用Update.exe这个名称 MsgBox fso.FileExists("\\192.168.0.8\ssy\Upd\Update.ini") '可以执行，但返回false MsgBox "11" MsgBox fso.FolderExists("\\192.168.0.8\ssy\Upd\") '可以执行，但返回false ' 获取源文件夹和目标文件夹 Set SourceFolder = fso.GetFolder("\\192.168.0.8\ssy\Upd\") '出错 76 path not found 二、解决办法： 命令行输入 regedit 打开注册表管理器 （注意先备份） 找到 计算机\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System 打开注册表：添加DWORD值 ：EnableLinkedConnections，设置值为1 这样就可以了 （需要重启一下电脑） 注意事项：千万注意，生成的exe文件名不能为Update.exe ,系统会自动在这个exe执行文件的图标加上盾牌，然后这个执行文件 ，就无法访问局域网的共享目录文件了。这个问题让我折腾了三天才找到原因

希望对您有用，也可收藏 点赞及关注我