Executing .exe from Visual Basic 6

exe, shellexecute, vb6

Solution

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
                    ByVal hwnd As Long, _
                    ByVal lpOperation As String, _
                    ByVal lpFile As String, _
                    ByVal lpParameters As String, _
                    ByVal lpDirectory As String, _
                    ByVal nShowCmd As Long) As Long

Private Const SW_HIDE As Long = 0

Private Const SW_SHOWNORMAL As Long = 1

Private Const SW_SHOWMAXIMIZED As Long = 3

Private Const SW_SHOWMINIMIZED As Long = 2


Private Sub Label1_Click()

    ShellExecute Me.hwnd, "Open", "G:\PN Technologies\VB\Krishna & Co\KrishnaCo.exe", vbNullString, "C:\", SW_SHOWNORMAL

End Sub

Problem

I'm new to visual basic. I'm trying to execute `.exe` file from VB. But I'm not getting the output. My `.exe` is having command line args. Following is my code ``` Private Sub Command1_Click() Shell "D:\FEP\extractFEPData.exe data.txt", vbNormalFocus End Sub ``` In cmd prompt If I give command `extractFEPData.exe data.txt` It is parsing the file. But in VB after clicking command button nothing happens. Please help me.

Original source