(已经解决)敬请高手解决用vb6代码打开局域网文件夹的问题。谢谢。
已经解决问题,是本人在把VBA的用手输入的方法,导致vb6的代码空格少也无法查出而运行不对,用复制VBA的方法,vb6运行和VBA的结果就一致了。谢谢大家的热心帮忙。以下两段vba代码均可以打开共享的局域网文件夹,但作为vb6代码则不中,打开共享的局域网文件夹的vb6代码如何写?
1、
Set fso = CreateObject("Scripting.FileSystemObject")
If FSO.folderexists("\\172.20.31.32\123") then 'vb6不能正确判断
Ret = Shell("explorer.exe \\172.20.31.32\123", vbNormalFocus)'打开文件夹
MsgBox "存在"
Else
MsgBox "不存在"
End If
Set fso = Nothing
End Sub
2、
shell "cmd /c start \\172.20.31.32\123",vbhide '打开文件夹
[此贴子已经被作者于2016-10-22 10:04编辑过]