在 VB.net 中写入控制台和标准输出

Question

我有一个正在写入控制台的 winform 应用程序，它似乎运行良好。我正在使用这段代码：

AttachConsole(-1)
 Console.Out.WriteLine("Hellow world")
  FreeConsole()

问题是： 如果我从命令行运行应用程序的 exe 文件，并尝试将输出重定向到文件中。这不起作用。 例如：

C:\ > myapp.exe > c:\output.txt

我仍然将输出输出到控制台屏幕（c:\output.txt 文件已创建但为空），但我希望将其保存到 c:\output.txt 出了什么问题？怎么做呢？

非常感谢！

Answer 1

如果您首先检查输出是否被重定向，那么您可以鱼与熊掌兼得。这是一个包含 P/Invoke voodoo 的小帮助器类：

using System;
using System.Runtime.InteropServices;

public static class ConsoleEx {
    public static bool OutputRedirected {
        get { return FileType.Char != GetFileType(GetStdHandle(StdHandle.Stdout)); }
    }
    public static bool InputRedirected {
        get { return FileType.Char != GetFileType(GetStdHandle(StdHandle.Stdin)); }
    }
    public static bool ErrorRedirected {
        get { return FileType.Char != GetFileType(GetStdHandle(StdHandle.Stderr)); }
    }

    // P/Invoke:
    private enum FileType { Unknown, Disk, Char, Pipe };
    private enum StdHandle { Stdin = -10, Stdout = -11, Stderr = -12 };
    [DllImport("kernel32.dll")]
    private static extern FileType GetFileType(IntPtr hdl);
    [DllImport("kernel32.dll")]
    private static extern IntPtr GetStdHandle(StdHandle std);
}

用法：

bool redir = ConsoleEx.OutputRedirected;
if (!redir) AttachConsole(-1);
// etc...

Answer 2

您正在附加到父进程以提供输出，在您的情况下可能是 cmd.exe。父进程的 stdout 流尚未重定向，因此继续在屏幕上显示输出。

我不知道有直接的方法。如果您不调用 AttachConsole，您会发现重定向按预期工作，但当然您会失去拥有控制台窗口的选项。然而，有一个我认为合理的解决方法。

如果您希望输出转到控制台窗口，那么您可以为应用程序提供一个指示此要求的命令行开关，例如

C:\> myapp.exe /console

当 /console 参数存在时，您可以调用 AttachConsole 并且输出将被写入控制台。当此开关不存在时，您不会调用 AttachConsole 并且您将能够将输出重定向到文件。