vb.netimpersonationrunassecurity-contextstartprocessinfo

Run new process as different user in vb.net


I'm currently using a homegrown method to run a process as a different user in Vista, and I can't escape the feeling that's it hack-ish and less than ideal (in addition to the fact that it craps out UAC, crashing my app with a security exception, and forcing me to disable UAC altogether). My process consists of two projects (so two EXE files) - an "interface" and a "launch stub" - and here's the process:

  1. User has a shortcut that launches "Interface.exe notepad.exe"
  2. Interface.exe has a form that asks for the credentials they'd like to use
  3. Interace.exe uses ProcessStartInfo to create an instance of LaunchStub.exe (LS) as the new user
  4. LS uses ProcessStartInfo (with ShellExecute set to true) to launch the requested file, and since it's already running as the requested user, so is the new process.

The reason I have a two-step process is that I want users to be able to right-click on any file the OS has a default action for (.EXE, .SQL, .MSC, etc) and launch it, and ProcessStartInfo only supports that with "UseShellExecute" enabled, but that switch prevents me from using new credentials, so I can only do one at a time.

This causes a few problems - first, the user has to already exist on the computer, meaning they have to have logged in locally before. If there's no local profile for that user, the requested app will sometimes launch, but I get registry and profile exceptions because the application expects things to exist that don't yet (like an HKCU hive in the registry, which the user doesn't have because they've never logged in).

I know I should be able to just "Elevate" the rights of my application to the user they're requesting, launch my new process, and then undo the elevation, but I'm unable to find a good code sample for that, and I'm not sure that it would allow running as a completely different user. Does this all make sense? I just can't help feel like there's a better way to do this.


UPDATE: I just tried some Impersonation code I found online, but to no avail. When used in conjunction with ProcessStartInfo, it still seems to launch processes using my current login, not the one I've provided, even though I've activated impersonation using the provided credentials.


Solution

  • Chances are that you have to create your own "shell" function using the Win32 API.

    Using the CreateProcessWithLogonW API you can create new processes under different credentials and optionally load user profile information.

    In the code snippet below if you replace

    See the documentation for the CreateProcessWithLogonW API for further specifics. Going this route you have full control and full responsibility for launching the application.

    Again this is just a sample and you may have to play with it a little to get it to do what you want.

    
    Imports System.Runtime.InteropServices
    
    Public Module modShell
    
        <StructLayout(LayoutKind.Sequential)> _
        Public Structure STARTUPINFO
            Public cb As Integer
            Public lpReserved As String
            Public lpDesktop As String
            Public lpTitle As String
            Public dwX As Integer
            Public dwY As Integer
            Public dwXSize As Integer
            Public dwYSize As Integer
            Public dwXCountChars As Integer
            Public dwYCountChars As Integer
            Public dwFillAttribute As Integer
            Public dwFlags As Integer
            Public wShowWindow As Short
            Public cbReserved2 As Short
            Public lpReserved2 As Integer
            Public hStdInput As Integer
            Public hStdOutput As Integer
            Public hStdError As Integer
        End Structure
    
        <StructLayout(LayoutKind.Sequential)> _
        Public Structure PROCESS_INFORMATION
            Public hProcess As IntPtr
            Public hThread As IntPtr
            Public dwProcessId As Integer
            Public dwThreadId As Integer
        End Structure
    
        Public Declare Unicode Function CreateProcessWithLogonW Lib "Advapi32" (ByVal lpUsername As String, ByVal lpDomain As String, ByVal lpPassword As String, ByVal dwLogonFlags As Int32, ByVal lpApplicationName As String, ByVal lpCommandLine As String, ByVal dwCreationFlags As Int32, ByVal lpEnvironment As IntPtr, ByVal lpCurrentDirectory As String, ByRef si As STARTUPINFO, ByRef pi As PROCESS_INFORMATION) As Integer
        Public Declare Function CloseHandle Lib "kernel32" (ByVal hObject As IntPtr) As Integer
    
        Public Const LOGON_WITH_PROFILE As Int32 = &H1
    
        Public Const NORMAL_PRIORITY_CLASS As Int32 = &H20&
    
        Public Const STARTF_USESHOWWINDOW As Int32 = &H1
        Public Const SW_HIDE As Int16 = 0
        Public Const SW_SHOW As Int16 = 5
    
        Public Function Shell(ByVal strCmdLine As String, ByVal strCurrentDirectory As String) As Boolean
    
            Dim pi As PROCESS_INFORMATION
            Dim si As New STARTUPINFO
    
            si.cb = Marshal.SizeOf(si)
            si.dwFlags = STARTF_USESHOWWINDOW
            si.wShowWindow = SW_SHOW
    
            Dim result As Integer = CreateProcessWithLogonW("username", "domain", "password", 0, vbNullString, strCmdLine, NORMAL_PRIORITY_CLASS, IntPtr.Zero, strCurrentDirectory, si, pi)
    
            If result <> 0 Then
                Call CloseHandle(pi.hThread)
                Call CloseHandle(pi.hProcess)
            Else
                Return False
            End If
    
            Return True
    
        End Function
    
    End Module