怎样用程序实现，对文件或者文件夹实现共享？

Question

由于程序的需要，平时都是手动操作实现文件或者文件夹共享，若用程序来实现，怎样来写代码呢？有这个方面的经验的朋友们，欢迎回复。

Answer 1

http://search.csdn.net/Expert/topic/601/601524.xml?temp=.5225336

Answer 2

直接在VB里用Shell调用Net 命令就用以实现
此命令的语法是:
NET SHARE
sharename
          sharename=drive:path [/USERS:number | /UNLIMITED]
                               [/REMARK:"text"]
                               [/CACHE:Manual | Documents| Programs | Non
          sharename [/USERS:number | /UNLIMITED]
                    [/REMARK:"text"]
                    [/CACHE:Manual | Documents | Programs | None]
          {sharename | devicename | drive:path} /DELETE NET SHARE 使网络用户可以使用某一服务器上的资源。 当不带选项使用本命令
时，它会列出该计算机上正在被共享的所有资源。对于每一种资源，Windows 都
会报告其设备名或路径名，以及与之相关的描述性注释。sharename          指共享资源的网络名。输入 NET SHARE 和一个共享名只会
   显示那个共享的有关信息。
drive:path         指定将被共享的目录的绝对路径。
/USERS:number      设置可以同时访问共享资源的最大用户数。
/UNLIMITED         指定用户可以同时访问共享资源的不受限制的数目。
/REMARK:"text"     添加一个有关资源的描述性注释，应将文本包含在引号中。
devicename         指一个或多个被共享名所共享的打印机 (LPT1: 至 LPT9:)。
/DELETE            终止资源的共享。
/CACHE:Automatic   启用脱机客户缓存和自动重新集成
/CACHE:Manual      启用脱机客户缓存和手动重新集成
/CACHE:No          告诉客户脱机缓存不合适

Answer 3

http://dev.csdn.net/article/23/23135.shtm

Answer 4

晕倒，有这么麻烦么？FSO就能实现这个功能。

Answer 5

楼上的，说说你的最简单的方法！FSO谓之何物？本人没有用过！

Answer 6

FileSystemObject 对象
               描述提供对计算机文件系统的访问。语法Scripting.FileSystemObject说明下面的代码举例说明了如何使用 FileSystemObject 返回一个 TextStream 对象，该对象是可读并可写的：Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("c:\testfile.txt", True)
a.WriteLine("This is a test.")
a.Close在上面列出的代码中，CreateObject 函数返回 FileSystemObject (fs)。CreateTextFile 方法接着创建文件作为一个 TextStream 对象(a)，而 WriteLine 方法则向创建的文本文件中写入一行文本。Close 方法刷新缓冲区并关闭文件。

Answer 7

hnwlf(寻梦) 老兄的方法不错.按照这个思路可以这样做下去1.按照上面的命令.生成一个*.BAT文件
2.执行这个BAT
3.删除这个bat