VB6打开局域网文件夹，需要账户和密码

陈云峰发布于 2017-07-10 09:24， 4413 次点击

我想用做一个快捷按钮，点击按钮实现打开局域网某电脑的共享文件夹，但是有设置登录名和密码，现在想说如何做才能自动输入账户名和密码，实现打开文件夹。
以下是我网上查过来的代码但是点击登录的时候，电脑还是一样跳出要输入账户名和密码，请高手帮忙看看哦

Sub Loading()
Shell "cmd /c net use \\192.168.222.18 " & Chr(34) & "123" & Chr(34) & " /user:" & Chr(34) & "administrator" & Chr(34), vbHide
Shell "cmd /c start \\192.168.222.18\共享盘 ", vbHide
End Sub

6 回复

陈云峰2017-07-10 10:49

这个网站有人吗

ZHRXJR2017-07-10 11:10

其实这个问题我认为比较简单，将局域网中其他计算机的共享文件夹的登录帐号与密码存储在一个介质中，例如文本文件，打开其他计算机的共享目录，读取登录帐号与密码，赋值到相应的文本框就可以了。
但是第一次登录必须输入登录帐号与密码，输入后存储到介质中即可。

陈云峰2017-07-10 11:16

回复 3楼 ZHRXJR

请问版主这个方法用代码怎么实现呢，我用的是SQL SERVER，可以把账户密码存入数据表里面，但是整个过程要怎么实现不太会哦

ZHRXJR2017-07-10 13:44

回复 4楼陈云峰

联系我，不是一二句能够说清楚的。

陈云峰2017-07-10 14:13

回复 5楼 ZHRXJR

我加您QQ哦版主

xzlxzlxzl2017-07-15 08:47

调用api函数WNetAddConnection2可使用已知用户名和密码访问隐含共享，然后你就可以使用C$、D$...访问该电脑任何一个目录了，使用WNetCancelConnection2函数注销访问。