想从vb6程序调用函数“_popen”

Question

我尝试从vb6（http://support.microsoft.com/kb/99456/EN-US）调用“_popen”，我没有成功，我试过了：

Private Declare Function "_popen" Lib "msvcrt.dll" () As Long

Sub Main()
  Dim fnum As Integer
  fnum = _popen("netstat -ano", "r")

提前多多谢谢 沃尔夫冈

Answer 1

无论如何，你需要更多的东西，以便从中获得任何实际用途。在VB6程序中，您将要在重定向的StdIO流上执行异步操作。

一种方法是使用ShellPipe控件，请参阅ShellPipe "Shell with I/O Redirection" control。