Rose2003破解方法
Rational Rose 2003 下载及破解方法
https://www.360docs.net/doc/c5214858.html,/Rational%20Rose%202003.rar
https://www.360docs.net/doc/c5214858.html,/lixianhuei/rose2003crack.rar
以上两个网址分别是用来下载Rational Rose 2003及其破解软件的。
１、安装Rational Rose2003时，在需选择安装项的时候，只选择Rational Rose EnterPrise Edition即可，不需选择其他项。
２、安装好Rational Rose Enterprise Editon后，打开rose2003crack.rar压缩包，里面有四个文件，分别为flexlm.cpl、license.dat、lmgrd.exe、rational.exe。
３、用记事本或者是EditPlus打开license.dat文件，大约在文件的中间位置有：SERVER Microsoft ANY
DAEMON rational "C:\Program Files\Rational\common\rational.exe"
将其修改为：SERVER 计算机名ANY DAEMON rational "自己安装的目录\rational.exe"后，保存
注：若是按默认目录安装，则只需修改计算机名即可。
４、将license.dat、lmgrd.exe 、rational.exe三个文件一起拷贝到：安装目录\rational\common\ 下面。
如：若为默认则为：C:\Program Files\Rational\common\目录。
５、将flexlm.cpl拷贝到system32目录下。如win2000系统中为
C:\WINNT\system32目录。
６、进入控制面板，则在控制面板的上方会增加了一个图标，即FLEXlm License Manager，将其打开，在Setup页中lmgrd.exe右侧目录写为：C:\Program Files\Rational\Common\lmgrd.exe（若为默认安装目录）
License File右侧目录写为：C:\Program Files\Rational\Common\license.dat
７、回到Control页，点击Start，若出现"Server Started"，则表示已经成功，可以点击Status,若状态为：计算机名：license server UP(MASTER)则成功。
８、这时可打开安装的Rational Rose Enterprise Edition，若还是出现Error，则打开Rational License Key Administrator ，点击工具栏中的第一个工具（Start WIzard）,点击下一步，在Server Name中的名字改为自己的计算机名
即可。因现在的学习需在使用Rational Rose，所以进行了安装，但确实花了不少工夫，所以特把自己安装的经验来跟大家一起分享，希望能对大家有所帮助。
Trackback: https://www.360docs.net/doc/c5214858.html,/TrackBack.aspx?PostId=1524393 https://www.360docs.net/doc/c5214858.html,/Rational Rose 2003.rar
============================
破解安装Rational Rose 2003 图文修改版
破解Rational Rose 2003.
第一步：双击安装包，启动安装程序。
第二步：“Ｎ个下一步之后”，选择：
和
然后再次“Ｎ个下一步”之后，开始正式调用Ｗｉｎｏｄｗｓ的安装服务并开始复制文件。
注意：请保证操作系统环境的干净，比如安装服务要打开，关闭防火墙和杀毒软件等等。
安装完毕之后，会出现一叠窗口：
取消前面的钩子，ＦＩＮＩＳＨ。安装正式结束。接着开始破解。首先，想办法弄到破解包。
解压缩，会发现＂rational.exe，lmgrd.exe＂这两个文件。把他们复制到Rart ional\common\下。默认的当然是PROGRAM FILE下的了，因为之前没有更改安装盘符。
然后很关键，改license.dat（也在破解包内）里面的
SERVER yourPC ANY
DAEMON rational "C:\Program Files\Rational\Common\rational.exe"
为
SERVER 你的机器名ANY
DAEMON rational "你的安装目录\rational.exe"
将Flexlm.cpl（也在破解包内）拷贝到%SYSTEM%\system32\（就是系统目录下的SYSTEM32）下，
在控制面板里运行FlexLm License Manager，
在Setup面板配置文件路径，lmgrd.exe->你的安装目录\Common\lmgrd.exe License File为你改过的license.dat
在Control面板点击Start，如果成功的话点击Status按钮将显示你的机器名：license server UP (MASTER) 说明成功了
失败的话重启一下FlexLm License Manager就没问题了。
如果弹出对话框License Key Administrator Wizard后,
选定Point to a Rational License Server to get my license s，单击下一步，
Server Name文本框中填写你的机器号(可能已经填好)，单击完成。(成功的话会出现两屏的licenses)
再次运行RationalRose就好了。
法语助手,电脑版和安卓版,破解(实测可用)
法语助手，电脑版和安卓版，破解（实测可用） 电脑版： 步骤一，修改次数： （1）打开注册表（win+R），输入：regedit （2）找到HKEY_CURRENT_USER\Software\Francophonie\Frhelper\Customer Info （3）里面有一个名为“TimesLeft3”的(32-位)DWORD值，TimesLeft3显示法语助手软件剩下的使用次数。使用次数：每退出软件一次算使用了一次。每使用一次，TimesLeft3的值就会减1 （4）要法语助手无限次使用，有两种方法： 1、打开(32-位)DWORD值“TimesLeft3”，点到十进制，输入10000，这样就可以用10000次，次数你随便改。 2、删除这个(32-位)DWORD值“TimesLeft3”，新建一个字符串值S，名字还是“TimesLeft3”。法语助手软件只能修改(32-位)DWORD值而不能修改字符串值，因此永远剩余50次。 步骤二，修改时间： （5）法语助手除了有次数限制，还有时间限制：只能试用一个月。它的时间记录文件为C:\Users\用户名\AppData\Roaming\Francochinois\Frhelper下的study.db （这是win7下的路径，XP下也有相似的路径，这里不写了），只要将这个文件“直接删除”即可。另外，法语助手读取系统时间的，只要更改计算机时间，也能太到效果（但明显这个不实际。。） 手机版： （1）只需一步，打开手机sdcard根目录，找到eudb_fr文件夹，设置显示隐藏文件（所有文件），删除里面隐藏的.study.dat，这样就OK了，很简单。
破解excel保护密码的宏代码
Option Explicit Public 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 passwords Const DBLSPACE As String = vbNewLine & vbNewLine Const 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 & VERSION Const MSGNOPWORDS2 As String = "There was no protection to " & _ "workbook structure or windows." & DBLSPACE & _ "Proceeding to unprotect sheets." & AUTHORS & VERSION Const 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 & VERSION Const 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 & VERSION Const MSGPWORDFOUND2 As String = "You had a Worksheet " & _ "password set." & DBLSPACE & "The password found was: " & _
12种填加法语输入法_EMMA
百度空间 | 百度首页 |登录 EMMA 主页博客相册|个人档案|好友 查看文章 12种填加法语输入法 2008年09月24日星期三 16:33 1. 无敌法: 备用法语字符，复制粘贴àaéê?è????üù? 2. Microsoft Word输入: 方法1： [插入]>>[符号] 方法2：（组合键的法文输入法） é: ctrl+’再按下e è: ctrl+`(键盘左上角)在按下e 需要注意的是ctrl键、shift键以及所需要的标点应该同时按下，或者先按住CTRL别放手，在按住SHIFT或标点，然后松开，在迅速按下有关的字母。 另外，其他相应的元音字母如需要特殊字符，方法和上面的类似，比如：à:ctrl+`再按下a。 3. Alt+数字输入法: 按住Alt键，依次按下后面的数字。受Windows版本、语言版本的影响，有不同输入版本，大家可以分别试试。 国内版本 Alt + xxx = 199 ? 201 é 202 ê 206 ? 207 ? 212 ? 217 ù 219 ? 224 à 226 a 231 ? 232 è 233 é 234 ê 235 ? 238 ? 239 ? 244 ? 246 ? 249 ù 251 ? 版本2
à：Alt + 0224 a：Alt + 0226 è：Alt + 0232 é：Alt + 0233 ê：Alt + 0234 ?：Alt + 0238 ?：Alt + 0244 ù：Alt + 0249 ü：Alt + 0252 ?：Alt + 0231 欧洲版本 4. 法语输入法/法语键盘 装法语输入法(win2000 与 winXP 下自带) 在电脑控制面板里面的键盘上，添加法语键盘，以下就是标准键盘的一些打法，熟练以后可能会不习惯用英语的键盘，经常输错字。 键位图放大连接处:https://www.360docs.net/doc/c5214858.html,/images/upload/2005/08/10/000222.gif é=2 è=7 ?=9 à=0 ê=[+e ?=shift+[+e z=w a=q q=a w=z m=；ù=’ ,=m 5. 法语（加拿大）键盘: 在键盘上添加语言，选择法语（加拿大），字母顺序和英语一样，个别字符个别处理，比如：?=é, ’加e = è, [ 加 o = ?,] 加 c = ? 6. MAC机器上输入: It's pretty easy on a Mac. Hold the Option key and type the second character, release and then type the letter. Use the SHIFT key for the accents on the capital letters : 7. 智能ABC拼音输入法: 别以为它只能输入中文，它也能为我们输入部分法语特殊字符。选择智能ABC输入法后，再输入v8，就会出现下面的界面，只要像打中文一样选择就行了。
动词变位-直陈式
直陈式现在时Indicatif Présent 变位方法： 第一组动词(通常为-er)：参见aimer 注意一些第一组动词由于发音需要，在变位时会有所变化： ?以-eler, -eter结尾的第一组动词，如appeler, jeter ,在单数所有人称，以及复数第三人称的变位中，词尾字母变为"ll","tt"。 ?以-cer, -ger结尾的第一组动词，如commencer, manger, 在复数第一人称时词尾应改为-?ons, -geons 。 ?以-ayer,-oyer,-uyer结尾的第一组动词，如essayer, envoyer, ennuyer, 在单数所有人称，以及复数第三人称的变位中，词尾字母由y变为i。 第二组动词(通常为-ir)：参见finir ?例外：sortir, courir, ouvrir, servir, partir, dormir等 第三组动词：不规则变化。 直陈式複合时 直陈式复合过去时(Indicatif Passé Composé)用于表示过去已经完成的动作或某一已经完成的动作是发生在多少时间内的。 Ex： Il est sorti. Il a travaillé toute l'après-midi. 变位方法： 由助动词avoir或être的直陈式现在时加上动词的过去分词。 当使用être作为助动词时，注意与主语进行性数配合：Elles sont parties. 提示： 对于"必须"或者"可以"用être作为助动词的单词，《法语助手》会在该动词的“变位说明”加以说明，未说明的动词只能使用avoir作为助动词。 下列常用动词使用être作为助动词： aller, sortir, arriver, venir, entrer
常见格式文件的加密和解密
常用格式文件的加密解密方法 庆云县水务局项目办 二〇一二年五月二十三日
目录 0、引子 1 1、新建word文件的加密方法1 1.1任务1 1.2基本步骤1 1.3示范1 2、原有word文件的加密方法4 3、Excel文件的加密方法 4 3.1任务4 3.2基本步骤4 3.3示范4 4、CAD文件的加密方法 5 4.1任务5 4.2基本步骤6 4.3示范6 5、文件的解密方法8 5.1任务8 5.2基本步骤8 5.3示范8
0、引子 我们的日常工作，往往是处理一些文字、表格和图纸。最常用的文件格式有word、excel和CAD。怎样加密、解密这些格式的文件，是我们常遇到的问题。由于文件的加密、解密方法大致一样，所以，这里只介绍这三种文件的加密解密方法。其它格式的文件加密解密，可以参照进行。 加密解密文件需要知道文件格式的后缀名，后缀名又称文件扩展名，是操作系统用来标志文件格式的一种机制。通常来说，一个扩展名是跟在主文件名后面的，由一个分隔符分隔。如文件名“readme.txt”中，readme是主文件名，.txt为扩展名，表示这个文件被认为是一个纯文本文件。常见文档类型及其后缀名和打开方式详见下表。 常见文档类型及其后缀名和打开方式： 1、新建word文件的加密方法 1.1任务 对新建word文档1（未曾保存）进行加密 1.2基本步骤 ①打开菜单“文件”→②点击“另存为”选项→③点击“工具”按钮→④选定“安全措施选项(C)”→⑤输入密码→⑥确定→⑦再次输入密码→⑧确定→⑨保存。 1.3示范 ①打开菜单“文件”：点击菜单栏最左侧的“文件”按钮，弹出“文件”下拉列表； ②点击“另存为”选项：点击“文件”下拉列表的“另存为”选项，弹出“另存为”对话框，如图1所示。
法语动词变位规则汇总
现在时Indicatif Présent 变位方法： 第一组动词(通常为-er)：参见aimer 注意一些第一组动词由于发音需要，在变位时会有所变化： ?以-eler, -eter结尾的第一组动词，如appeler, jeter ,在单数所有人称，以及复数第三人称的变位中，词尾字母变为"ll","tt"。 ?以-cer, -ger结尾的第一组动词，如commencer, manger, 在复数第一人称时词尾应改为-?ons, -geons 。 ?以-ayer,-oyer,-uyer结尾的第一组动词，如essayer, envoyer, ennuyer, 在单数所有人称，以及复数第三人称的变位中，词尾字母由y变为i。 第二组动词(通常为-ir)：参见finir ?例外：sortir, courir, ouvrir, servir, partir, dormir等 第三组动词：不规则变化。 直陈式复合过去时(Indicatif Passé Composé)用于表示过去已经完成的动作或某一已经完成的动作是发生在多少时间内的。 Ex： Il est sorti. Il a travaillé toute l'après-midi. 变位方法： 由助动词avoir或être的直陈式现在时加上动词的过去分词。 当使用être作为助动词时，注意与主语进行性数配合：Elles sont parties. 提示： 对于"必须"或者"可以"用être作为助动词的单词，《法语助手》会在该动词的“动词说明”中加以说明，未说明的动词只能使用avoir作为助动词。
aller, sortir, arriver, venir, entrer 下列常用动词可以使用avoir或être作为助动词，但表达的意义不同。 sortir, rentrer, descendre, monter 未完成过去时(Indicatif Imparfait)主要用于表示过去未完成的动作。 变位方法：将该动词现在时第一人称复数的词尾-ons 去除, 添加相应的词尾： je -ais tu -ais il/elle -ait nous -ions vous -iez ils/elles -aient 例外：être不符合上面的规则。 直陈式俞过去时(Indicatif Plus-que-parfait)表示某个动作在另一个过去的动作开始之前已经完成，常用于复合句： Quand je suis arrivé, il avait fini son travail. 与简单将来时配合用于si引导的条件从句： Si j'avais eu de l'argent, j'aurais acheté cette maison. 变位方法： 由助动词avoir或être的未完成过去时加上动词的过去分词。 当使用être作为助动词时，注意与主语进行性数配合。 提示： 对于"必须"或者"可以"用être作为助动词的单词，《法语助手》会在该动词的“动词说明”中加以说明，未说明的动词只能使用avoir作为助动词。
破解EXCEL宏密码
如何破解excel宏的保护密码 第一步：打开该文件，先解除默认的“宏禁用”状态，方法是点击工具栏下的“选项”状态按钮，打开“Microsoft Office安全选项”窗口，选择其中的“启用此内容”，“确定”退出； 再切换到“视图”选项卡，点击“宏”→“录制宏”，出现“录制新宏”窗口，在“宏名”定义一个名称为：PasswordBreaker(图3)，点击“确定”退出；
第二步：再点击“宏”→“查看宏”，选择“宏名”下的“PasswordBrea ker”并点击“编辑”，打开“MicrosoftVisual Basic”编辑器，用如下内容替换右侧窗口中的所有代码： Sub PasswordBreaker() Dim i As Integer, j As Integer, k As Integer Dim l As Integer, m As Integer, n As Integer Dim i1 As Integer, i2 As Integer, i3 As Integer Dim i4 As Integer, i5 As Integer, i6 As Integer On Error Resume Next For i = 65 To 66: For j = 65 To 66: For k = 65 To 66 For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66 For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66 For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126 ActiveSheet.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 ActiveSheet.ProtectContents = False Then MsgBox "One usable password is " & Chr(i) & Chr(j) & _ Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _ Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n) ActiveWorkbook.Sheets(1).Select Range("a1").FormulaR1C1 = Chr(i) & Chr(j) & _
30秒破解EXCEL密码
30秒破解EXCEL密码 1\打开文件 2\工具---宏----录制新宏---输入名字如:aa 3\停止录制(这样得到一个空宏) 4\工具---宏----宏,选aa,点编辑按钮 5\删除窗口中的所有字符(只有几个),替换为下面的内容:(复制吧) 6\关闭编辑窗口 7\工具---宏-----宏,选AllInternalPasswords,运行,确定两次,等2分钟,再确定.OK,没有密码了!! 内容如下： Public 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 passwords Const DBLSPACE As String = vbNewLine & vbNewLine Const 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 & VERSION Const MSGNOPWORDS2 As String = "There was no protection to " & _ "workbook structure or windows." & DBLSPACE & _ "Proceeding to unprotect sheets." & AUTHORS & VERSION Const 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 & _
91的危害
91的危害 1.白苹果现象严重。其实造成白苹果的原因有很多很多，因为91造成白苹果的原因基本上有这么几点：pxl软件不经测试就上传，不支持某些固件版本，轻则应用秒退，重则白苹果。WB主题和固件crash，轻则安全模式，重则白苹果。修改系统文件，权限需要自己改，自己不知道改什么权限的话，轻则系统文件替换进去不起作用，重则白苹果。。。等等。。白苹果的例子太多了，相信就不用举出来了。 2.音乐管理，电子书管理等功能不完善。这些个所谓不完善，你不碰上问题，那你会觉得用91也很好，但是碰上了问题谁遇到，谁就知道了。什么是所谓不完善呢？下面举两个例子。例子一：昨天才发生的事情，我同学打电话过来说，iphone里面的ipod，里面一首歌都不见了，但是itunes里面显示，这些歌占得存储大小并没有消失，也就是占用空间还在，歌没了。一问，果然，他是用91同步音乐的，同步到一半，91PC客户端无响应，半小时后结束任务，就造成上述情况了。我让他用ifunbox在手机里找相关文件，不知道ifunbox为何物。指导其下载，找寻，不知道是不是他操作上有问题，无果。最后重刷。例子二：我一个朋友向我反映，91强制同步书签。。怎么说呢？就是书签都是itunes同步的。可是到91上，他无视你的设置，只要你同步新的电子书进去，他就会把你老的电子书的在91上的书签，也给同步进去。。那你上一本电子书用itunes 同步的实际书签位置就没了。。 3.垃圾文件太多。这个不多赘述了。谁用谁知道。pxl软件在itunes上设备存储情况条上属于“其他”一类。所以每个91用户，“其他”这项都会有5G以上。而且所谓垃圾文件多，意思是就算你把这些pxl都用91卸载了，还会残余很多多余的垃圾文件。“其他”这项还是会远离91的ios deviece多很多。不信可以试试。正常越狱后用itunes同步ipa的话。。。加上些必须的deb，主题等等，“其他”一项是不会超过500M的。哪怕你想远离91了，它的守护程序，你都很难删干净。简直像病毒一样顽固，删不好，还得白苹果。 4.掉电厉害。这个是我切身的体会。之前用3GS，用3.1.2固件配合91，起码一天一充。后来3GS升级4.0固件，远离91，装的插件、使用强度都一样的情况下，2天1冲。总结了一下，用91手机掉电快的原因可能有这几点：首先，WB，当然，WB不用91也能装，但是91是强力推荐WB的，所以也列在这里。至少现在我美化都不用WB了，因为WB的美化是强制替换，常驻内存。所以会不断地吸取你的电量。其次，守护程序也是个常驻内存的进程，电池吸血鬼。第三，一些软件的冲突，会导致系统不停的自动判断。这也是掉电的一个原因。
用宏代码破解工作表保护密码
用宏代码破解密码： 以office2007为例说明，（2003也是一样的，只是菜单命令的位置不同） 第一步：打开该文件，先解除默认的“宏禁用”状态，方法是点击工具栏下的“选项”状态按钮，打开“Microsoft Office安全选项”窗口，选择其中的“启用此内容”，“确定”退出；再切换到“视图”选项卡，点击“宏”→“录制宏”，出现“录制新宏”窗口，在“宏名”定义一个名称为：PassWordBreaker，点击“确定”退出； 第二步：再点击“宏”→“查看宏”，选择“宏名”下的“PasswordBreaker”并点击“编辑”，打开“Microsoft Visual Basic”编辑器，用如下内容替换右侧窗口中的所有代码： Sub PasswordBreaker() Dim i As Integer, j As Integer, k As Integer Dim l As Integer, m As Integer, n As Integer Dim i1 As Integer, i2 As Integer, i3 As Integer Dim i4 As Integer, i5 As Integer, i6 As Integer On Error Resume Next For i = 65 To 66: For j = 65 To 66: For k = 65 To 66 For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66 For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66 For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126 ActiveSheet.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 ActiveSheet.ProtectContents = False Then MsgBox "One usable password is " & Chr(i) & Chr(j) & _ Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _ Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n) ActiveWorkbook.Sheets(1).Select Range("a1").FormulaR1C1 = Chr(i) & Chr(j) & _ Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _ Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n) Exit Sub End If Next: Next: Next: Next: Next: Next Next: Next: Next: Next: Next: Next End Sub 第三步：再点击“宏”→“查看宏”，选择“宏名”下的“PasswordBreaker”并点击“执行”，密码就现形了。
法语助手手动破解办法
摘自 https://www.360docs.net/doc/c5214858.html,/q/p5041/ 最佳知识点讲解 法语助手2006下载及破解方法： 下载法语助手2006的地址：https://www.360docs.net/doc/c5214858.html,/down/fhsetup.zip 破解其使用50次限制的方法：1，下载如下文件 https://www.360docs.net/doc/c5214858.html,/attachments/month_0601/a8zd_frhelper_by_xpme_9999999 _and_REG.rar后将自动修改注册表。 2，手动修改方法： 1、正常地安装试用版，被告知可以使用50次。 2、使用注册表修改工具，通常，XP系统带的regedit即可。 3、进入HKEY_CURRENT_USER; 4、进入Software_Francophonie_Frhelper_Customer Info; 5、应该可以看到已有一个叫做TimesLeft3的子项，是DWORD Value类型的，值是你还剩下的使用次数，例如，0x00000032,即十进制里的数字50。删除该子项。 6、生成一个新的String类的子项，命名为同一名字，即TimesLeft3。注意要完全一样，包括字母的大小写。然后给该子项 赋值820711。 7、再生成另两个新的String类的子项，一个名为regDate,赋值为任一个合理的时间，比方说，1/14/2006 10:00:00 AM；另一个子项命名为SerialCode,赋值为形如下列排列的任意一组由20个大写字母和数字及3个划线组成的字串。 8、完成。重新启动你的法语助手2006，发现系统已经认为注册成功，注册码即为你刚才输入的字串。 看到帮助菜单项中已经没有了‘注册’项，且‘关于法语助手’不再显示还剩下的使用次数，而是出现你自己造的注册码 ，这可能只是一个假象。你可能会发现在接下来的使用中法语助手突然自行退出，然后再次启动时报告说你已试用期满， 请马上注册云云。不要紧，你可以马上退出程序，然后去做如下两步补救措施-- 1、去到资源管理器中，来到目录 C;\Documents and settings\\Application Data\Francochinois\Frhelper 把下面4个文件删除掉
常见文件夹的解密与加密的方法
常见文件夹的解密与加密的方法 一、加密文件或文件夹 步骤一：打开Windows资源管理器。 步骤二：右键单击要加密的文件或文件夹，然后单击“属性”。 步骤三：在“常规”选项卡上，单击“高级”。选中“加密内容以便保护数据”复选框 在加密过程中还要注意以下五点： 1.要打开“Windows 资源管理器”，请单击“开始→程序→附件”，然后单击“Windows 资源管理器”。 2.只可以加密N TF S分区卷上的文件和文件夹，FAT分区卷上的文件和文件夹无效。 3.被压缩的文件或文件夹也可以加密。如果要加密一个压缩文件或文件夹，则该文件或文件夹将会被解压。 4.无法加密标记为“系统”属性的文件，并且位于systemroot目录结构中的文件也无法加密。 5.在加密文件夹时，系统将询问是否要同时加密它的子文件夹。如果选择是，那它的子文件夹也会被加密，以后所有添 加进文件夹中的文件和子文件夹都将在添加时自动加密。 二、解密文件或文件夹 步骤一：打开Windows资源管理器。 步骤二：右键单击加密文件或文件夹，然后单击“属性”。 步骤三：在“常规”选项卡上，单击“高级”。 步骤四：清除“加密内容以便保护数据”复选框。 同样，我们在使用解密过程中要注意以下问题： 1.要打开“Windows资源管理器”，请单击“开始→程序→附件”，然后单击“Windows资源管理器”。 2.在对文件夹解密时，系统将询问是否要同时将文件夹内的所有文件和子文件夹解密。如果选择仅解密文件夹，则在要解密文件夹中的加密文件和子文件夹仍保持加密。但是，在已解密文件夹内创立的新文件和文件夹将不会被自动加密。 以上就是使用文件加、解密的方法!而在使用过程中我们也许会遇到以下一些问题，在此作以下说明： 1.高级按钮不能用 原因：加密文件系统(EFS)只能处理N TF S文件系统卷上的文件和文件夹。如果试图加密的文件或文件夹在FAT或FAT32
破解excel密码宏程序代码
1.将你要破解的Excel文件关闭，切记一定要关闭呀！然后新建一个Excel文 件 2.打开新建的这个Excel，按下alt+F11，打开vb界面，新建一个模块，如图 所示
3.将代码复制到这个模块中，代码如下： Private Sub VBAPassword() '你要解保护的Excel文件路径 Filename = Application.GetOpenFilename("Excel文件（*.xls & *.xla & *.xlt）,*.xls;*.xla;*.xlt", , "VBA破解") If Dir(Filename) = "" Then MsgBox "没找到相关文件,清重新设置。" Exit Sub Else FileCopy Filename, Filename & ".bak" '备份文件。 End If Dim GetData As String * 5 Open Filename For Binary As #1 Dim CMGs As Long Dim DPBo As Long For i = 1 To LOF(1) Get #1, i, GetData If GetData = "CMG=""" Then CMGs = i If GetData = "[Host" Then DPBo = i - 2: Exit For Next If CMGs = 0 Then MsgBox "请先对VBA编码设置一个保护密码...", 32, "提示" Exit Sub End If Dim St As String * 2 Dim s20 As String * 1 '取得一个0D0A十六进制字串 Get #1, CMGs - 2, St '取得一个20十六制字串 Get #1, DPBo + 16, s20
关于Excel使用VBA 宏的密码破解方法和思路
对于那种试用的含有VBA宏的Excel 是最好破的。这样的Excel 文件一般加载了dll文件，一打开就提示输入密码，然后还提示你只能使用多少次。有次数限制当然不爽了，呵呵，所以必须破解。首先用Advanced Office Password Recovery 打开文件，马上就会破解出通用密码，然后点击删除VBA密码，然后拷贝工作薄密码。打开Excel 文件，撤销工作薄保护，粘贴你刚才复制的密码。继续看每个表有保护没，有的话全部撤销。每个工作表的密码在刚才的软件界面上都有。然后打开VBA编辑器，提示输入密码，不管它，因为密码已经删除了，所以点击确定就可以进去了。展开工程，删除里面用户保护的VBA代码，保存，关闭。再打开Excel 时你就会发现已经不会提示输入任何密码了，破解完成。 对于不提供试用，只提供输入密码才能访问，而且一打开就全屏的提示输入密码。这样的Excel 破解起来稍微要麻烦一点，不过还是能破。具体方法有空了再写。 就按照刚刚破解的一个VBA加密的Excel 写一下破解思路，仅供参考。 打开Excel 只看到一个表，然后马上出现全屏运行的密码输入窗口。看来该加密方式是利用的这个表写的VBA代码。只有输入正确密码才能登陆，如果点取消，则Excel 就马上关闭了。在全屏的界面按下ALT+F 调出菜单栏，一直按右键，到“工具”菜单，选择“保护”，继续选择“撤销工作薄保护”，然后输入上面用软件破解出来的工作薄保护密码，然后确定。如果没有出现密码错误对话框，就说明密码正确了。然后按CTRL+S保存，等保存完毕，再回到那个登陆窗口，点击取消。此时你就会发现Excel 没有关闭，而是绕过用户密码登陆直接进入了，里面就是你想要看到的Excel 表。此时不要关闭Excel ，不然待会又要求输入登陆密码。进入“工具”-“宏”-“Visual Basic 编辑器”，双击VBAProjiect，会提示输入密码，因为在前面已经用软件删除了VBA密码，所以直接点确定就可以进入。然后移除所有的用户登录代码和模块，保存，如果提示错误，会自动跳转到错误的代码，那么就把出错的代码段删除，如果还发现有登陆相关代码，也一起删除。关闭代码编辑，回到Excel 表格，进入“格式”-“工作表”-“取消隐藏”，把隐藏的工作表显示出来，删除与登录信息相关的表。保存后就可以关闭了。打开Excel 文件，提示是否启用宏，此时你就会发现已经没有了登录窗口。
EXCEL密码破解无需任何工具插件超简单
此方法无需任何工具只需要按照以下步骤操作就可以破解EXCEL密码，方便简单快捷EXCEL密码破解 1\打开文件 2\工具---宏----录制新宏---输入名字如:aa 3\停止录制(这样得到一个空宏) 4\工具---宏----宏,选aa,点编辑按钮 5\删除窗口中的所有字符(只有几个),替换为下面的内容:(复制吧) 6\关闭编辑窗口 7\工具---宏-----宏,选AllInternalPasswords,运行,确定两次,等2分钟,再确定.OK,没有密码了!! 内容如下： Public 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 passwords Const DBLSPACE As String = vbNewLine & vbNewLine Const 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 & VERSION Const MSGNOPWORDS2 As String = "There was no protection to " & _ "workbook structure or windows." & DBLSPACE & _ "Proceeding to unprotect sheets." & AUTHORS & VERSION Const MSGTAKETIME As String = "After pressing OK button this " & _