Hejsan!
Jag undrar om man på nått enkelt sätt kan göra följande i vb:

jag har en fil som heter test.bat, i den filen står det bara:

@echo off
echo hej!

nu undrar jag om jag kan exekvera test.bat och plocka ut returvärdet, tex "hej!".

Hej
Så här kan du göra, vad det nu skall vara bra till :-)

Option Explicit
Private Sub Command1_Click()
Dim ret As Long, FileNum As Long, tmpStr As String
FileNum = FreeFile
Open "C:\test.bat" For Input As #FileNum
Do Until EOF(FileNum)
Line Input #FileNum, tmpStr
If InStr(tmpStr, "echo") Then
If InStr(tmpStr, "@") Then
Else
Exit Do
End If
End If
Loop
Close #FileNum
Label1.Caption = Right$(tmpStr, Len(tmpStr) - 5)
ret = Shell("C:\test.bat", vbMinimizedNoFocus)
End Sub

mvh
Sven

ok jag förklarade nog dåligt.,...

det du gör nu är att öppna filen och läser av i den....
jag vill få ut värdet den själv spottar ut....

om jag startar tex "aaaaaaa.exe" så får jag <code>"aaaaaa är inget internt kommando..."</code>

det är tex detta jag vill hämta ut....går de?

skriv

Shell("program >utfil.txt")

och öppna utfil.txt.
Du bör nog ta bort filen efteråt också.
Fråga mer om du vill veta andra sätt.

/Niklas Jansson

Du kan givetvis göra som de andra har svarat, annars kan du göra såhär:
http://www.msjogren.net/dotnet/eng/samples/vb6_cmdoutput.asp

/Johan

Tackar Johan.... det va presix det jag letade efter.....