Private Sub Command3_Click()

    Dim src As String
    Dim des As String
    Dim count As Integer
    Dim resDes As String
    Dim Result As String
    Dim i As Integer
    Dim runExe As Double
    Dim finPath As String


    src = seiengFile
    des = SDRSFile

    'NM: finding the folder that contains the sdrs files. The path is parced to locate
    'the last back slash. The location is used as a second argument for Left function to get to the folder.

    For i = 0 To Len(des)
        resDes = Mid(des, Len(des) - i, 1)
        If (resDes = "\") Then
            count = Len(des) - i
            Exit For
        End If
    Next i

    Result = Left(des, count)

    finPath = Result & "SEIENG.exe"

    FileCopy src, finPath
    Debug.Print "finPath = " & finPath
    Debug.Print "Result + executable = " & Result & "SEIENG.exe"
    runExe = Shell(finPath, vbMaximizedFocus)

    frmSeieng.Hide

End Sub