Programmieren - alles kontrollieren 4.934 Themen, 20.613 Beiträge

Verfolgung starten Optionen

Wie kann ich mit Visual Basic 6.0 Spiele starten (z.b. Quake

X-TRO / 19 Antworten / Flachansicht Nickles

Irgendwie bekomme ich es nicht auf der Reihe mit Visual Basic 6.0, Externe Programme wie z.b Quake, Half-Life und Konsorten zu starten!
Ich bin noch Anfänger also dürft Ihr mir diese Frage nicht übel nehmen :-)
Ein Beispiel wie ich es versucht habe:

Private Sub Command1_Click()
Dim stAppName As String
stAppName = "F:\Spiele\SIERRA\Half-Life\hl.exe"
Call Shell(stAppName, 1)
End Sub

So funktioniert das aber nicht, bekomme dann die Hinweis Meldung "Could not validate Half-Life"
Mein Ziel war eigentlich mir ein Spiele-Menue mit Visual Basic 6.0 zu erstellen wo drunter ich alle meine Externen Games starten kann.

Ich wäre für jegliche Hilfe dankbar!
Ciao

bei Antwort benachrichtigen
vermute das das damit zusammenhaengt das ein start-verzeichnis angegeben ... thomas woelfer
Danke Thomas Woelfer für Deine Hilfe aber wie ist dafür der Code!Ciao X-TRO
Ich hab zwar nur VB 4.0, aber da gehts so:Private Sub Button1_Click chdir F: ... Rotti
Hi Rotti..Schönen Dank erst mal für Deinen Tip! Aber es funktioniert ... X-TRO
Sorry, war mein Fehler!die klammern dürfen da nicht sein!ohne sie müsste ... Rotti
Hi Rotti..Ich habe es diesmal ohne Klammer gemacht und bekam bei den Code ... X-TRO
sonst probier es mal so wie bei deinem ersten beipiel, nur dass du da noch ... Rotti
Hi Rotti,hat leider auch nicht geklappt aber was ja nicht ist, dass kann ja ... X-TRO
Hallo an alle........Mit den Code:Private Sub Command2_Click Index As ... X-TRO
Private Sub Command2_Click Index As Integer Dim stAppName As String chdir ... Rotti
Hallo Rotti.........Bei Dein Code:Private Sub Command2_Click Index As ... X-TRO
Zeigt er dir irgendeine Zeile an, in der der Fehler liegt??? Rotti
X-TRO Rotti „Zeigt er dir irgendeine Zeile an, in der der Fehler liegt???“
Optionen

Ja er zeigt mir folgende Meldung an bei den Code:

Private Sub Command5_Click()

Dim stAppName As String
ChDir "F:\Spiele\Quake III Arena\"
stAppName = "quake3.exe"
Call Shell(stAppName, 1)

End Sub

Die Meldung:
Laufzeitfehler 53
Datei nicht gefunden

Und wen ich den Debuggen starte, wird die Zeile "Call Shell(stAppName, 1)" gelb makiert.

Ich hoffe das sagt Dir was..

Ciao

bei Antwort benachrichtigen
Ich hab bei mir von deinem bsp. nur mal meinen q3a-pfad eingesetz und es ... Rotti
Hi Rottimit welcher VB Version arbeitest Du eigentlich.Ciao X-TRO
4.0, aber das hatte ich irgendwann schon einmal geschrieben ... Rotti
Im Titel der Diskussion steht was von 6.0Ist ja auch ein bisschen neuer als ... Manuel
ich bin kein profi, deswegen:hast du schon versucht ne batch-datei zu ... spike
versuch es mal so:DIM A------------------------------- durchgezogene Linie ... DARKHalf (Anonym)