[Help] Quick Combat Arms start [solved]

Posts 1–11 of 11 · Page 1 of 1
[Help] Quick Combat Arms start [solved]
ok me dont know anything bout this but is there a simple way where i can make where i login to a form an i make button where combat arms starts ? thanks
Is this another one of your threads where you ask for help, but instead you say it's wrong?

And to answer your question.

Process.Start(PATH + "Engine.exe")

Path being the path of your Combat Arms folder and Engine.exe being the process which starts Combat Arms.
Erinador, you know very well that won't work..
Quote Originally Posted by user782106 View Post
Erinador, you know very well that won't work..
Why wouldn't it work ;l
Direct-Method..?

[highlight=vb.net]Private Sub StartCombatArms()
Dim gameFolder As String = My.Computer.Registry.LocalMachine.OpenSubKey("SOFT WARE\Nexon\Combat Arms\Ver_US").GetValue("RootPath")
If String.IsNullOrEmpty(gameFolder) Then gameFolder = My.Computer.Registry.LocalMachine.OpenSubKey("SOFT WARE\Wow6432Node\Nexon\Combat Arms\Ver_US").GetValue("RootPath")
If String.IsNullOrEmpty(gameFolder) Then
MsgBox("Could not find game path!", MsgBoxStyle.Exclamation, "Erm..")
Exit Sub
End If
Dim directGameStart As String = gameFolder & "\CombatArms_Direct.exe"
Process.Start(directGameStart)
End Sub[/highlight]

WebBrowser Method (You need a WebBrowser control and 2 Text Boxes):
[highlight=vb.net]Dim CAUsername, CAPassword As String
Private Sub StartCombatArmsBrowser() 'You call this
CAUsername = TextBox1.Text
CAPassword = TextBox2.Text
WebBrowser1.ScriptErrorsSuppressed = True
WebBrowser1.Navigate("http://combatarms.nexon.net/")
End Sub

Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEv entArgs) Handles WebBrowser1.DocumentCompleted
If WebBrowser1.Url.ToString = "http://combatarms.nexon.net/" Then
WebBrowser1.Navigate("javascript:NxLaunchGameMain( )")
ElseIf WebBrowser1.Url.ToString = "http://passport.nexon.net/Login.aspx" Then
WebBrowser1.Document.GetElementById("txtId").SetAt tribute("value", CAUsername)
WebBrowser1.Document.GetElementById("txtPassword") .SetAttribute("value", CAPassword)
WebBrowser1.Document.GetElementById("btnLogin").In vokeMember("click")
End If
End Sub[/highlight]

All credits to me. /me
Have you ever tried running engine.exe by itself?
Running Engine.exe doesn't do anything. You start the game through the webbrowser or through CombarArms_Direct.exe
Or you just do this:

[highlight=vb.net] Dim myStr As String
Try
If Environment.GetEnvironmentVariable("PROCESSOR_ARCH ITECTURE") = "AMD64" Then
myStr = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\ SOFTWARE\Wow6432Node\Nexon\Combat Arms\Ver_US", "RootPath", "")
Else
myStr = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\ SOFTWARE\Nexon\Combat Arms\Ver_US", "RootPath", "")
End If
Process.Start(myStr & "\Engine.exe", "-windowtitle ""CombatArms"" -rez Engine.REZ -rez Game -authip 208.85.111.14 -authport 10001 -pcroom 0 -UserId ")
Catch ex As *********enceException
Dim result As String = InputBox("Unable to find the install location of CA, please type in your CA folder location below.", "Error: Unable to find install path", "xxx")
If result <> "xxx" Then
Process.Start(result & "\Engine.exe", "-windowtitle ""CombatArms"" -rez Engine.REZ -rez Game -authip 208.85.111.14 -authport 10001 -pcroom 0 -UserId ")
End If
End Try[/highlight]
thanks guys i didnt know i how to do this an the other thread u guys where wrong i didnt need invaild code there
Marked solved.
@Jason, can you add this code to the snippets if it already isn't there? Thanks.
Posts 1–11 of 11 · Page 1 of 1
This thread is closed for replies.

Tags for this Thread

None

Talk with us