dim xml as string = API.XML()
dim x as new system.xml.xmldocument
x.loadxml(xml)
dim name as string
name = (x.SelectSingleNode("//recording/@filename1").Value)
console.writeline(name)

Dim szExt As String = ".mp4"
Dim szFolder As String = System.Environment.GetFolderPath(System.Environment.SpecialFolder.MyDocuments) & "\vmixstorage"
Dim szLatestFile As String = ""
Dim dLatestFile As Date = Nothing

dim SetTitle as string = Input.Find("YOURINPUTTITLE").Text("player 1.Text")
dim SetTitle2 as string = Input.Find("YOURINPUTTITLE").Text("player 2.Text")
dim CurrentTitle as string = SetTitle & " vs " & SetTitle2
Dim newName As String = szFolder & "\" & CurrentTitle & ".mp4"

For Each szFile As String In System.IO.Directory.GetFiles(szFolder)
        Dim fi As New System.IO.FileInfo(szFile)
        If fi.Extension = szExt Then
                If fi.LastWriteTime > dLatestFile Then
                    szLatestFile = szFile
                    dLatestFile = fi.LastWriteTime
                End If
        End If
Next
If System.IO.File.Exists(szLatestFile) Then
        File.Move(szLatestFile, newName)
        console.writeline(newName & " has been saved")
End If