word文档加密，如何让word自动加密
下面介绍一种能自动给Word文档统一加上密码的办法（以Word 2003为例）。
第一步：在“工具”菜单中选择
【菜科解读】
Word提供了加密的功能，但不能自动给文档加密。
下面介绍一种能自动给Word文档统一加上密码的办法（以Word 2003为例）。
第一步：在“工具”菜单中选择“宏”选项卡，单击“宏”命令，键入宏的名称“AllAutoPassword”，在“宏的位置”框中选择“所有的活动模板和文档”，在“说明”中可以键入对该宏的说明，例如“利用‘宏’给文档进行统一加密”，最后单击“创建”按钮即可。
第二步：系统会弹出“宏”编辑窗口，在Sub AllAutoPassword()和End Sub之间输入以下代码：
//密码为123456
With Options
.AllowFastSave = True
.BackgroundSave = True
.CreateBackup = False
.SavePropertiesPrompt = False
.SaveInterval = 15
.SaveNormalPrompt = False
End With
With ActiveDocument
.ReadOnlyRecommended = False
.EmbedTrueTypeFonts = False
.SaveFormsData = False
.SaveSubsetFonts = False
.Password = "123456" ’打开权限密码
.WritePassword = "123456" ’修改权限密码
End With
Application.DefaultSaveFormat = " "
第三步：代码输入后，选择“文件”菜单中的“保存Normal”，点击“关闭并返回到Microsoft Word”，再在“工具”菜单中选择“自定义”，选择“命令”标签，在“类别”中选择“宏”，在“命令”中找到“Normal.NewMacros.AllAutoPassword”，然后将它移至常用工具栏内即可。
以后，用户新建或关闭一个文档时，该宏将提醒用户是否保存对该文档的修改，如果选择“是”，那么文档将自动被加上密码“123456”，反之则不加密码。
word,文档,加密,怎么,让,自动,Word,提供,了,加DIY一个漂亮的Word文本框
虽然Word 2003不能直接插入很漂亮的文本框，但是，漂亮的文本框却是可以DIY的。
好了，不多说了，动手吧。
一、异形文本框 选中插入的文本框，然后点击“绘图”工具栏中的“绘图改变自选图形”，然后在给出的类别中选一个合适的自选图形。
呵呵，看到了吗？文本框的外形改变了吧？另外，我们也可以先添加一个自选图形，然后选中它，点击右键，在快捷菜单中选择“添加文字”命令，也可以把这个自选图形改成文本框。
二、文本框也玩背景 文本框白底黑字的感觉不爽。
没关系，文本框的背景也是可以DIY的。
选中文本框，点击“绘图”工具栏中的“填充颜色”按钮右侧的小黑三角，在弹出的菜单中选择“填充效果”命令，打开“填充效果”对话框。
点击“渐变”选项卡，可以设置两种颜色的渐变，并且可以指定每种颜色的透明度、渐变方向等。
多试几次，一定可以做出很漂亮的色彩的。
此外，点击其它的几个选项卡，可以很方便地做出美丽的效果。
比如在“图片”选项卡中，我们可以选取硬盘上的某个图片做文本框的背景图，不错吧？ 三、给文本框加个框 默认情况下文本框的边框线是黑色单实线。
我们可以改变它的颜色，也可以简单地对此加以修饰。
选中文本框后，点击“绘图”工具栏中的“线条颜色”右侧的小黑三角，在弹出的菜单中选择一种颜色或“其它线条颜色”命令，为其指定列表中没有的颜色。
如果点击“带图案线条”命令，那么可以打开“带图案线条”对话框。
在这里指定图案的前景色、背景色，然后选择一种图案，确定后，就不再是单实线的文本框了。
四、弄个3D的文本框 那我们可以选中文本框，然后点击“绘图”工具栏中的“阴影样式”按钮，在弹出的阴影样式中选择一种。
如果想自定义一种，那么可以点击弹出菜单中的“阴影设置”命令，然后利用打开的“阴影设置”工具栏，设置阴影颜色、方向、深度等。
如果还不过瘾，那么可以点击“绘图”工具栏中的“三维效果样式”，在弹出的列表中为文本框指定一种三维效果。
我们还可以在弹出的列表中选择“三维设置”命令，然后利用“三维设置”工具栏中的相应按钮，设置三维颜色、照明角度、方向等相关内容。
需要说明的是，并不是每一种自选图形都可以设置三维效果，所以，如果三维设置不可用，那不妨另试一种自选图形。
好了，经过我们这一番设置，那文本框就不再那么单调了吧？如果您的艺术细胞丰富，没准儿可以弄一个绝顶漂亮的文本框出来呢。
DIY,一个,漂,亮的,Word,文本,框,Word,文本,
MD5加密函数在ASP,ASP.NET,VB.NET中有哪些不同
知道这个原因，把ASP.NET的结果稍加处理就可以用来比较老数据库中的密码字串了。
在ASP的MD5函数中第353、354行：代码 MD5=LCase(WordToHex(a)&WordToHex(b)&WordToHex(c)&WordToHex(d)) MD5=LCase(WordToHex(b)&WordToHex(c)) Icropthistofit16bytedatabasepassword:D 第一句是取全部的32位密文，第二句则是取中间第9~25位为16位密文。
到了vb.net问题又来了，在vb.net里，无法用到System.Web.Security名称空间，无法用上面简单的办法进行MD5加密。
故我写了下面这个函数来处理： VB.NET:代码 MD5加密函数 PublicSharedFunctionMD5(ByValstrSourceAsString,ByValCodeAsInt16)AsString 这里用的是ascii编码密码原文，如果要用汉字做密码，可以用UnicodeEncoding，但会与ASP中的MD5函数不兼容 DimdataToHashAsByte()=(NewSystem.Text.ASCIIEncoding).GetBytes(strSource) DimhashvalueAsByte()=CType(System.Security.Cryptography.CryptoConfig.CreateFromName("MD5"),System.Security.Cryptography.HashAlgorithm).ComputeHash(dataToHash) DimiAsInteger SelectCaseCode Case16 选择16位字符的加密结果 Fori=4To11 MD5+=Hex(hashvalue(i)).ToLower Next Case32 选择32位字符的加密结果 Fori=0To15 MD5+=Hex(hashvalue(i)).ToLower Next CaseElse Code错误时，返回全部字符串，即32位字符 Fori=0Tohashvalue.Length-1 MD5+=Hex(hashvalue(i)).ToLower Next EndSelect EndFunction MD5,加密,函数,在,ASP,ASP.NET,VB.NET
