无忧启动论坛

标题: 爱 地 爱 姆 激 活 鸡,拿回家吧,同学们! [打印本页]

作者: tt911    时间: 2024-3-25 08:56
标题: 爱 地 爱 姆 激 活 鸡,拿回家吧,同学们!
本帖最后由 tt911 于 2024-3-25 09:38 编辑

还是分享一下吧。




}

    foreach ($lockedKey in $lockedKeys) {
        $leafValue = Split-Path -Path $lockedKey.TargetObject -Leaf
        $finalValues += $leafValue
        Write-Output "$leafValue - Found Locked Key"
    }

    if ($subKeys -eq $null) {
        continue
        }
        
        $subKeysToExclude = "LocalServer32", "InProcServer32", "InProcHandler32"

    $filteredKeys = $subKeys | Where-Object { !($_.GetSubKeyNames() | Where-Object { $subKeysToExclude -contains $_ }) }

    foreach ($key in $filteredKeys) {
        $fullPath = $key.PSPath
        $keyValues = Get-ItemProperty -Path $fullPath -ErrorAction SilentlyContinue
        $defaultValue = $keyValues.PSObject.Properties | Where-Object { $_.Name -eq '(default)' } | Select-Object -ExpandProperty Value

        if (($defaultValue -match "^\d+[        DISCUZ_CODE_0        ]quot;) -and ($key.SubKeyCount -eq 0)) {
            $finalValues += $($key.PSChildName)
            Write-Output "$($key.PSChildName) - Found Digit In Default and No Subkeys"
            continue
        }
        if (($defaultValue -match "\+|=") -and ($key.SubKeyCount -eq 0)) {
            $finalValues += $($key.PSChildName)
            Write-Output "$($key.PSChildName) - Found + or = In Default and No Subkeys"
            continue
        }
        $versionValue = Get-ItemProperty -Path "$fullPath\Version" -ErrorAction SilentlyContinue | Select-Object -ExpandProperty '(default)' -ErrorAction SilentlyContinue
        if (($versionValue -match "^\d+[        DISCUZ_CODE_0        ]quot;) -and ($key.SubKeyCount -eq 1)) {
            $finalValues += $($key.PSChildName)
            Write-Output "$($key.PSChildName) - Found Digit In \Version and No Other Subkeys"
            continue
        }
        $keyValues.PSObject.Properties | ForEach-Object {
            if ($_.Name -match "MData|Model|scansk|Therad") {
                $finalValues += $($key.PSChildName)
                Write-Output "$($key.PSChildName) - Found MData Model scansk Therad"
                continue
            }
        }
        if (($key.ValueCount -eq 0) -and ($key.SubKeyCount -eq 0)) {
            $finalValues += $($key.PSChildName)
            Write-Output "$($key.PSChildName) - Found Empty Key"
            continue
        }
    }
}

$finalValues = @($finalValues | Select-Object -Unique)

if ($finalValues -ne $null) {
    Write-Host
    if ($lockKey -ne $null) {
        Write-Host "Locking IDM CLSID Registry Keys..."
    }
    if ($deleteKey -ne $null) {
        Write-Host "Deleting IDM CLSID Registry Keys..."
    }
    Write-Host
} else {
    Write-Host "IDM CLSID Registry Keys are not found."
        Exit
}

if (($finalValues.Count -gt 20) -and ($toggle -ne $null)) {
        $lockKey = $null
        $deleteKey = 1
    Write-Host "The IDM keys count is more than 20. Deleting them now instead of locking..."
        Write-Host
}

function Take-Permissions {
    param($rootKey, $regKey)
    $AssemblyBuilder = [AppDomain]::CurrentDomain.DefineDynamicAssembly(4, 1)
    $ModuleBuilder = $AssemblyBuilder.DefineDynamicModule(2, $False)
    $TypeBuilder = $ModuleBuilder.DefineType(0)

    $TypeBuilder.DefinePInvokeMethod('RtlAdjustPrivilege', 'ntdll.dll', 'Public, Static', 1, [int], @([int], [bool], [bool], [bool].MakeByRefType()), 1, 3) | Out-Null
    9,17,18 | ForEach-Object { $TypeBuilder.CreateType()::RtlAdjustPrivilege($_, $true, $false, [ref]$false) | Out-Null }

    $SID = New-Object System.Security.Principal.SecurityIdentifier('S-1-5-32-544')
    $IDN = ($SID.Translate([System.Security.Principal.NTAccount])).Value
    $Admin = New-Object System.Security.Principal.NTAccount($IDN)

    $everyone = New-Object System.Security.Principal.SecurityIdentifier('S-1-1-0')
    $none = New-Object System.Security.Principal.SecurityIdentifier('S-1-0-0')

    $key = [Microsoft.Win32.Registry]::$rootKey.OpenSubKey($regkey, 'ReadWriteSubTree', 'TakeOwnership')

    $acl = New-Object System.Security.AccessControl.RegistrySecurity
    $acl.SetOwner($Admin)
    $key.SetAccessControl($acl)

    $key = $key.OpenSubKey('', 'ReadWriteSubTree', 'ChangePermissions')
    $rule = New-Object System.Security.AccessControl.RegistryAccessRule($everyone, 'FullControl', 'ContainerInherit', 'None', 'Allow')
    $acl.ResetAccessRule($rule)
    $key.SetAccessControl($acl)

    if ($lockKey -ne $null) {
        $acl = New-Object System.Security.AccessControl.RegistrySecurity
        $acl.SetOwner($none)
        $key.SetAccessControl($acl)

        $key = $key.OpenSubKey('', 'ReadWriteSubTree', 'ChangePermissions')
        $rule = New-Object System.Security.AccessControl.RegistryAccessRule($everyone, 'FullControl', 'Deny')
        $acl.ResetAccessRule($rule)
        $key.SetAccessControl($acl)
    }
}

foreach ($regPath in $regPaths) {
    if (($regPath -match "HKEY_USERS") -and ($HKCUsync -ne $null)) {
        continue
    }
    foreach ($finalValue in $finalValues) {
        $fullPath = Join-Path -Path $regPath -ChildPath $finalValue
        if ($fullPath -match 'HKCU:') {
            $rootKey = 'CurrentUser'
        } else {
            $rootKey = 'Users'
        }

        $position = $fullPath.IndexOf("\")
        $regKey = $fullPath.Substring($position + 1)

        if ($lockKey -ne $null) {
            if (-not (Test-Path -Path $fullPath -ErrorAction SilentlyContinue)) { New-Item -Path $fullPath -Force -ErrorAction SilentlyContinue | Out-Null }
            Take-Permissions $rootKey $regKey
            try {
                Remove-Item -Path $fullPath -Force -Recurse -ErrorAction Stop
                Write-Host -back 'DarkRed' -fore 'white' "Failed - $fullPath"
            }
            catch {
                Write-Host "Locked - $fullPath"
            }
        }

        if ($deleteKey -ne $null) {
            if (Test-Path -Path $fullPath) {
                Remove-Item -Path $fullPath -Force -Recurse -ErrorAction SilentlyContinue
                if (Test-Path -Path $fullPath) {
                    Take-Permissions $rootKey $regKey
                    try {
                        Remove-Item -Path $fullPath -Force -Recurse -ErrorAction Stop
                        Write-Host "Deleted - $fullPath"
                    }
                    catch {
                        Write-Host -back 'DarkRed' -fore 'white' "Failed - $fullPath"
                    }
                }
                else {
                    Write-Host "Deleted - $fullPath"
                }
            }
        }
    }
}
:regscan:

::========================================================================================================================================

:_color

if %_NCS% EQU 1 (
echo %esc%[%~1%~2%esc%[0m
) else (
%psc% write-host -back '%1' -fore '%2' '%3'
)
exit /b

:_color2

if %_NCS% EQU 1 (
echo %esc%[%~1%~2%esc%[%~3%~4%esc%[0m
) else (
%psc% write-host -back '%1' -fore '%2' '%3' -NoNewline; write-host -back '%4' -fore '%5' '%6'
)
exit /b

::========================================================================================================================================
:: Leave empty line below

[/code]
[/hide]


作者: 小歌    时间: 2024-3-25 08:57
厉害了
作者: dmq666    时间: 2024-3-25 09:00
谢谢分享
作者: 语之男    时间: 2024-3-25 09:01
谢谢
作者: 蓉城1998    时间: 2024-3-25 09:01

谢谢分享
作者: dony2006    时间: 2024-3-25 09:01
谢谢分享
作者: 紧急追踪    时间: 2024-3-25 09:02
感谢分享,虽然没有看懂啥意思
作者: longfei998    时间: 2024-3-25 09:02
哈哈,看看
作者: 爱打瞌睡    时间: 2024-3-25 09:02
谢谢分享
作者: capms    时间: 2024-3-25 09:03
谢谢分享
作者: yynq    时间: 2024-3-25 09:03
谢谢分享
作者: yxc51    时间: 2024-3-25 09:03
谢谢分享
作者: 幸运的草    时间: 2024-3-25 09:03
啥东东?这么神秘!
作者: chinaqq    时间: 2024-3-25 09:03
谢谢分享
作者: cjsaima    时间: 2024-3-25 09:04
是什么用呢?
作者: 清理员    时间: 2024-3-25 09:05
这个不错哦,多谢分享!
作者: longtengshy    时间: 2024-3-25 09:05
本帖最后由 longtengshy 于 2024-3-25 09:08 编辑

什么东东?
作者: danielxuan    时间: 2024-3-25 09:05
还不知道是什么?
作者: netfood    时间: 2024-3-25 09:06
谢谢分享
作者: dayeye    时间: 2024-3-25 09:06
谢谢分享
作者: lzw2004    时间: 2024-3-25 09:07
感谢分享。。。。。
作者: fzkfqzz    时间: 2024-3-25 09:07
谢谢分享

作者: icdmain    时间: 2024-3-25 09:07
反弹不?

作者: fanet    时间: 2024-3-25 09:08
感谢分享,留名收藏。
作者: hbwgz2009    时间: 2024-3-25 09:08
本帖最后由 hbwgz2009 于 2024-3-25 09:09 编辑

这这个是什么用处呢。有高手说一下嘛。没听说过
作者: 流萤逐雪    时间: 2024-3-25 09:09
能激活吗?用工具激活容易反弹
作者: hainanyingcong    时间: 2024-3-25 09:10
谢谢分享
作者: leaguer    时间: 2024-3-25 09:10
参与围观
作者: yyz2191958    时间: 2024-3-25 09:11
谢谢分享
作者: lizhh    时间: 2024-3-25 09:12
谢谢分享
作者: wwft    时间: 2024-3-25 09:12
什么东西?
作者: rayallens    时间: 2024-3-25 09:12
厉害了
作者: diaoyu    时间: 2024-3-25 09:13
什么东西,谢谢
作者: zlq_hysy    时间: 2024-3-25 09:13
激活剂?kankan看看
作者: CYBERLONER    时间: 2024-3-25 09:15
不错,爱的牧是什么
作者: jian8h    时间: 2024-3-25 09:15
谢分享谢分享
作者: pkllly    时间: 2024-3-25 09:18
谢谢分享
作者: boboli2020    时间: 2024-3-25 09:19
啥了?
作者: hlccfu    时间: 2024-3-25 09:19
感谢分享,楼主金枪不倒
作者: JJTXGT    时间: 2024-3-25 09:19
666

作者: yqm    时间: 2024-3-25 09:19
现在都是说暗语的吗?
作者: 人海看客    时间: 2024-3-25 09:20
爱地姆激活鸡,拿回家吧,同学们!
作者: smartcowboy    时间: 2024-3-25 09:20
来看看是什么东西
作者: zjl6634    时间: 2024-3-25 09:21
谢谢分享
作者: lvmenbo    时间: 2024-3-25 09:22
谢谢分享
作者: xiejiyes    时间: 2024-3-25 09:22
啥工具好用么
作者: yuguotqing    时间: 2024-3-25 09:23
感谢分享
作者: hs_32    时间: 2024-3-25 09:23
看看是啥好东东
作者: xuhao49    时间: 2024-3-25 09:25
谢谢分享
作者: makiwu    时间: 2024-3-25 09:25
谢谢分享
作者: karatesi    时间: 2024-3-25 09:25
爱地姆?看了半天才反应过来是啥
作者: MOOMS    时间: 2024-3-25 09:26
什麼碗糕
作者: 518hl    时间: 2024-3-25 09:27
啥东东啊
作者: pptt    时间: 2024-3-25 09:28
看看是什么,这么神秘
作者: emfyq    时间: 2024-3-25 09:28
很厉害的集火吗
作者: gander6    时间: 2024-3-25 09:29
本帖最后由 gander6 于 2024-3-25 09:30 编辑

啥东西?
作者: x光人    时间: 2024-3-25 09:29

谢谢分享
作者: haook    时间: 2024-3-25 09:29
谢谢分享
作者: junqd    时间: 2024-3-25 09:29
感谢分享,虽然没懂
作者: reninhouse    时间: 2024-3-25 09:29
感谢分享
作者: wangsugertang    时间: 2024-3-25 09:30
看看你学习
作者: reninhouse    时间: 2024-3-25 09:30
longtengshy 发表于 2024-3-25 09:05
什么东东?

IDM激活
作者: zxysanyou    时间: 2024-3-25 09:31
看看 学习学习
作者: sun4008    时间: 2024-3-25 09:31
感谢分享鸡
作者: dkzzlf    时间: 2024-3-25 09:33
是什么?
作者: zhenghui    时间: 2024-3-25 09:33
这是啥、看名字都没理解是什么东西
作者: yuanjianxiong    时间: 2024-3-25 09:34
感谢分享,虽然没有看懂啥意思
作者: aakk    时间: 2024-3-25 09:35
回复看看

作者: wh008    时间: 2024-3-25 09:36
看看,谢谢啦。
作者: tjximu    时间: 2024-3-25 09:36
666
作者: 20121666    时间: 2024-3-25 09:37
没有看懂啥意思
作者: luanqh    时间: 2024-3-25 09:37
谢谢分享!
作者: meteorsun    时间: 2024-3-25 09:37
哈哈  笑死  这名字取的
作者: 心无痕    时间: 2024-3-25 09:38
我来看看是个什么神秘东东!!!!
作者: it323    时间: 2024-3-25 09:40
表面上知道是jh之类,谢谢老师分享!
作者: jiujiu    时间: 2024-3-25 09:41
辛苦了
作者: 2012zcsh    时间: 2024-3-25 09:41
谢谢分享。
作者: haiuyan    时间: 2024-3-25 09:43
什么东东呢?看看再说

作者: 未完成的歌    时间: 2024-3-25 09:43
感谢楼主分享的内容!
作者: artedu    时间: 2024-3-25 09:43
这个是啥
作者: ly2389    时间: 2024-3-25 09:44
还不知道是什么?
作者: ltmu    时间: 2024-3-25 09:44
谢谢分享
作者: ding8067    时间: 2024-3-25 09:45
看看是啥
作者: zhangzpyc    时间: 2024-3-25 09:45
谢谢分享!
作者: pbmmm    时间: 2024-3-25 09:45
感谢分享
作者: likeyouli    时间: 2024-3-25 09:46
看看隐藏了啥,,
作者: yinxinxin    时间: 2024-3-25 09:46
谢谢分享
作者: xtqiaoyu    时间: 2024-3-25 09:46
看一下是什么东东,谢谢
作者: sfq007    时间: 2024-3-25 09:46
感谢楼主分享!                     
作者: xiaogui2018    时间: 2024-3-25 09:48
谢谢分享
作者: gutaiping2006    时间: 2024-3-25 09:50
支持最新版?
作者: zds1210    时间: 2024-3-25 09:50
什么东西?
作者: ccwxcc_xnzx    时间: 2024-3-25 09:50
我是来看看的。
作者: whyy    时间: 2024-3-25 09:51
谢谢分享
作者: 苦橙汁    时间: 2024-3-25 09:51
不知道是什么东东?但还是谢谢分享!
作者: surry100    时间: 2024-3-25 09:52
感谢激 活 鸡
作者: churbon    时间: 2024-3-25 09:52
看看啥好东东!
作者: 2012andyle113    时间: 2024-3-25 09:56
更新了什么玩意
作者: yanglinman    时间: 2024-3-25 09:56
看看什么东东,感谢分享!
作者: dmgy    时间: 2024-3-25 09:56
围观




欢迎光临 无忧启动论坛 (http://bbs.wuyou.net/) Powered by Discuz! X3.3