Convidado 26/6/2013, 15:22
Boas Mestre... Estou ciente disto... Antes de ver sua resposta eu ja havia conseguido porem com um detalhe....
Function GravaRegistro()
Dim RegKey As String
Dim RegObj
Dim Value As String
Dim WTRSF As Object
RegKey = "HKLM\Software\Microsoft\Windows NT\CurrentVersion\WinLogon\AutoAdminLogon"
Value = "0"
Set WTRSF = CreateObject("WScript.Shell")
WTRSF.RegWrite RegKey, Value, "REG_SZ"
End Function
Observe o caminho do registro... porém ao efetuar a gravação... ele remete para outra pasta do registro:
RegKey = "HKLM\Software\
Wow6432Node\Microsoft\Windows NT\CurrentVersion\WinLogon\AutoAdminLogon"
Bem... de qualquer forma... Esta alteração prometia desabilitar a combinação de teclas Alt + Tab visto que não executaria o logon no Windows etc....
Não obtive sucesso.
Quanto a este tópico, sobre a gravação de registros, obtive sucesso porém não para o que pretendia o código que era desabilitar as combinações.
Obrigado.