当前位置: 代码迷 >> ASP >> net.RemoveNetworkDrive Path,"true"该怎么解决
  详细解决方案

net.RemoveNetworkDrive Path,"true"该怎么解决

热度:1002   发布时间:2012-03-18 13:55:39.0
net.RemoveNetworkDrive Path,"true"???????????
我的FSO.asp   如下:
<%

Dim   Path,fso,net,f

i=1

do   while   i <3

if   i=1   then  
sourcefile= "\\10.97.1.35\qjcf_no1\barcodeprinter.mdb "
targetfile= "\MDB\barcodeprinter35.mdb "

end   if  

if   i=2   then  
sourcefile= "\\10.97.1.36\产品数码跟踪(BarCodePrinter) "
targetfile= "\MDB\barcodeprinter36.mdb "

end   if  


Set   fso   =   CreateObject( "Scripting.FileSystemObject ")
path= "X: "

If   Not   fso.DriveExists(fso.GetDriveName(Path))   Then
    '如果不存在驱动器映射,映射网络驱动器   x:
    Set   net   =   Server.CreateObject( "WScript.Network ") '创建Network对象
    net.MapNetworkDrive   Path,sourcefile, "False ", "xcopy ", "xcopy "
   
    '指定映射目录及登陆信息
    '将电脑10.97.1.36上共享的qjcf_no1文件夹映射到本地磁盘X中;  
    '\False:不把映射存储在当前的用户配置文件中;   后面可再加两个参数,xcopy,xcopy   分别是共享文件夹的用户名与密码.

End   If

Set   f   =   fso.GetFile(Path& "\barcodeprinter.mdb ")        
'获取到映射中的文件的句柄。
f.Copy(Server.MapPath(targetfile))      
'   拷贝到WEB服务期当前目录下的MDB下;默认是强制覆盖
'response.write( "文件拷贝OK ")

'删除本地名称为X:的映射,True表示强制删除,不管当前有没有人正在使用这个映射.

net.RemoveNetworkDrive   Path, "true "

'也可以不断开,以后直接像用本地的一样.

set   fso=nothing
set   f=nothing

i=i+1
loop

%>

老是报net.RemoveNetworkDrive   Path, "true "   有问题;
什么原因?????????

------解决方案--------------------
net.RemoveNetworkDrive Path,true

bool型的
  相关解决方案