shatal_hehc
Bovino maduro
- Desde
- 19 Ene 2008
- Mensajes
- 256
- Tema Autor
- #1
Que tal Bakunos, abro este post con el único propósito de hacer comunidad compartida, es decir para que en este post compartamos el codigo VB o VC# que creamos que pueda servirle a alguien mas, si estan de acuerdo les dejo un codigo que les va a servir seguramente.
Titulo : Run As
Problemática: Cuando una aplicación requiere permisos de administrador ya sea para escribir en carpetas protegidas o acceder a ellas etc, y el usuario que esta tratando de usarla es un usuario limitado, esta es la solucion, hay que crear una aplicación que ejecute un módulo con el siguiente código:
Saludos
Titulo : Run As
Problemática: Cuando una aplicación requiere permisos de administrador ya sea para escribir en carpetas protegidas o acceder a ellas etc, y el usuario que esta tratando de usarla es un usuario limitado, esta es la solucion, hay que crear una aplicación que ejecute un módulo con el siguiente código:
Código:
Imports System.Security.Principal
Imports System.Security.Permissions
Imports Microsoft.VisualBasic
Sub Main()
Dim runAs As New ProcessStartInfo(System.Windows.Forms.Application.StartupPath & "\NOMBRE DEL EJECUTABLE + EXTENSION")
Dim passw As New Security.SecureString()
Dim strUser As String = "Usuario de perfil administrador"
Dim strPwd As String = "Contraseña"
runAs.UseShellExecute = False
For i As Integer = 0 To are.Length - 1
passw.InsertAt(i, strPwd.Chars(i))
Next
runAs.Domain = "Nombre del Dominio, este es opcional, si el equipo no se encuentra en dominio omitirlo"
runAs.UserName = strUser
runAs.Password = passw
Try
Process.Start(runAs)
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Exclamation)
End Try
End Sub
Saludos