有关在VB中调用ReadFile的问题
louyq 2003-10-20 11:45:12 我在VB中通过CreateProcess来执行调用.NET的vbc.exe编译程序,然后想通过ReadFile来获取编译的结果信息。但是每当我调用后者时,程序就会连同我的vb程序一起关掉,请大家帮帮忙!
谢谢!
我的程序是:
sa.nLength = Len(sa)
sa.bInheritHandle = True
ret = CreatePipe(hReadPipe, hWritePipe, sa, 0)
start.cb = Len(start)
start.dwFlags = STARTF_USESTDHANDLES Or STARTF_USESHOWWINDOW start.hStdOutput = hWritePipe
start.hStdError = hWritePipe
start.wShowWindow = SW_HIDE
ret = CreateProcess(vbNullString, sCmdline, sa, sa, True,
NORMAL_PRIORITY_CLASS, 0&, vbNullString, start, proc)
sBuffer = String(256, Chr$(0))
Do
ret = ReadFile(hReadPipe, sBuffer, 256, lngBytesRead, ByVal 0&)
sOutput = sOutput & Left$(sBuffer, lngBytesRead)
Loop While ret <> 0