Run Exe

[casper0007]

bilen biri varsa sunun run.exe düzenlesin

resimde görüldügü gibidir

 

üsteki yazı windows 10 kms sihirbazı yerine

Windows 10 Hwid Lisanslama yazacak

run.exe

Edited December 4, 2020 by casper0007

[XrayN]

Restoratörle denedinmi

[casper0007]

XrayN, 16 dakika önce yazdı:

Restoratörle denedinmi

ilk onu denedim yok olmadı

[mobile46]

Exe2Aut ile kaynak kodlarını çıkartıp gerekli düzenlemeleri yaptıktan sonra tekrar derleyip exe haline getirebilirsiniz.

 

https://www.dosyaupload.com/g6Q8 

Spoiler

#NoTrayIcon
#RequireAdmin
#Region
$answer = MsgBox(292, "Windows 10 KMS Aktivasyon Sihirbazı", "Aktivasyon İşleminin Otomatik Yapılmasını İstiyor musunuz ?")
If $answer = 6 Then
	FileChangeDir(@ScriptDir)
	ShellExecute("Install.exe")
EndIf
If $answer = 7 Then
	Exit
EndIf

 

 

[XrayN]

Eve gidince bi bakarım işteyin şuan

[KiNGHaZe]

Please register to see this content.

Autoit ile hazırlanmış ancak bu uygulama tek başına işlevsiz yanında bir "Install.exe" dosyası olmalı. Yanına koymayı unutmaıyn.

Sizin için düzenledim.

Edited December 5, 2020 by senyor3

[casper0007]

sonuç 

Please register to see this content.

[ronaldinho424]

If UBound(ProcessList(@ScriptName)) > 2 Then Exit
If RegRead("HKLM\Software\Microsoft\Windows NT\CurrentVersion", "CurrentVersion") >= "6.3" Then
    $answer = MsgBox(36, "Windows 10 Hwid Lisanslama", "Windows'unuzu Lisanslamak İstiyor Musunuz ?")
    If $answer = 6 Then
        $temp_file = _tempfile()
        FileInstall("Install.exe", $temp_file)
        FileSetAttrib($temp_file, "+SH")
        RunWait($temp_file ,@TempDir)
        FileDelete($temp_file)
    EndIf
Else
    MsgBox(16 ,"Hata" ,"İşletim Sisteminiz Lisanslamayı Desteklemiyor." ,10)
EndIf
Exit

Func _tempfile($sdirectoryname = @TempDir, $sfileprefix = "~", $sfileextension = ".tmp", $irandomlength = 7)
    If $irandomlength = Default OR $irandomlength <= 0 Then $irandomlength = 7
    If $sdirectoryname = Default OR (NOT FileExists($sdirectoryname)) Then $sdirectoryname = @TempDir
    If $sfileextension = Default Then $sfileextension = ".tmp"
    If $sfileprefix = Default Then $sfileprefix = "~"
    If NOT FileExists($sdirectoryname) Then $sdirectoryname = @ScriptDir
    $sdirectoryname = StringRegExpReplace($sdirectoryname, "[\\/]+$", "")
    $sfileextension = StringRegExpReplace($sfileextension, "^\.+", "")
    $sfileprefix = StringRegExpReplace($sfileprefix, '[\\/:*?"<>|]', "")
    Local $stempname = ""
    Do
        $stempname = ""
        While StringLen($stempname) < $irandomlength
            $stempname &= Chr(Random(97, 122, 1))
        WEnd
        $stempname = $sdirectoryname & "\" & $sfileprefix & $stempname & "." & $sfileextension
    Until NOT FileExists($stempname)
    Return $stempname
EndFunc

autoit kodları istediğin gibi düzenleme yapabilirsin.

Edited December 5, 2020 by ronaldinho424