Enabling/Disabling USB port using VB6

Hi ,

I am creating a VB6 program in which I need to Take Backup of Data to USB(Thumb dirve) . But for security purpose USB port must be disabled always. So when I start taking backup I need to enable the USB port take the Backup and disable it. How to do that using VB6

I have tried the option to enable using Wscript as follows . But it is not refreshing the USB port autotomatically.

**********************************************************

Set objReg = CreateObject("Wscript.shell")
objReg.Regwrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\USBSTOR\Start", 3, "REG_DWORD"

**********************************************************

Is there any way we can refresh the Windows devices from VB6

Thanks & Best Regards

Paulson Abraham

Technical Consultant.