Problem z Instalatorem (Unzip)

[Intern]

Witam, potrzebuję pomocy z instalatorem w programie.

 

Jeśli w archiwum Update.zip jest program.exe (w którym jest instalator jako jeden z form) a drugi plik to Ionic.Zip.dll do unzipa to pojawia się błąd, ponieważ instalator chce podmienić aktualnie używane procesy(pliki).

Co zrobić aby dało się zaktualizować pliki z archiwum .zip a potem ewentualnie program się restartował i podmieniał te .exe i .dll na te z Update.zip (wolał bym to zrobić w jednej aplikacji aby nie robić osobnego updatera).

 

Dołączę screena z błędem ale wiem na czym on polega.

 

[Crossiik]

Zrób zewnętrzny updater, drugą aplikację która będzie się odpalała, podmieniała, otwierała nową apkę i sama się zamykała.

[Intern]

Zrób zewnętrzny updater, drugą aplikację która będzie się odpalała, podmieniała, otwierała nową apkę i sama się zamykała.

 

Właśnie problem w tym że wolałbym aby to było w jednej aplikacji .

[Crossiik]

Też kiedyś próbowałem zrobić coś w tym stylu. Jednal nie uda ci się podmienić działającego pliku.

[Intern]

Też kiedyś próbowałem zrobić coś w tym stylu. Jednal nie uda ci się podmienić działającego pliku.

 

 

Ok dobra, a jak zrobić by np. gdy klikam LPM w grze to naciskało mi literę E?

 

 

Mam coś takiego ale musze mieć zaznaczone okno programu aby dało się aktywować bota (f6) i aby dało się wciskać Lbutton też (i tylko wtedy go aktywuje i pisze to E)

Co zrobić aby nawet zminimalizowany/ukryty pod grą program sprawdzał czy wcisnę F6/LPM?

 

    Private Sub Hack3_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        If e.KeyCode = Keys.F6 Then
            If Hack1 = 0 Then
                Hack1 = 1
                Label7.Text = "Włączony"
                Label7.ForeColor = Color.Lime
            Else
                Hack1 = 0
                Label7.Text = "Wyłączony"
                Label7.ForeColor = Color.Red
            End If
        End If
 
        If Hack1 >= 1 Then
            If e.KeyCode = Keys.LButton Then
                SendKeys.Send("{e}")
            End If
        End If
 
    End Sub

[Intern]

 

Ok dobra, a jak zrobić by np. gdy klikam LPM w grze to naciskało mi literę E?

 

 

Mam coś takiego ale musze mieć zaznaczone okno programu aby dało się aktywować bota (f6) i aby dało się wciskać Lbutton też (i tylko wtedy go aktywuje i pisze to E)

Co zrobić aby nawet zminimalizowany/ukryty pod grą program sprawdzał czy wcisnę F6/LPM?

    Private Sub Hack3_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        If e.KeyCode = Keys.F6 Then
            If Hack1 = 0 Then
                Hack1 = 1
                Label7.Text = "Włączony"
                Label7.ForeColor = Color.Lime
            Else
                Hack1 = 0
                Label7.Text = "Wyłączony"
                Label7.ForeColor = Color.Red
            End If
        End If
 
        If Hack1 >= 1 Then
            If e.KeyCode = Keys.LButton Then
                SendKeys.Send("{e}")
            End If
        End If
 
    End Sub

 

Ref.

 

 

Też kiedyś próbowałem zrobić coś w tym stylu. Jednal nie uda ci się podmienić działającego pliku.

 

Poradziłem sobie z głównym problemem już podmienia prawidłowo. Został ten problem wyżej.

 

@Edit jeszcze jedno.

 

Co zrobić aby form był w prawym dolnym rogu na każdej rozdzielczości?

[Intern]

ref

[tubady123]

Globalny odczyt hotkeysów możesz zrobić za pomocą funkcji winapi "GetAsyncKeyState" z biblioteki user32.

[Intern]

Globalny odczyt hotkeysów możesz zrobić za pomocą funkcji winapi "GetAsyncKeyState" z biblioteki user32.

 

Niestety nadal to samo.

[tubady123]

@Intern Nadal to samo, czyli nawet jak zminimalizujesz aplikacje to Ci nie reaguje na hotkeye? Jeśli tak, to źle użyłeś tej funkcji, bo w desktopie powinno na 100% działać.

[Intern]

@tubady123

Public Declare Function GetAsyncKeyState Lib "user32.dll" (ByVal vKey As Integer) As Integer

  Private Sub Hack3_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        If e.KeyCode = Keys.F5 Then
            If aHack1 = 0 Then
                aHack1 = 1
                WMP.URL = "Sounds/on.mp3"
                WMP.controls.play()
                Label7.Text = "Włączony"
                Label7.ForeColor = Color.Lime
            Else
                aHack1 = 0
                Label7.Text = "Wyłączony"
                WMP.URL = "Sounds/off.mp3"
                Label7.ForeColor = Color.Red
            End If
        End If
 
        If aHack1 = 1 Then
            Dim hotkey As Boolean
            hotkey = GetAsyncKeyState(Keys.F6)
            If hotkey = True Then
                WMP.URL = "Sounds/on.mp3"
            End If
        End If
 
    End Sub

1.Dodałem jak widać i zamiast dzwięku było stawianie litery e ale nie wiedzialem czy to dziala bo nic sie nie dzialo i dodałem dzwięk i odtwarza go tylko kiedy mam zaznaczone okno.

2. Nie działa kiedy ustawię jako LButton a np. F6 już działa.

[tubady123]

No bo używasz tej funkcji w zdarzeniu KeyDown, które wymaga focusa formy. Musisz zrobić timer, który cały czas będzie chodził w tle i tam dopiero sprawdzał wciśnięcie klawisza za pomocą funkcji GetAsyncKeyState.

[Intern]

Super dzięki jeden problem z głowy Tylko teraz to MD5. Cls.