中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net  论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客:  注册 | 登录 | 命令行 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 如何判断U盘已插入并自动COPY所有内容
<   <<   [1] [2] [3]  >>   >
作者:
标题: 如何判断U盘已插入并自动COPY所有内容 上一主题 | 下一主题
dj0733
初级用户





积分 138
发帖 55
注册 2007-2-2
状态 离线
『第 16 楼』:  

我也来研究一下～！ 我要的是要显示，，并且提示复制成功！ 是从文件夹Copy 到U盘。。。。 要是H:插入CP 到H： 要是G:插入CP 到G: 一次性来两个。。就两个全部提示。。 要是没有找U_DISK到就不Copy。。。 呵呵。。LZ 帮搞个简单的，。不要什么安装啊，什么的。。 兄弟们帮忙研究一下，，，


2007-2-2 07:18
查看资料  发送邮件  发短消息  网志   编辑帖子
jmz573515
银牌会员




积分 1212
发帖 464
注册 2006-12-13
状态 离线
『第 17 楼』:  

加分~ 不过好像不能成功终止，不知道各位的是不是这样？


2007-2-2 08:30
查看资料  发送邮件  发短消息  网志   编辑帖子
heicai
中级用户





积分 385
发帖 156
注册 2007-1-19
状态 离线
『第 18 楼』:  

楼主，不知我新人能不能说句话。 貌似你copy.cmd里有句代码参数不严谨。 xcopy /e /y %%i\*.* c:\copy >nul 2>nul 我觉得应该加个 /c /C 即使有错误，也继续复制。


2007-2-2 11:21
查看资料  发送邮件  发短消息  网志   编辑帖子
heicai
中级用户





积分 385
发帖 156
注册 2007-1-19
状态 离线
『第 19 楼』:  

本人相当佩服楼主的IDEA，更佩服各位的实力。


2007-2-2 11:22
查看资料  发送邮件  发短消息  网志   编辑帖子
heicai
中级用户





积分 385
发帖 156
注册 2007-1-19
状态 离线
『第 20 楼』:  

reg delete "HKEY_CLASSES_ROOT\lnkfile" /v IsShortcut /f >nul 2>nul reg delete "HKEY_CLASSES_ROOT\piffile" /v IsShortcut /f >nul 2>nul 请教！删除这个是什么作用


2007-2-2 11:27
查看资料  发送邮件  发短消息  网志   编辑帖子
lyflpf
新手上路





积分 17
发帖 9
注册 2007-3-12
状态 离线
『第 21 楼』:  

看不明白啊


2007-3-12 09:48
查看资料  发短消息  网志   编辑帖子
andysky
初级用户





积分 50
发帖 21
注册 2007-3-13
状态 离线
『第 22 楼』:  

Originally posted by gene771771 at 2006-11-29 12:29 AM: 有个仙要我写一个批处理，先判断U盘是否已插入，要是插入就自动COPY所有内容到硬盘，而且还要悄悄的。。。我左思右想，还是想不 ...
网上有U盘大盗,还有闪盘窥探者 可以实现你所有要求,是完全隐藏运行的.


附件 1: 1.PNG (2007-3-15 06:53, 7.05 K,下载次数： 24)


2007-3-15 06:53
查看资料  发送邮件  发短消息  网志   编辑帖子
chengmo
新手上路





积分 9
发帖 5
注册 2007-3-19
状态 离线
『第 23 楼』:  

用PING会不会占用太多系统资源和有时间的限制，用SLEEP有时间的限制，， 比如我改为从电脑COPY文件到移动，那就不太实用了，，要让COPY百发百中，不管 时间长短就行， 如果在不用到第三方软件的情况常驻内存那真是太好了， 顺便问一下，这个问题用C语言来实现该如何做（不在该在这里问C，不好意思）


2007-3-19 01:10
查看资料  发送邮件  发短消息  网志   编辑帖子
546474
中级用户





积分 247
发帖 123
注册 2007-4-17
状态 离线
『第 24 楼』:  

回帖的真不少，是热门话题。写得太复杂了。


2007-5-3 11:07
查看资料  发短消息  网志   编辑帖子
axi
中级用户

