如何在客户机上建立服务器上的一个共享的文件目录
编号：QA002082
建立日期: 1999年11月23日 最后修改日期：1999年11月23日
所属类别：
梁华:
操作系统: Windows NT 4.0
编程工具: Visual Basic 6.0
问题: 如何在客户机上建立服务器上的一个共享的文件目录，而且能建立不止一层目录？
回答:
下面为我写的一小段程序，相信对你有一定帮助。
Dim fso, d
dim newfolder as string
On Error Resume Next '//////如已经建立则忽略错误
Set fso = CreateObject("Scripting.FileSystemObject")
newfolder="test"
'/////引号内为服务器目录
Set d = fso.createfolder("\\NTSVR01\home" & "\" & newfolder)
如要建立多级目录，必须一步步逐渐建立。
此问题由point回答。
| |
|
|
| |
|
|
