如何快速破解如何破解excel工作表保护密码的保护密码

&>&Excel—“撤销工作表保护密码”的破解并获取原始密码
Excel—“撤销工作表保护密码”的破解并获取原始密码
上传大小:18KB
Excel 撤销工作表保护密码 破解并获取原始密码
综合评分:0
{%username%}回复{%com_username%}{%time%}\
/*点击出现回复框*/
$(".respond_btn").on("click", function (e) {
$(this).parents(".rightLi").children(".respond_box").show();
e.stopPropagation();
$(".cancel_res").on("click", function (e) {
$(this).parents(".res_b").siblings(".res_area").val("");
$(this).parents(".respond_box").hide();
e.stopPropagation();
/*删除评论*/
$(".del_comment_c").on("click", function (e) {
var id = $(e.target).attr("id");
$.getJSON('/index.php/comment/do_invalid/' + id,
function (data) {
if (data.succ == 1) {
$(e.target).parents(".conLi").remove();
alert(data.msg);
$(".res_btn").click(function (e) {
var parentWrap = $(this).parents(".respond_box"),
q = parentWrap.find(".form1").serializeArray(),
resStr = $.trim(parentWrap.find(".res_area_r").val());
console.log(q);
//var res_area_r = $.trim($(".res_area_r").val());
if (resStr == '') {
$(".res_text").css({color: "red"});
$.post("/index.php/comment/do_comment_reply/", q,
function (data) {
if (data.succ == 1) {
var $target,
evt = e || window.
$target = $(evt.target || evt.srcElement);
var $dd = $target.parents('dd');
var $wrapReply = $dd.find('.respond_box');
console.log($wrapReply);
//var mess = $(".res_area_r").val();
var mess = resS
var str = str.replace(/{%header%}/g, data.header)
.replace(/{%href%}/g, 'http://' + window.location.host + '/user/' + data.username)
.replace(/{%username%}/g, data.username)
.replace(/{%com_username%}/g, data.com_username)
.replace(/{%time%}/g, data.time)
.replace(/{%id%}/g, data.id)
.replace(/{%mess%}/g, mess);
$dd.after(str);
$(".respond_box").hide();
$(".res_area_r").val("");
$(".res_area").val("");
$wrapReply.hide();
alert(data.msg);
}, "json");
/*删除回复*/
$(".rightLi").on("click", '.del_comment_r', function (e) {
var id = $(e.target).attr("id");
$.getJSON('/index.php/comment/do_comment_del/' + id,
function (data) {
if (data.succ == 1) {
$(e.target).parent().parent().parent().parent().parent().remove();
$(e.target).parents('.res_list').remove()
alert(data.msg);
//填充回复
function KeyP(v) {
var parentWrap = $(v).parents(".respond_box");
parentWrap.find(".res_area_r").val($.trim(parentWrap.find(".res_area").val()));
评论共有0条
VIP会员动态
CSDN下载频道资源及相关规则调整公告V11.10
下载频道用户反馈专区
下载频道积分规则调整V1710.18
spring mvc+mybatis+mysql+maven+bootstrap 整合实现增删查改简单实例.zip
资源所需积分/C币
当前拥有积分
当前拥有C币
输入下载码
为了良好体验,不建议使用迅雷下载
Excel—“撤销工作表保护密码”的破解并获取原始密码
会员到期时间:
剩余下载个数:
剩余积分:0
为了良好体验,不建议使用迅雷下载
积分不足!
资源所需积分/C币
当前拥有积分
您可以选择
程序员的必选
绿色安全资源
资源所需积分/C币
当前拥有积分
当前拥有C币
为了良好体验,不建议使用迅雷下载
资源所需积分/C币
当前拥有积分
当前拥有C币
为了良好体验,不建议使用迅雷下载
资源所需积分/C币
当前拥有积分
当前拥有C币
您的积分不足,将扣除 10 C币
为了良好体验,不建议使用迅雷下载
无法举报自己的资源
你当前的下载分为234。
你还不是VIP会员
开通VIP会员权限,免积分下载
你下载资源过于频繁,请输入验证码
您因违反CSDN下载频道规则而被锁定帐户,如有疑问,请联络:!
若举报审核通过,可返还被扣除的积分
被举报人:
请选择类型
资源无法下载 ( 404页面、下载失败、资源本身问题)
资源无法使用 (文件损坏、内容缺失、题文不符)
侵犯版权资源 (侵犯公司或个人版权)
虚假资源 (恶意欺诈、刷分资源)
含色情、危害国家安全内容
含广告、木马病毒资源
*投诉人姓名:
*投诉人联系方式:
*版权证明:
*详细原因:
Excel—“撤销工作表保护密码”的破解并获取原始密码excel工作表保护密码破解软件|excel工作表保护密码破解工具(excel密码破解代码)1.0 免费版 1.0 免费版 - 河东下载站Excel撤销工作表保护密码图文教程
时间: 9:48:03来源:作者:xy(1)
我们经常使用Excel的工作表保护功能,将工作表用密码保护起来,以防别人操作时进行修改,但是这样一来有可能会无法进行一些操作(如输入公式等),时间久了保护的密码也有可能忘记了,这该怎么办呢?只要按照以下步骤操作,Excel工作表保护密码瞬间即破!1、打开您需要破解保护密码的Excel文件;2、依次点击菜单栏上的工具---宏----录制新宏,输入宏名字如:aa;3、停止录制(这样得到一个空宏);4、依次点击菜单栏上的工具---宏----宏,选aa,点编辑按钮;5、删除窗口中的所有字符(只有几个),替换为下面的内容;从横线下开始复制-----------------------------Option&ExplicitPublic&Sub&AllInternalPasswords()'&Breaks&worksheet&and&workbook&structure&passwords.&Bob&McCormick'&probably&originator&of&base&code&algorithm&modified&for&coverage'&of&workbook&structure&/&windows&passwords&and&for&multiple&passwords''&Norman&Harker&and&JE&McGimpsey&27-Dec-2002&(Version&1.1)'&Modified&2003-Apr-04&by&JEM:&All&msgs&to&constants,&and'&eliminate&one&Exit&Sub&(Version&1.1.1)'&Reveals&hashed&passwords&NOT&original&passwordsConst&DBLSPACE&As&String&=&vbNewLine&&&vbNewLineConst&AUTHORS&As&String&=&DBLSPACE&&&vbNewLine&&&_&Adapted&from&Bob&McCormick&base&code&by&&&&_&Norman&Harker&and&JE&McGimpsey&Const&HEADER&As&String&=&&AllInternalPasswords&User&Message&Const&VERSION&As&String&=&DBLSPACE&&&&Version&1.1.1&2003-Apr-04&Const&REPBACK&As&String&=&DBLSPACE&&&&Please&report&failure&&&&&_&to&the&microsoft.public.excel.programming&newsgroup.&Const&ALLCLEAR&As&String&=&DBLSPACE&&&&The&workbook&should&&&&&_&now&be&free&of&all&password&protection,&so&make&sure&you:&&&&_DBLSPACE&&&&SAVE&IT&NOW!&&&&DBLSPACE&&&&and&also&&&&_DBLSPACE&&&&BACKUP!,&BACKUP!!,&BACKUP!!!&&&&_DBLSPACE&&&&Also,&remember&that&the&password&was&&&&&_&put&there&for&a&reason.&Don't&stuff&up&crucial&formulas&&&&&_&or&data.&&&&DBLSPACE&&&&Access&and&use&of&some&data&&&&&_&may&be&an&offense.&If&in&doubt,&don't.&Const&MSGNOPWORDS1&As&String&=&&There&were&no&passwords&on&&&&&_&sheets,&or&workbook&structure&or&windows.&&&&AUTHORS&&&VERSIONConst&MSGNOPWORDS2&As&String&=&&There&was&no&protection&to&&&&&_&workbook&structure&or&windows.&&&&DBLSPACE&&&_&Proceeding&to&unprotect&sheets.&&&&AUTHORS&&&VERSIONConst&MSGTAKETIME&As&String&=&&After&pressing&OK&button&this&&&&&_&will&take&some&time.&&&&DBLSPACE&&&&Amount&of&time&&&&&_&depends&on&how&many&different&passwords,&the&&&&&_&passwords,&and&your&computer's&specification.&&&&DBLSPACE&&&_&Just&be&patient!&Make&me&a&coffee!&&&&AUTHORS&&&VERSIONConst&MSGPWORDFOUND1&As&String&=&&You&had&a&Worksheet&&&&&_&Structure&or&Windows&Password&set.&&&&DBLSPACE&&&_&The&password&found&was:&&&&&DBLSPACE&&&&$$&&&&DBLSPACE&&&_&Note&it&down&for&potential&future&use&in&other&workbooks&by&&&&&_&the&same&person&who&set&this&password.&&&&DBLSPACE&&&_&Now&to&check&and&clear&other&passwords.&&&&AUTHORS&&&VERSIONConst&MSGPWORDFOUND2&As&String&=&&You&had&a&Worksheet&&&&&_&password&set.&&&&DBLSPACE&&&&The&password&found&was:&&&&&_DBLSPACE&&&&$$&&&&DBLSPACE&&&&Note&it&down&for&potential&&&&&_&future&use&in&other&workbooks&by&same&person&who&&&&&_&set&this&password.&&&&DBLSPACE&&&&Now&to&check&and&clear&&&&&_&other&passwords.&&&&AUTHORS&&&VERSIONConst&MSGONLYONE&As&String&=&&Only&structure&/&windows&&&&&_&protected&with&the&password&that&was&just&found.&&&&_ALLCLEAR&&&AUTHORS&&&VERSION&&&REPBACKDim&w1&As&Worksheet,&w2&As&WorksheetDim&i&As&Integer,&j&As&Integer,&k&As&Integer,&l&As&IntegerDim&m&As&Integer,&n&As&Integer,&i1&As&Integer,&i2&As&IntegerDim&i3&As&Integer,&i4&As&Integer,&i5&As&Integer,&i6&As&IntegerDim&PWord1&As&StringDim&ShTag&As&Boolean,&WinTag&As&BooleanApplication.ScreenUpdating&=&FalseWith&ActiveWorkbookWinTag&=&.ProtectStructure&Or&.ProtectWindowsEnd&WithShTag&=&FalseFor&Each&w1&In&WorksheetsShTag&=&ShTag&Or&w1.ProtectContentsNext&w1If&Not&ShTag&And&Not&WinTag&ThenMsgBox&MSGNOPWORDS1,&vbInformation,&HEADERExit&SubEnd&IfMsgBox&MSGTAKETIME,&vbInformation,&HEADERIf&Not&WinTag&ThenMsgBox&MSGNOPWORDS2,&vbInformation,&HEADERElseOn&Error&Resume&NextDo&'dummy&do&loopFor&i&=&65&To&66:&For&j&=&65&To&66:&For&k&=&65&To&66For&l&=&65&To&66:&For&m&=&65&To&66:&For&i1&=&65&To&66For&i2&=&65&To&66:&For&i3&=&65&To&66:&For&i4&=&65&To&66For&i5&=&65&To&66:&For&i6&=&65&To&66:&For&n&=&32&To&126With&ActiveWorkbook.Unprotect&Chr(i)&&&Chr(j)&&&Chr(k)&&&_Chr(l)&&&Chr(m)&&&Chr(i1)&&&Chr(i2)&&&_Chr(i3)&&&Chr(i4)&&&Chr(i5)&&&Chr(i6)&&&Chr(n)If&.ProtectStructure&=&False&And&_.ProtectWindows&=&False&ThenPWord1&=&Chr(i)&&&Chr(j)&&&Chr(k)&&&Chr(l)&&&_Chr(m)&&&Chr(i1)&&&Chr(i2)&&&Chr(i3)&&&_Chr(i4)&&&Chr(i5)&&&Chr(i6)&&&Chr(n)MsgBox&Application.Substitute(MSGPWORDFOUND1,&_&$$&,&PWord1),&vbInformation,&HEADERExit&Do&'Bypass&all&for...nextsEnd&IfEnd&WithNext:&Next:&Next:&Next:&Next:&NextNext:&Next:&Next:&Next:&Next:&NextLoop&Until&TrueOn&Error&GoTo&0End&IfIf&WinTag&And&Not&ShTag&ThenMsgBox&MSGONLYONE,&vbInformation,&HEADERExit&SubEnd&IfOn&Error&Resume&NextFor&Each&w1&In&Worksheets'Attempt&clearance&with&PWord1w1.Unprotect&PWord1Next&w1On&Error&GoTo&0ShTag&=&FalseFor&Each&w1&In&Worksheets'Checks&for&all&clear&ShTag&triggered&to&1&if&not.ShTag&=&ShTag&Or&w1.ProtectContentsNext&w1If&ShTag&ThenFor&Each&w1&In&WorksheetsWith&w1If&.ProtectContents&ThenOn&Error&Resume&NextDo&'Dummy&do&loopFor&i&=&65&To&66:&For&j&=&65&To&66:&For&k&=&65&To&66For&l&=&65&To&66:&For&m&=&65&To&66:&For&i1&=&65&To&66For&i2&=&65&To&66:&For&i3&=&65&To&66:&For&i4&=&65&To&66For&i5&=&65&To&66:&For&i6&=&65&To&66:&For&n&=&32&To&126.Unprotect&Chr(i)&&&Chr(j)&&&Chr(k)&&&_Chr(l)&&&Chr(m)&&&Chr(i1)&&&Chr(i2)&&&Chr(i3)&&&_Chr(i4)&&&Chr(i5)&&&Chr(i6)&&&Chr(n)If&Not&.ProtectContents&ThenPWord1&=&Chr(i)&&&Chr(j)&&&Chr(k)&&&Chr(l)&&&_Chr(m)&&&Chr(i1)&&&Chr(i2)&&&Chr(i3)&&&_Chr(i4)&&&Chr(i5)&&&Chr(i6)&&&Chr(n)MsgBox&Application.Substitute(MSGPWORDFOUND2,&_&$$&,&PWord1),&vbInformation,&HEADER'leverage&finding&Pword&by&trying&on&other&sheetsFor&Each&w2&In&Worksheetsw2.Unprotect&PWord1Next&w2Exit&Do&'Bypass&all&for...nextsEnd&IfNext:&Next:&Next:&Next:&Next:&NextNext:&Next:&Next:&Next:&Next:&NextLoop&Until&TrueOn&Error&GoTo&0End&IfEnd&WithNext&w1End&IfMsgBox&ALLCLEAR&&&AUTHORS&&&VERSION&&&REPBACK,&vbInformation,&HEADEREnd&Sub----------------------复制到横线以上6、关闭编辑窗口;7、依次点击菜单栏上的工具---宏-----宏,选AllInternalPasswords,运行,确定两次;EXCEL 工作表忘记保护密码快速破解方法_图文_百度文库
您的浏览器Javascript被禁用,需开启后体验完整功能,
享专业文档下载特权
&赠共享文档下载特权
&100W篇文档免费专享
&每天抽奖多种福利
两大类热门资源免费畅读
续费一年阅读会员,立省24元!
EXCEL 工作表忘记保护密码快速破解方法
&&忘记工作表保护密码,影响工作效率,是大家头痛但又无奈的问题,网上办法都试过了,无效,今天将个人心得分享给有此感的各位,希望开卷有益,但切莫用于非法事情,否则自负后果;
阅读已结束,下载本文需要
定制HR最喜欢的简历
下载文档到电脑,同时保存到云知识,更方便管理
加入VIP
还剩3页未读,
定制HR最喜欢的简历
你可能喜欢

我要回帖

更多关于 撤销工作表保护密码破解 的文章

 

随机推荐