Åben C# program og send string til programmet.

Du ku la programmet modtage kommandolinje argumenter. Se fx: http://msdn.microsoft.com/en-us/library/aa288457(v=vs.71).aspx

Det er en windows form applikation. Eksemplet er til consol-applikationer. Kan man gøre noget tilsvarende med en windows form applikation?

Jeps:
http://www.howtogeek.com/howto/programming/get-command-line-arguments-in-a-windows-forms-application/

@ tjp: OK, så dette er koden til at gøre det
string[] args = Environment.GetCommandLineArgs();

foreach(string arg in args){
// do stuff
}

Men hvordan parse man så nogle argumenter. Som nævnt kalder jeg min .exe-fil fra en Excel-macro. Hvor skal jeg specificere argumenterne?

Desuden, kan man kun parse strings? Hvad hvis jeg gerne vil parse en string og en boolean?

Eksempel på macro der kalder 'AcroRd32.exe' med argumentet 'C:\Program Files\Adobe\Reader 9.0\Reader\plug_ins\Annotations\Stamps\Words.pdf'. Bemærk mellemrum mellem de to:

Private Sub TestAcrobatReader()

    Const strcProgramName As String = _
        "C:\Program Files\Adobe\Reader 9.0\Reader\AcroRd32.exe"
    Const strcFilePath As String = _
        "C:\Program Files\Adobe\Reader 9.0\Reader\plug_ins\" _
        & "Annotations\Stamps\Words.pdf"

    Dim dblProgTaskID As Double
    Dim strPathName As String

    strPathName = strcProgramName & " " & strcFilePath
    dblProgTaskID = Shell(strPathName, vbMaximizedFocus)
    MsgBox "Program Task ID:  " & dblProgTaskID
   
End Sub

Du kan bare overføre booleans som strings, fx "True" eller "false", og konvertere dem i programmet med Convert.ToBoolean eller Boolean.Parse.

Det fungere bare super! Tusind tak!

Lige pt. har jeg også defineret en command line argument inde i C#-projektet's properties. Denne bliver overskrevet når jeg kalder C#-programmet fra VBA-koden, hvilket er det jeg ønsker.

Hvis jeg kører programmet fra min C#-editor (MS Visual C#2010 express), er det dette argument, og selvfølgelig ikke det fra VBA der anvendes, hvilket også er det jeg ønsker.

Men hvis jeg finder exe-filen udenom min editor og udenom VBA, altså via mapper (..\bin\Debug\program.exe), så får jeg bare en fejl: "Program har fundet en fejl og afsluttes". Hvorfor tager den ikke det command line argument jeg har specificeret?

Det er lidt svært at forklare, men håber det giver mening. Det jeg bare forsøger at gøre er, at definere en default command line argument, som så erstattes hvis man specificere andet.

Er det ikke bare at tjekke om det returnerede array fra GetCommandLineArgs() er længere end 0 og hvis ikke, bruge defaultværdierne?

Nå jo. Hvorfor gøre det sværre end det er :o)

Lige et sidste tillægsspørgsmål: Jeg ville gerne anvende en string, som angiver stien på den aktuelle workbook (inkl navnet på filen).

    Dim filePath As String
    filePath = ThisWorkbook.Path

Men overstående returnere ikke navnet på filen, og desuden er stien ikke korrekt når man man parser den til C#, hvis stien indeholder et mellemrum. Har du et løsningsforslag?

Følgende kode får hele stien, som jeg ønsker.

    Dim filePath As String
    filePath = ActiveWorkbook.FullName

Men det er som om, at jeg mangler et " i hver ende af stringen (da stringen indeholder mellemrum).

Og det blev løst på følgende måde:

    filePath = Chr(34) + ActiveWorkbook.FullName + Chr(34)


Tak for hjælpen.

Velbekomme... Det var også omtrent sådan jeg ville løse det sidste. :-)