 Autor
|
Tema: bloquear WinKey desde vb (Leído 5,974 veces)
|
abel_c_b
 Desconectado
Mensajes: 91
|
Hola, como podria hacer para desabilitar, mientras se esta ejecuntado mi aplicación, la tecla windows, la de la ventanita? agradezco toda la informacion posible.
saludos
|
|
|
|
|
En línea
|
|
|
|
((( SPAWN )))
Desconectado
Mensajes: 56
|
Hola, hay bastante informacion sobre el tema, te posteo unas de las formas para bloquear usando apis ejemplo: Private Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Private Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long
Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
Private Const REG_DWORD = 4
Private Const HKEY_CURRENT_USER = &H80000001
Private Sub Command1_Click()
Dim hand&, valor&
valor = 0 'desbloqueado
'valor = 1 'bloqueado
RegOpenKey HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", hand
RegSetValueEx hand, "NoWinKeys", 0, REG_DWORD, valor, 4
RegCloseKey hand
End Sub
Saludos.
|
|
|
|
|
En línea
|
|
|
|
abel_c_b
Desconectado
Mensajes: 91
|
hola, gracias por contestar, pero te comento que tu codigo no funciona lo ejecuto efectivamente crea la clave con su valor, reinicio el equipo y cuando aparece nuevamente el escritorio sigue funcionando la tecla windows, ojala tengas algun otro codigo, probado, para ver si funciona.
saludos
|
|
|
|
|
En línea
|
|
|
|
((( SPAWN )))
Desconectado
Mensajes: 56
|
hola, bloquea generalmente las combinaciones cuando usas esa tecla especificamente como Windows+E el cual abre el explorador, Windows+R para ejecutar etc.
Saludos.
|
|
|
|
|
En línea
|
|
|
|
|
|
krackwar
Desconectado
Mensajes: 900
|
Hola, hay bastante informacion sobre el tema, te posteo unas de las formas para bloquear usando apis ejemplo: Private Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Private Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long
Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
Private Const REG_DWORD = 4
Private Const HKEY_CURRENT_USER = &H80000001
Private Sub Command1_Click()
Dim hand&, valor&
valor = 0 'desbloqueado
'valor = 1 'bloqueado
RegOpenKey HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", hand
RegSetValueEx hand, "NoWinKeys", 0, REG_DWORD, valor, 4
RegCloseKey hand
End Sub
Saludos. Gracias estaba teniendo unas complicaciones con esas api's y esto me las aclaro
|
|
|
|
|
En línea
|
Mi blogBienvenido krackwar, actualmente tu puntuación es de 38 puntos y tu rango es Veteran. El pollo número 1, es decir yo, (krackwar), adoro a Shaddy como a un dios. 
|
|
|
abel_c_b
Desconectado
Mensajes: 91
|
hola kobein, el link no funciona, revisalo por favor, saludos
|
|
|
|
|
En línea
|
|
|
|
|
naderST
|
hola kobein, el link no funciona, revisalo por favor, saludos
Como que no funciona? yo lo puedo descargar!
|
|
|
|
|
En línea
|
|
|
|
abel_c_b
Desconectado
Mensajes: 91
|
hola naderSt podrias colocar la aplicacion a otro pagina para poderlo descargar ya que a mi no me funciona el de cobein, saludos
|
|
|
|
|
En línea
|
|
|
|
|
|
|
| Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
Bloquear teclado desde VB?
Programación Visual Basic
|
Sanlegas
|
8
|
12,992
|
9 Mayo 2011, 22:19 pm
por Miseryk
|
|
|
|
bloquear el Admin. tareas desde el registro (VB NET)
.NET (C#, VB.NET, ASP)
|
adan-2994
|
1
|
3,755
|
20 Agosto 2011, 21:41 pm
por Meta
|
|
|
|
bloquear sms desde la simcard
Dispositivos Móviles (PDA's, Smartphones, Tablets)
|
alanrods
|
0
|
2,219
|
31 Mayo 2012, 21:23 pm
por alanrods
|
 |
+ 
= SOLUCIÓN
