用VBS可以把D盘的123文件夹跟456.txt还有123.lnk 复制到F盘么?

来源:百度知道 编辑:UC知道 时间:2024/06/08 01:43:06
用VBS可以把D盘的123文件夹跟456.txt还有123.lnk 复制到F盘么?当然能一键复制到U盘移动硬盘上更好.

0
需要详细的步骤

FileSystemObject

Set fs = CreateObject("Scripting.FileSystemObject") '设置系统文件变量
fs.copyFile "d:\123","f:\" '复制文件d:\123到f:\下面
fs.copyFile "d:\123.lnk","f:\" '复制d:\123.lnk到f:\下面
fs.copyFile "d:\456.txt","f:\" '复制d:\456.txt到f:\下面

这个检测U盘好像很难实现(最少我没见过vbs检测U盘的),复制就上面的就可以复制你的文件

这个还要详细步骤?直接复制就完了嘛!

可以

以下是代码:

Dim objfs
Dim Removable,yn
Set objfs=CreateObject("scripting.filesystemobject")

Removable=1
For Each d In objfs.Drives
        If d.DriveType=Removable Then
                Do Until d.IsReady
                Loop
    &n