最新版 tampermonkey 及 beta 版本下载

chishingchan · 发表于 2020-7-4 17:30:19

本帖最后由 chishingchan 于 2020-7-4 23:31 编辑

Tampermonkey Stable 4.10
Chrome >= 59

https://chrome.google.com/websto ... fjojejmpbldmpobfkfo

Tampermonkey Beta 4.11.6113
Chrome >= 59
https://chrome.google.com/websto ... ebpfijmoaglllgpjagf

没有梯子，帮助上传附件，谢谢！

Tampermonkey_v4.10.zip (1.27 MB, 下载次数: 92)

Tampermonkey-Beta_v4.11.6113.zip (1.26 MB, 下载次数: 76)

远程维护 · 发表于 2020-7-4 18:56:47

谢谢分享正需要论坛因为有你而更精彩

aliaaaa · 发表于 2020-7-4 19:34:03

我之前已经安装4.1，当时是直接添加进chrome的，请问怎么样下载或提取？
关于梯子，我用的是chrome的setupVPN这个扩展。

chishingchan · 发表于 2020-7-4 19:55:56

本帖最后由 chishingchan 于 2020-7-4 23:20 编辑

隐藏于问题中的福利：

Internet Download Manager v6.38 Build 1
http://mirror2.internetdownloadm ... =idman638build1.exe

破解脚本：
idman638build1.vbs （最佳运行时机：idman638build1.exe 安装程序出现完成按钮界面）

'http://mirror2.internetdownloadmanager.com/idman638build1.exe?b=1&filename=idman638build1.exe
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colItems = objWMIService.ExecQuery ("Select * from Win32_OperatingSystem")
For Each objItem in colItems
OSA = objItem.OSArchitecture
Next
Const HKLM = &H80000002
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\default:StdRegProv")
If OSA = "64-bit" Then
oReg.GetStringValue HKLM,"SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\Internet Download Manager","DisplayIcon",DI
oReg.GetStringValue HKLM,"SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\Internet Download Manager","DisplayName",DN
oReg.GetStringValue HKLM,"SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\Internet Download Manager","DisplayVersion",DV
Else
oReg.GetStringValue HKLM,"SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Internet Download Manager","DisplayIcon",DI
oReg.GetStringValue HKLM,"SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Internet Download Manager","DisplayName",DN
oReg.GetStringValue HKLM,"SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Internet Download Manager","DisplayVersion",DV
End If
Set WshShell = CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
If Not objFSO.FileExists(DI) Then
WshShell.Popup "软件可能未安装！",5,"错误",0
WScript.Quit
End If
If DV <> "6.38.1" Then
WshShell.Popup "软件版本不支持！",5,"错误",0
WScript.Quit
End If
Name = Array("IDM1.tmp","IEMonitor.exe","IDMan.exe")
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate,(Debug)}!\\.\root\cimv2")
Set colProcessList = objWMIService.ExecQuery ("Select * from Win32_Process")
For Each objProcess In colProcessList
For Each Process In Name
If LCase(objProcess.Name) = LCase(Process) Then
objProcess.Terminate()
End If
Next
Next
Set ado_stream = CreateObject("ADODB.Stream")
ado_stream.Type = 1
ado_stream.open
ado_stream.LoadFromFile DI
ado_stream.position = 296727
ado_stream.Write HexToByte("00")
ado_stream.position = 393933
ado_stream.Write HexToByte("48C20800")
ado_stream.position = 402033
ado_stream.Write HexToByte("65")
ado_stream.position = 402042
ado_stream.Write HexToByte("EBF4")
ado_stream.position = 426335
ado_stream.Write HexToByte("33")
ado_stream.position = 535404
ado_stream.Write HexToByte("FC")
ado_stream.position = 545835
ado_stream.Write HexToByte("FF")
ado_stream.position = 677168 'No Update
ado_stream.Write HexToByte("C3") '55 -> C3
ado_stream.position = 1095845
ado_stream.Write HexToByte("33")
ado_stream.position = 1163755
ado_stream.Write HexToByte("00")
ado_stream.position = 3267304
ado_stream.Write HexToByte("90")
ado_stream.SaveToFile DI, 2
ado_stream.Close
Set ado_stream = Nothing
If OSA = "64-bit" Then
oReg.CreateKey HKLM,"SOFTWARE\Wow6432Node\Internet Download Manager"
oReg.SetStringValue HKLM,"SOFTWARE\Wow6432Node\Internet Download Manager","Email","e@mail.com"
oReg.SetStringValue HKLM,"SOFTWARE\Wow6432Node\Internet Download Manager","FName","Microsoft"
oReg.SetStringValue HKLM,"SOFTWARE\Wow6432Node\Internet Download Manager","LName","Windows"
oReg.SetStringValue HKLM,"SOFTWARE\Wow6432Node\Internet Download Manager","Serial","DDDDM-DDDDD-DDDDX-DDDDX"
Else
oReg.CreateKey HKLM,"SOFTWARE\Internet Download Manager"
oReg.SetStringValue HKLM,"SOFTWARE\Internet Download Manager","Email","e@mail.com"
oReg.SetStringValue HKLM,"SOFTWARE\Internet Download Manager","FName","Microsoft"
oReg.SetStringValue HKLM,"SOFTWARE\Internet Download Manager","LName","Windows"
oReg.SetStringValue HKLM,"SOFTWARE\Internet Download Manager","Serial","DDDDM-DDDDD-DDDDX-DDDDX"
End If
WshShell.Popup "已破解主程序：" & DI & vbcrlf & vbcrlf & "已添加序列号：DDDDM-DDDDD-DDDDX-DDDDX" & vbcrlf & vbcrlf & "VBScript by ChiShingChan", 10, DN & " " & DV, 0
Function HexToByte(hexStr)
Set xmldom = Wscript.CreateObject("Microsoft.XMLDOM")
Set byteObj= xmldom.createElement("byteObj")
byteObj.dataType = "bin.hex"
byteObj.nodeTypedValue = hexStr
HexToByte=byteObj.nodeTypedValue
End Function

复制代码

更新一下此脚本！添加去更新，支持双架构。

kgenxp · 发表于 2020-7-4 20:56:27

其他版本idm是否可用？

窄口牛 · 发表于 2020-7-4 21:10:54

极简插件
从谷歌商店下载离线包
我爱插件网
crx4chrome
都不用翻墙

都市浪子666 · 发表于 2020-7-4 21:12:55

kgenxp 发表于 2020-7-4 20:56
其他版本idm是否可用？

If DV <> "6.38.1" Then 看代码是限制于 6.38.1版本

chishingchan · 发表于 2020-7-4 21:34:25

都市浪子666 发表于 2020-7-4 21:12
If DV "6.38.1" Then 看代码是限制于 6.38.1版本

因为是指定位置修改，非搜索替换修改，所以限制此版本。

进士小站 · 发表于 2020-7-4 22:19:54

没有看明白

dszsdyx · 发表于 2020-7-5 07:24:29

在谷歌浏览器中安装。感觉还是不错的。

DestroSeth · 发表于 2020-7-5 11:35:28

支持一下啦

77888 · 发表于 2020-7-7 09:14:57

一直没弄懂油猴的使用方法,太笨了

kgenxp · 发表于 2020-7-14 11:37:09

IDM破解提示成功，但仍出现弹窗：idm is corrupt

wanghh · 发表于 2020-7-14 15:27:17

正需要

lik502 · 发表于 2024-7-5 15:00:34

非常感谢,老版本需要这个

		自动登录	找回密码
密码			注册

[已解决] 最新版 tampermonkey 及 beta 版本下载

评分

点评

评分

点评