Dim processStartInfo = New ProcessStartInfo()
processStartInfo.FileName = Application.StartupPath & "\qbms.exe"
processStartInfo.Arguments = "-o """ & Application.StartupPath & "\extract.txt """ & TextBox1.Text.ToString & " " & TextBox2.Text.ToString
' processStartInfo.WindowStyle = ProcessWindowStyle.Hidden
Process.Start(processStartInfo)
Dim processStartInfo = New ProcessStartInfo()
processStartInfo.FileName = Application.StartupPath & "\qbms.exe"
Dim commandLineString As String = "-o extract.txt " & TextBox1.Text & " " & TextBox2.Text
processStartInfo.Arguments = commandLineString
MsgBox("About to start qbms with params: " & commandLineString)
Process.Start(processStartInfo)
Dim processStartInfo = New ProcessStartInfo()
processStartInfo.FileName = Application.StartupPath & "\qbms.exe"
Dim commandLineString As String = "-o extract.txt " & "levels.pak" & " " & "\new"
processStartInfo.Arguments = commandLineString
MsgBox("About to start qbms with params: " & commandLineString)
Process.Start(processStartInfo)
Dim processStartInfo = New ProcessStartInfo()
processStartInfo.FileName = Application.StartupPath & "\qbms.exe"
Dim commandLineString As String = "-o extract.txt " & TextBox1.Text & " " & TextBox2.Text
processStartInfo.Arguments = commandLineString
MsgBox("About to start qbms with params: " & commandLineString)
Process.Start(processStartInfo)
Dim processStartInfo = New ProcessStartInfo()
processStartInfo.FileName = Application.StartupPath & "\qbms.exe"
Dim commandLineString As String = "-o extract.txt levels.pak \new"
processStartInfo.Arguments = commandLineString
MsgBox("About to start qbms with params: " & commandLineString)
Process.Start(processStartInfo)
Dim str1 As String = "C:\users\Buckau\Desktop\aaa\bbb\file.ext"
Dim lastIndx As Int32 = str1.LastIndexOf("\"c)
Dim stringEnd As String = str1.Substring(lastIndx + 1)
MsgBox(stringEnd)
Now for the .BMD editing algorithms
Thanks abuckau907! And also you Biesi :3