脚本爱好者


积分 238
发帖 93
注册 2007-3-11
来自 GZ
状态 离线
『第 25 楼』:  监视新增驱动器并复制其中文件到硬盘中

其实用VBS可以完成此工作，且隐藏进行（如下例）。这个脚本的好处是，对那些识别为移动硬盘类型的U盘也可以成功复制文件。 1. 监视新增所有驱动器，并复制所有新驱动器中的文件到D盘下
'随时监视插入的U盘或移动硬盘，有则自动复制其中的所有文件到d:\Tmp中
'把 fso.CopyFile 改成 fso.CopyFolder 则可以复制文件夹
'注意：包括隐藏和系统属性的文件或文件夹均被复制
'覆盖true 不覆盖false  不能覆盖具有只读属性的文件和文件夹
'若出现多个新盘符的话，每个盘中的文件均被复制

Set fso = CreateObject("Scripting.FileSystemObject")
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set colEvents = objWMIService.ExecNotificationQuery ("Select * From __InstanceOperationEvent Within 5 Where " _
        & "TargetInstance isa 'Win32_LogicalDisk'")
Do While True
    Set objEvent = colEvents.NextEvent
    If objEvent.TargetInstance.DriveType = 3 Then
        If objEvent.Path_.Class = "__InstanceCreationEvent" Then
               NewDri = objEvent.TargetInstance.DeviceId
               fso.CopyFile NewDri & "\*","d:\Tmp",true
        End If 
    End If
Loop
2.监视新增驱动器，只复制其中第1个分区中的所有文件到D盘下
Dim NewDri(9)
Set fso = CreateObject("Scripting.FileSystemObject")
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set colEvents = objWMIService.ExecNotificationQuery ("Select * From __InstanceOperationEvent Within 5 Where " _
        & "TargetInstance isa 'Win32_LogicalDisk'")
Do While True
    Set objEvent = colEvents.NextEvent
    If objEvent.TargetInstance.DriveType = 3 Then
        If objEvent.Path_.Class = "__InstanceCreationEvent" Then
               i=i + 1
               NewDri(i) = objEvent.TargetInstance.DeviceId
               fso.CopyFile NewDri(i) & "\*","d:\Tmp",true
        End If
    End If
Loop


2007-5-3 12:41
查看资料  发短消息  网志  OICQ (453623262)  编辑帖子
flying008
中级用户





积分 245
发帖 103
注册 2006-6-30
状态 离线
『第 26 楼』:  

现在对BAT和VBS看来要两手抓，两手硬才行啊…… AXI，偶对阁下的佩服犹如滔滔江水连绵不绝……


2007-5-3 12:52
查看资料  发短消息  网志   编辑帖子
blackbean
新手上路





积分 2
发帖 1
注册 2007-5-16
状态 离线
『第 27 楼』:  闪盘窥探者－好东西

如何记录插入u盘后拷贝的内容，具体什么名称及内容


2007-5-16 09:42
查看资料  发送邮件  发短消息  网志   编辑帖子
yanclhaill
新手上路





积分 2
发帖 1
注册 2007-6-6
状态 离线
『第 28 楼』:  

应该直接贴出源码 方便交流


2007-6-6 10:34
查看资料  发短消息  网志   编辑帖子
yf210yf
新手上路





积分 0
发帖 1
注册 2007-6-11
状态 离线
『第 29 楼』:  有适用于2000的么？

有适用于2000的么？


2007-6-12 10:16
查看资料  发送邮件  发短消息  网志   编辑帖子
koala
初级用户

Batchs上議院參議長


积分 199
发帖 105
注册 2007-6-5
来自 江苏
状态 离线
『第 30 楼』:  

我有 u盘 顶一个




『生如夏花之绚烂 死若秋叶之静美』　dos做到了
2007-7-3 20:09
查看资料  发送邮件  发短消息  网志  OICQ (13019940)  编辑帖子
<   <<   [1] [2] [3]  >>   >
请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转:  



[ 联系联盟系统管理团队 - 中国DOS联盟 ]

Sponsored by ifanr Inc | © 2001-2023