PureBoard

Verfasst: **21.11.2013 19:51**

Hi Leute,

ich versuche seit einigen Stunden vergeblich die Ausgabe von net.exe in PureBasic einzulesen. Kennt jemand von euch dieses Problem und eventuell eine Lösung?

lg,
SBond

Code: Alles auswählen

; hier erhalte ich eine Ausgabe:
hProgramm = RunProgram("cmd", "/c dir c:\", "", #PB_Program_Open | #PB_Program_Read | #PB_Program_Write | #PB_Program_Hide)
sNachricht.s = ""

If hProgramm  
	While ProgramRunning(hProgramm)
		If AvailableProgramOutput(hProgramm)
			sNachricht + ReadProgramString(hProgramm) + Chr(13)
		EndIf
	Wend
  
	CloseProgram(hProgramm)
	MessageRequester("",sNachricht)
EndIf



; hier nicht :(
hProgramm =  RunProgram("C:\Windows\System32\net.exe", "use Z: \\Computername /user:Username Passwort /PERSISTENT:NO", "C:\Windows\System32\", #PB_Program_Open | #PB_Program_Read | #PB_Program_Write | #PB_Program_Hide)
sNachricht.s = ""

If hProgramm  
	While ProgramRunning(hProgramm)
		If AvailableProgramOutput(hProgramm)
			sNachricht + ReadProgramString(hProgramm) + Chr(13)
		EndIf
	Wend
  
	CloseProgram(hProgramm)
	MessageRequester("",sNachricht)
EndIf

Verfasst: **22.11.2013 02:20**

Nur ein Versuch : Kompiliere in ASCII Modus ?

Verfasst: **22.11.2013 02:36**

eine Ausgabe von net.exe erfolgt grundsätzlich. Kann man hier sehen:

Code: Alles auswählen

hProgramm =  RunProgram("C:\Windows\System32\net.exe", "help", "C:\Window...

@SBond: Was sagt denn "net use ...", wenn Du es normal in der CMD ausführst?

Grüße ... Kiffi

Verfasst: **22.11.2013 20:32**

also kompiliert wird im ASCII-Modus und nicht als Unicode-Exe.

In der normalen Konsole erhalte ich eine Ausgabe, solange ich nicht die Flags: #PB_Program_Open und #PB_Program_Read verwende. Andere Konsolenanwendungen funktionieren problemlos, nur net.exe nicht.

PureBoard

RunProgram() und net.exe -> keine Ausgabe

RunProgram() und net.exe -> keine Ausgabe

Re: RunProgram() und net.exe -> keine Ausgabe

Re: RunProgram() und net.exe -> keine Ausgabe

Re: RunProgram() und net.exe -> keine Ausgabe