[VB2005] Problema ridirezionamento stdout

[Il Totem]

Sto cercando di ridirezionare lo standard output di un'applicazione console, eseguita da linea di comando (lame.exe, di Lame Project). Ho trovato degli ottimi esempi in rete, e li ho seguiti confidando che funzionassero. Ahimé, ho sperato invano, perchè non riesco a trovare una motivazione soddisfacente a quello che invece si verifica. Una volta scritto un codice simile a quello proposto su msdn, e avviato correttamente il processo, mi sono accorto che l'evento DataReceived non viene generato affatto, o, al massimo, viene generato una sola volta con e.Data = Nothing. Ho provato anche a togliere WaitForExit ed usare un codice del genere:

Do
    Dim S As String = P.StandardOutput.ReadLine()
    If Not String.IsNullOrEmpty(S) Then
      W.WriteLine(S) 'W è uno stream di testo che uso per vedere se ci sono messaggi
    End If
Until P.HasExited 'P è il Process

Nonostante ciò, non ottengo mai niente, eppure l'output di lame.exe è consistente ed esiste. Qualche suggerimento?

[oregon]

Puoi postare tutto il codice che hai scritto (compresa la creazione del processo) per poterlo provare ?

[Il Totem]

Dato che ora l'ho cancellato, lo riscrivo a memoria:

    Private W As IO.StreamWriter
Private Sub bgConvert_DoWork(ByVal sender As System.Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles bgConvert.DoWork
        Dim Info As ConvertInfo = e.Argument
        Dim Lame As String = Application.StartupPath & "\lame.exe"
        Dim P As Process
        Dim Index As Int32 = 0

        bgConvert.ReportProgress(0, Info.Files.Count)
        For Each File As String In Info.Files
            P = New Process
            P.StartInfo.FileName = Lame
            P.StartInfo.Arguments = Info.Arguments & String.Format("{0}{1}{0} {0}{2}{0}", Chr(34), File, Info.Folder & "\" & IO.Path.GetFileNameWithoutExtension(File) & ".mp3")
            P.StartInfo.UseShellExecute = False
            P.StartInfo.RedirectStandardOutput = True
            P.StartInfo.CreateNoWindow = True
            W = New IO.StreamWriter("output.txt")
            AddHandler P.DataReceived, AddressOf Process_DataReceived
            P.Start()
            P.BeginOutputReadLine()
            P.WaitForExit()
            RemoveHandler P.DataReceived, AddressOf Process_DataReceived
            W.Close()
            Index += 1
            bgConvert.ReportProgress(Index, Info.Files.Count)
        Next
    End Sub

    Private Sub Process_DataReceived(ByVal sender As Object, ByVal e As DataReceivedEventArgs)
        W.WriteLine(e.Data)
    End Sub

Grossomodo era questo.

[oregon]

A quanto ho capito, lame usa lo Standard Error ... quindi prova con

P.StartInfo.RedirectStandardError = True
...
AddHandler P.ErrorDataReceived, AddressOf Process_DataReceived
...
P.BeginErrorReadLine()
...
RemoveHandler P.ErrorDataReceived, AddressOf Process_DataReceived

[Il Totem]

Ottimo, così va bene, grazie!

[oregon]

Originariamente inviato da Il Totem
Ottimo, così va bene, grazie!

Di nulla ...