厉害,我怎么也想不到可以:Name "" as "".明明有个filesystemobject对象却不能更名操作.真不知道那些写对象的同胞怎么想的....有何理由把这个功能不集成在一起?
用FSO(文件系统对象),在引用中打钩就行了,很好用
Name "c:\fold.txt" As "c:\fnew.txt" 可以 Name "c:\fold.txt" As "d:\fnew.txt" 则能移动文件 FSO可以直接引用,声明一下就行了,功能强大 -------------------------------- 欢迎交流:[email protected],[email protected] hjbookhouse.yeah.net
直接用FSO,很方便Dim MyFSO As New FileSystemObject Dim MyFile As File Set MyFile=MyFSO.GetFile("C:\File.txt")MyFile.Name="NewName.txt"
Kill 源文件
sxs69() 的方法果然有用,
偶以前也是用的 filecopy kill
可以
Name "c:\fold.txt" As "d:\fnew.txt"
则能移动文件
FSO可以直接引用,声明一下就行了,功能强大
--------------------------------
欢迎交流:[email protected],[email protected]
hjbookhouse.yeah.net
Dim MyFile As File
Set MyFile=MyFSO.GetFile("C:\File.txt")MyFile.Name="NewName.txt"