Skip to main content


Showing posts from August, 2012

Runas Program

 I wrote up a little program that is similar to my touch screen runas program just missing the buttons. Here is the source code You will need to create a couple buttons and three text boxes. txtpassword txtusername txtpath and two buttons one for running the program and one for exit. Requires Express 2010 Imports System.Security Imports System.ComponentModel Public Class frmMain Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load End Sub Function ConvertToSecureString(ByVal str As String) Dim password As New SecureString For Each c As Char In str.ToCharArray password.AppendChar(c) Next Return password End Function Private Sub Step1_UsernamesPasswords() Dim strUsername As String Dim strpassword As SecureString = ConvertToSecureString(txtpassword.Text) Dim strCommand As String = txtpath.Text ' MsgBox(strCommand)