JetBrains 2022 激活跳过

ja-netfilter.jar https://github.com/ja-netfilter/ja-netfilter

 https://zhile.io/2021/11/29/ja-netfilter-javaagent-lib.html

 

先使用账户登录,然后更改HOST

# 更改Host 文件

0.0.0.0 account.jetbrains.com
0.0.0.0 www.jetbrains.com
0.0.0.0 jetbrains.com
0.0.0.0 www-weighted.jetbrains.com
0.0.0.0 entry.prod-eu.w3jbcom.aws.intellij.net

# 使用 ide-eval-resetter-2.3.5 进行破解

https://files.cnblogs.com/files/Areas/ide-eval-resetter-2.3.5.zip

 

# reset_jetbrains_eval_windows.vbs

Set oShell = CreateObject("WScript.Shell")
Set oFS = CreateObject("Scripting.FileSystemObject")
sHomeFolder = oShell.ExpandEnvironmentStrings("%USERPROFILE%")
sJBDataFolder = oShell.ExpandEnvironmentStrings("%APPDATA%") + "\JetBrains"

Set re = New RegExp
re.Global     = True
re.IgnoreCase = True
re.Pattern    = "\.?(IntelliJIdea|GoLand|CLion|PyCharm|DataGrip|RubyMine|AppCode|PhpStorm|WebStorm|Rider).*"

Sub removeEval(ByVal file, ByVal sEvalPath)
    bMatch = re.Test(file.Name)
    If Not bMatch Then
        Exit Sub
    End If

    If oFS.FolderExists(sEvalPath) Then
        oFS.DeleteFolder sEvalPath, True 
    End If
End Sub

If oFS.FolderExists(sHomeFolder) Then
    For Each oFile In oFS.GetFolder(sHomeFolder).SubFolders
        removeEval oFile, sHomeFolder + "\" + oFile.Name + "\config\eval"
    Next
End If

If oFS.FolderExists(sJBDataFolder) Then
    For Each oFile In oFS.GetFolder(sJBDataFolder).SubFolders
        removeEval oFile, sJBDataFolder + "\" + oFile.Name + "\eval"
    Next
End If

MsgBox "done"

 

posted @ 2022-03-06 12:21  Areas  阅读(1249)  评论(0编辑  收藏  举报