锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net弹出光驱 vbs弹出光驱

IT技术方法

VB.NET如何让弹出的窗体显示在所有的窗体的最前面（包括其他程序打开的窗体）你可以这样做，设置窗体的TopMost 属性为真！
Me.TopMost = True
Form.TopMost 属性
获取或设置一个值 ， 指示该窗体是否应显示为最顶层窗体 。
VB.net怎么弹出文件夹路径选择框选择文件夹在工具箱 - 对话框 里选择 FolderBrowserDialog 添加 到设计器中
然后 代码写在按钮事件里
FolderBrowserDialog1.ShowDialog()
textbox1.text =FolderBrowserDialog1.SelectedPath
选择文件 在工具箱 - 对话框 里选择 OpenFileDialog
把 OpenFileDialog1.ShowDialog()
TextBox1.Text = OpenFileDialog1.FileName
写到按钮事件下
如图
点击按钮会弹出 通用对话框选择好路径后 确定 ，编辑框里就会显示选择的路径
如何VB调用API实现光驱 ， USB的禁用禁用U盘和移动硬盘
方法一，BIOS设置法（快刀斩乱麻法）
进入BIOS设置 ， 选择“Integrated Peripherals”选项，展开后将“USB 1.1 Controller”和“USB 2.0 Contr01ler”选项的属性设置为“Disableed”，即可禁用USB接口 。最后别忘记给BIOS设置上一个密码，这样他人就无法通过修改注册表解“锁”上述设备了 。
注意：这个方法是完全禁止了USB接口 ， 也就是说各种USB接口的设备均不能用了 ， 当然也包括了U盘和移动盘 。由于此法过于霸道，请慎用 。
方法二，禁止闪盘或移动硬盘的启动（适用于Windows XP/2000/2003）
打开注册表编辑器，依次展开如下分支[HKEY_LOCAL_MACHINE\SYSTEM\CurrentCntrolSet\Services\USBSTOR] ， 在右侧的窗格中找到名为“Start”的DWORD值 ， 双击 ， 在弹出的编辑对话框中将其数值数据修改为十六位进制数值“4” 。点“确定”按钮并关闭注册表编辑器 ， 重新启动计算机 ， 使设置生效 。重启后，当有人将USB存储设备连接到计算机时，虽然USB设备上的指示灯在正常闪烁，但在资源管理器当中就是无法找到其盘符，因此也就无法使用USB设备了 。
方法三 ， 隐藏盘符和禁止查看（适用于Windows系统）
打开注册表编辑器，依次展开如下分支[HKEY_CURRENT_USER\software\Microsoft\Windows\CurrentVersion\Ploicies\Explorer]，新建二进制值“NoDrives”，其缺省值均是00 00 00 00，表示不隐藏任何驱动器 。键值由四个字节组成 ， 每个字节的每一位（bit）对应从A:到Z:的一个盘 ， 当相应位为1时 ， “我的电脑”中相应的驱动器就被隐藏了 。第一个字节代表从A到H的8个盘 ， 即01为A，02为B，04为C……依次类推，第二个字节代表I到P，第三个字节代表Q到X，第四个字节代表Y和Z 。比如要关闭C盘 ， 将键值改为04 00 00 00；要关闭D盘，则改为08 00 00 00，若要关闭C盘和D盘 ， 则改为0C 00 00 00(C是十六进制 ， 转成十进制就是12) 。
理解了原理后，下面以我的电脑为例说明如何操作：我的电脑有一个软驱、一个硬盘(5个分区)、一个光驱，盘符分布是这样的：A:（3.5软盘）、C:、D:、E:、F:、G:、H:（光盘），所以我的“NoDrives”值为“02 ff ff ff”，隐藏了B、I到Z盘 。
重启计算机后，再插入U盘 ， 在我的电脑里也是看不出来的，但在地址栏里输入I:（我的电脑电后一个盘符是H）还是可以访问移动盘的 。到这里大家都看得出“NoDrives”只是障眼法，所以我们还要做多一步，就是再新建一个二进制“NoViewOnDrive”，值改为“02 ff ff ff”，也就是说其值与“NoDrives”相同 。这样一来，既看不到U盘符也访问不到U盘了 。
方法四，禁止安装USB驱动程序

推荐阅读


上一篇：python如何输出列表的大小，python中怎么输出列表

下一篇：mysql事务效率如何，mysql事务有什么作用