[RESOLVED] run Perl from VB

[om-yousif]

Hello everybody

i'm trying to run a Perl script from VB

how can i open command prompt window which will be hidden and witer the code to run a Perl script

the commands i want to use is
1. cd C:\buckwalter_morphan_1\data
2. perl -w AraMorph.pl < infile.txt > outfile.txt

so how can i do it?

can anyone help?

thanks alot

[Joacim Andersson]

Let your application create a BAT file with the above commands and simply run that using the Shell function.

[MartinLiss]

And here is an example of how to create a bat file.

Open APath & "del.bat" For Output As #1
    Print #1, ":start"
    Print #1, "@echo off"
    Print #1, "cls"
    Print #1, "del " & Chr$(34) & APath & App.EXEName & ".exe" & Chr$(34)
    Print #1, "if  exist " & Chr$(34) & APath & App.EXEName & ".exe" & Chr$(34) & " goto start"
    Print #1, "del " & Chr$(34) & APath & "del.bat" & Chr$(34)
    Close #1
    Shell APath & "del.bat"

End Sub

[dreamvb]

hi you can also try this, it will save createing a Bat file and just allow you to create a Pipe to the perl app and return the output, check on this page, as someone else asked me about this before.

http://www.andreavb.com/forum/viewto...3&page=0#19151

[om-yousif]

thanks MartinLiss

this is very helpful but i have another problem with your code
the problem is that infile and outfile are not fixed names for each time i run the program
they should be changed becaous infile is a file that user should load from an open window so it will be changed each time

so how can i chang the name since that it is between " "


thanks for your time

[Joacim Andersson]

Well, Martin Liss simply showed you how to create a BAT file via code. However the BAT file he creates will delete some files. What you want to do is write your command that you normally would write at the command line to the file.

[om-yousif]

thanks Joacim Andersson

i followed what u wrote it works but i have another problem as i said before

[Joacim Andersson]

thanks Joacim Andersson

i followed what u wrote it works but i have another problem as i said before

Yes, I see that you've edited your earlier post .

If I understand you correctly you want to show the common Open dialog box and let the user select an infile, is this correct? If so you should add the Common Dialog Control to your Form. Click Project > Components and check the Microsoft Common Dialog Control to add it to your toolbox. You can now draw one on your Form and use code simular to the following to let the user select a file (does this file have a particular file extension?).

On Error Resume Next
With CommonDialog1
    .CancelError = True ' You can also set this property during design time
    .Flags = cdlOFNFileMustExist + cdlOFNHideReadOnly
    .Filter = "Text files|*.txt|All Files|*.*" 'change the *.txt part to the extension you are using
    .ShowOpen
    If Err.Number <> cdlCancel Then
        'the user did [b]not[/b] press the cancel button
        MsgBox .FileName
    End If
End With

The above code will show the Open dialog box and then show a MsgBox with the selected filename. You want to change the MsgBox call and instead write this information to your BAT file.

[om-yousif]

yes i did this step

what i mean is how can i change the file name in the cade that will be in BAT file ?????

[Joacim Andersson]

You need to recreate the bat file each time. And instead of writing:

Print #1, "perl -w AraMorph.pl < infile.txt > outfile.txt"

to the file you will write:

Print #1, "perl -w AraMorph.pl < "[b] & CommonDialog1.FileName & [/b]" > outfile.txt"

[om-yousif]

thats it

thanks alot

[MartinLiss]

Now that we've helped you, you can help us by pulling down the Thread Tools menu and clicking the Mark Thread Resolved button which will let everyone know that you have your answer.