theDeSilva.com» vb.net http://www.thedesilva.com Andrew de Silva Wed, 10 Mar 2010 21:48:23 +0000 en hourly 1 http://wordpress.org/?v=3.0 Using cmd.exe with VB.NET – Process.Start http://www.thedesilva.com/2010/01/using-cmd-exe-with-vb-net-process-start/ http://www.thedesilva.com/2010/01/using-cmd-exe-with-vb-net-process-start/#comments Thu, 28 Jan 2010 00:04:14 +0000 Andrew de Silva http://www.thedesilva.com/?p=190
Here’s a quick function to show the use of System.Diagnostic.Process which will allow you to start another application using VB.NET. The example below is used to call svnadmin to create a new repository ( Subversion ) by grabbing the repository name. The function also checks to see whether the directory exist on the file system [...]]]>

Here’s a quick function to show the use of System.Diagnostic.Process which will allow you to start another application using VB.NET. The example below is used to call svnadmin to create a new repository ( Subversion ) by grabbing the repository name. The function also checks to see whether the directory exist on the file system and if it doesn’t it will start the command prompt svnadmin to create the folder. However if the folder does exist it will nag at you.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

 
Sub createRepo(ByVal sender As Object, ByVal e As System.EventArgs)
        Dim repoName As String = repoNameInput.Text
 
        Dim dirExist As Boolean = False
 
        If System.IO.Directory.Exists("C:\svn_repository\" & repoName) Then
            dirExist = True
            result.Text = "<font color=""red"">Repository Already Exist !</font>"
        End If
 
        If (repoName.Length <> 0 And dirExist = False) Then
            Dim myProcess As Process = Process.Start("cmd.exe", "/k svnadmin create C:\svn_repository\" & repoName)
 
            myProcess.WaitForExit(10000)
            ' if the process doesn't complete within
            ' 10 seconds, kill it
 
            If Not myProcess.HasExited Then
                myProcess.Kill()
            End If
 
            result.Text = "Respository Created: " _
                & myProcess.ExitTime & _
                Environment.NewLine & _
                "Exit Code (Troubleshooting Purpose): " & _
                myProcess.ExitCode
        End If
 
    End Sub

You will have to import the following library to have the Process.Start to work.

1

Imports System.Diagnostics
]]> http://www.thedesilva.com/2010/01/using-cmd-exe-with-vb-net-process-start/feed/ 0