Merhabalar, Unreal Engine 4.27 motoru ile bir güncelleme yayınlamak istiyorum. Patch ve dosya indirmeyi hallettim fakat versiyonu gerçek zamanlı yayınlamayı bulamadım. Basitçe; Şuanki versiyon eşit değilse yeni versiyona güncel değil ise ...." gibi bir sistem. Bunun için bir Cloud Data'ya mı ihtiyacım var? Veya Google Drive'da versiyonu yayınlayıp UE ile eşitleyebilir miyim?

Hosting lazım sana. Dosyaları barındırabileceğin bir cloud host. Bir metin belgesi lazım adı versiyon olan.

Daha sonra Visual Basic ve ya türevi bir dille programı yaz. Sunucuya bağlansın metin belgesini okusun sendeki versiyon 3 mesela , eğer o metin belgesindeki versiyon ile seninki eşleşmiyorsa oradakini indirsin. Daha sonra orayı 4 yaparsan onu indirecektir. Daha sonra 5 yaparsan yine indirir. Program başlangıçta güncellemeyi kontrol eder ona göre devam edersin. Drive ile sıkıntı oluyor ben denedim zamanında. Ama yap başlangıç için Drivede kabul edilebilir, işler büyürse kendi platformunu kurman gerekir.

Drive üzerinden gelen mesajlara göre mesaj atmayı sağlayan bir mesajlaşma uygulaması yapmıştım. Telefondan driveye girip metin belgesine yazı yazıyordum , daha sonra uygulama bunu çekiyordu . Uygulamadan yazılan mesaj ise yine drivedeki metin belgesine gidiyordu. Hatta PC deki bazı şeyleri kontrol edebilyorsun , mesela steamı aç kapa ya da spotify aç kapa gibi. Ekrana uyarı mesajı at gibi. Güncelleştirme olayını yapabilirsin bu şekilde. Ama drivede şöyle bir sorun var bunu kullanacak kişinin drive uygulamasını bilgisayarında kulanması lazım yani drive akış klasörüne erişilebilmesi lazım. Dışarıdan okuma işlemi nasıl yapılır bilmiyorum.

" Imports System.Net
Imports System.Text
Imports System.IO
Public Class Form1
    Dim controllerlocation As String = "C:\Users\EFE\Google Drive Akışı\Drive'ım\controller.txt"
    Dim messagelocation As String = "C:\Users\EFE\Google Drive Akışı\Drive'ım\message.txt"
    Dim messagereceive As String = My.Computer.FileSystem.ReadAllText("C:\Users\EFE\Google Drive Akışı\Drive'ım\message.txt")
    Dim controlcommand As String = My.Computer.FileSystem.ReadAllText("C:\Users\EFE\Google Drive Akışı\Drive'ım\controller.txt")
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True).SetValue(Application.ProductName, Application.ExecutablePath)
        MessageBox.Show("Running.")
        Timer1.Enabled = True
        Timer1.Start()
        Timer2.Enabled = True
        Timer2.Start()

        Timer3.Enabled = True
        Timer3.Start()

    End Sub

    Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
        e.Cancel = True

    End Sub

    Private Sub Form1_FormClosed(sender As Object, e As FormClosedEventArgs) Handles MyBase.FormClosed

    End Sub

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        If File.ReadAllText("C:\Users\EFE\Google Drive Akışı\Drive'ım\controller.txt").Length.Equals(0) Then



        Else
            If File.ReadAllText("C:\Users\EFE\Google Drive Akışı\Drive'ım\controller.txt").Contains("Killsteam") Then

                File.WriteAllText("C:\Users\EFE\Google Drive Akışı\Drive'ım\controller.txt", "")


                For Each prog As Process In Process.GetProcesses
                    If prog.ProcessName = "steam" Then
                        prog.Kill()
                    End If
                Next

                If File.ReadAllText("C:\Users\EFE\Google Drive Akışı\Drive'ım\controller.txt").Contains("Killchrome") Then
                    File.WriteAllText("C:\Users\EFE\Google Drive Akışı\Drive'ım\controller.txt", "")

                    For Each prog As Process In Process.GetProcesses
                        If prog.ProcessName = "chrome" Then
                            prog.Kill()
                        Else




                        End If
                    Next

                End If

            End If

            If File.ReadAllText("C:\Users\EFE\Google Drive Akışı\Drive'ım\controller.txt").Contains("Killspotify") Then

                File.WriteAllText("C:\Users\EFE\Google Drive Akışı\Drive'ım\controller.txt", "")

                For Each prog As Process In Process.GetProcesses
                    If prog.ProcessName = "Spotify" Then
                        prog.Kill()
                    End If
                Next
            End If

        End If

    End Sub

    Private Sub Timer2_Tick(sender As Object, e As EventArgs) Handles Timer2.Tick
        If File.ReadAllText("C:\Users\EFE\Google Drive Akışı\Drive'ım\message.txt").Length.Equals(0) Then

        Else

            adminmsg.Show()


        End If
    End Sub

    Private Sub Timer3_Tick(sender As Object, e As EventArgs) Handles Timer3.Tick
        Timer1.Enabled = True
        Timer1.Start()
        Timer2.Enabled = True
        Timer2.Start()
        Timer3.Stop()
    End Sub
End Class
"