作者efb258d (恩哈哈)
看板Visual_Basic
标题[VB6] 使用VB设定共用文件夹 但是不成功
时间Mon May 11 17:05:24 2009
我想要使用VB6设定一个共用文件夹,并能让其他电脑存取
我找了好几个礼拜,试了都没成功,麻烦各位高手帮忙
这是我在蓝色小舖找到,并最接近我的需求,可是还是有问题
http://epaper.blueshop.com.tw/board/show.asp?subcde=BRD20061109154430ZAM&fumcde=FUM200410061527123KL
缩址
http://ppt.cc/gPHk
下面这行贴上去能新增出来,自己电脑也可以使用,但在别台会出现 "存取被拒"
GetObject("winmgmts:").Get("Win32_Share").Create _
"C:\Temp", "共用名称", 0, 3, "注解"
' C:\Temp -> 资料夹
' 共用名称 -> 共用名称
' 0 -> 共用
' 3 -> 使用者限制 , 允许这个数目的使用者
' 注解 -> 注解
下面是资料夹的状态
用程式码新增 用右键去共用出来
AllowMaximum: False AllowMaximum: True
Caption: 注解 Caption: TEMP
MaximumAllowed: 3 MaximumAllowed:
Name: 共用名称 Name: TEMP
Path: C:\Temp Path: C:\TEMP
Type: 0 Type: 0
但是我对这部分并不熟悉,不知道该怎去修改
请大大帮忙...感谢
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 203.68.74.39