Paso 4: Hacer el dispositivo de bloqueo (parte 3)
Por alguna razón el registro no puede leer la letra de la unidad sola, así que debe ser puesta en un entero correspondiente. Eso es lo que hace este código a continuación. Para más información sobre este haga clic aquí.
ElseIf strChoice = "a" Then intDriveNumber = 1 ElseIf strChoice = "b" Then intDriveNumber = 2 ElseIf strChoice = "c" Then intDriveNumber = 4
Una vez que el entero se configura la secuencia de comandos ahora puede escribir en el registro mediante este código:
objWshShl.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoViewOnDrive", intDriveNumber, "REG_DWORD"
Otra nota, es que este programa escribe en HKLM en vez de HKCU. HKLM afecta a todos los usuarios en lugar de sólo la actual sesión de usuario para que el bloqueo es más eficaz.