详解易语言调用js实现md5加密方法

易语言调用js需要用到拓展组件的脚本组件,

在窗口创建完毕的事件里给脚本组件初始化设置下脚本组件的语言属性,在这里以JScript为例:

脚本组件执行脚本的简单方法是:  脚本组件1.执行 ()  然后根据需要调用的脚本函数   脚本组件1.运行 ()

首先看下脚本组件1.执行 () 的参数和返回值:

调用格式: 〈逻辑型〉 对象.执行 (文本型 脚本代码) - 脚本语言支持组件->脚本组件

英文名称:Execute

执行指定的代码文本。返回真为执行正常,返回假为出错,错误信息可以从“错误码信息”属性中取得。本命令为初级对象成员命令。

参数<1>的名称为“脚本代码”,类型为“文本型(text)”。包含要执行的脚本代码,如为空则默认为执行上次的脚本代码。如果脚本代码中包括函数或过程,执行此方法后可以用“运行”方法来单独执行。

操作系统需求: Windows

脚本组件1.运行 ()的参数和返回值:

调用格式: 〈文本型〉 对象.运行 (文本型 过程或函数名,[通用型数组/非数组 参数],... ) - 脚本语言支持组件->脚本组件

英文名称:Run

运行指定的过程,如有返回值返回相应文本,否则返回空文本。本命令为初级对象成员命令。命令参数表中最后一个参数可以被重复添加。

参数<1>的名称为“过程或函数名”,类型为“文本型(text)”。所要运行的过程或函数名。

参数<2>的名称为“参数”,类型为“通用型(all)”,可以被省略,提供参数数据时可以同时提供数组或非数组数据。要执行过程或函数的参数。

操作系统需求: Windows

这是简单界面 然后添加md5加密的js脚本到常量内

js内容:

var hexcase = 0;
var chrsz   = 8;
function hex_md5(s){
 return binl2hex(core_md5(str2binl(s), s.length * chrsz));
}
function core_md5(x, len) {
 x[len >> 5] |= 0x80 << ((len) % 32);
 x[(((len + 64) >>> 9) << 4) + 14] = len;

 var a =  1732584193;
 var b = -271733879;
 var c = -1732584194;
 var d =  271733878;

 for(var i = 0; i < x.length; i += 16) {
  var olda = a;
  var oldb = b;
  var oldc = c;
  var oldd = d;

  a = md5_ff(a, b, c, d, x[i+ 0], 7 , -680876936);
  d = md5_ff(d, a, b, c, x[i+ 1], 12, -389564586);
  c = md5_ff(c, d, a, b, x[i+ 2], 17,  606105819);
  b = md5_ff(b, c, d, a, x[i+ 3], 22, -1044525330);
  a = md5_ff(a, b, c, d, x[i+ 4], 7 , -176418897);
  d = md5_ff(d, a, b, c, x[i+ 5], 12,  1200080426);
  c = md5_ff(c, d, a, b, x[i+ 6], 17, -1473231341);
  b = md5_ff(b, c, d, a, x[i+ 7], 22, -45705983);
  a = md5_ff(a, b, c, d, x[i+ 8], 7 ,  1770035416);
  d = md5_ff(d, a, b, c, x[i+ 9], 12, -1958414417);
  c = md5_ff(c, d, a, b, x[i+10], 17, -42063);
  b = md5_ff(b, c, d, a, x[i+11], 22, -1990404162);
  a = md5_ff(a, b, c, d, x[i+12], 7 ,  1804603682);
  d = md5_ff(d, a, b, c, x[i+13], 12, -40341101);
  c = md5_ff(c, d, a, b, x[i+14], 17, -1502002290);
  b = md5_ff(b, c, d, a, x[i+15], 22,  1236535329);

  a = md5_gg(a, b, c, d, x[i+ 1], 5 , -165796510);
  d = md5_gg(d, a, b, c, x[i+ 6], 9 , -1069501632);
  c = md5_gg(c, d, a, b, x[i+11], 14,  643717713);
  b = md5_gg(b, c, d, a, x[i+ 0], 20, -373897302);
  a = md5_gg(a, b, c, d, x[i+ 5], 5 , -701558691);
  d = md5_gg(d, a, b, c, x[i+10], 9 ,  38016083);
  c = md5_gg(c, d, a, b, x[i+15], 14, -660478335);
  b = md5_gg(b, c, d, a, x[i+ 4], 20, -405537848);
  a = md5_gg(a, b, c, d, x[i+ 9], 5 ,  568446438);
  d = md5_gg(d, a, b, c, x[i+14], 9 , -1019803690);
  c = md5_gg(c, d, a, b, x[i+ 3], 14, -187363961);
  b = md5_gg(b, c, d, a, x[i+ 8], 20,  1163531501);
  a = md5_gg(a, b, c, d, x[i+13], 5 , -1444681467);
  d = md5_gg(d, a, b, c, x[i+ 2], 9 , -51403784);
  c = md5_gg(c, d, a, b, x[i+ 7], 14,  1735328473);
  b = md5_gg(b, c, d, a, x[i+12], 20, -1926607734);

  a = md5_hh(a, b, c, d, x[i+ 5], 4 , -378558);
  d = md5_hh(d, a, b, c, x[i+ 8], 11, -2022574463);
  c = md5_hh(c, d, a, b, x[i+11], 16,  1839030562);
  b = md5_hh(b, c, d, a, x[i+14], 23, -35309556);
  a = md5_hh(a, b, c, d, x[i+ 1], 4 , -1530992060);
  d = md5_hh(d, a, b, c, x[i+ 4], 11,  1272893353);
  c = md5_hh(c, d, a, b, x[i+ 7], 16, -155497632);
  b = md5_hh(b, c, d, a, x[i+10], 23, -1094730640);
  a = md5_hh(a, b, c, d, x[i+13], 4 ,  681279174);
  d = md5_hh(d, a, b, c, x[i+ 0], 11, -358537222);
  c = md5_hh(c, d, a, b, x[i+ 3], 16, -722521979);
  b = md5_hh(b, c, d, a, x[i+ 6], 23,  76029189);
  a = md5_hh(a, b, c, d, x[i+ 9], 4 , -640364487);
  d = md5_hh(d, a, b, c, x[i+12], 11, -421815835);
  c = md5_hh(c, d, a, b, x[i+15], 16,  530742520);
  b = md5_hh(b, c, d, a, x[i+ 2], 23, -995338651);

  a = md5_ii(a, b, c, d, x[i+ 0], 6 , -198630844);
  d = md5_ii(d, a, b, c, x[i+ 7], 10,  1126891415);
  c = md5_ii(c, d, a, b, x[i+14], 15, -1416354905);
  b = md5_ii(b, c, d, a, x[i+ 5], 21, -57434055);
  a = md5_ii(a, b, c, d, x[i+12], 6 ,  1700485571);
  d = md5_ii(d, a, b, c, x[i+ 3], 10, -1894986606);
  c = md5_ii(c, d, a, b, x[i+10], 15, -1051523);
  b = md5_ii(b, c, d, a, x[i+ 1], 21, -2054922799);
  a = md5_ii(a, b, c, d, x[i+ 8], 6 ,  1873313359);
  d = md5_ii(d, a, b, c, x[i+15], 10, -30611744);
  c = md5_ii(c, d, a, b, x[i+ 6], 15, -1560198380);
  b = md5_ii(b, c, d, a, x[i+13], 21,  1309151649);
  a = md5_ii(a, b, c, d, x[i+ 4], 6 , -145523070);
  d = md5_ii(d, a, b, c, x[i+11], 10, -1120210379);
  c = md5_ii(c, d, a, b, x[i+ 2], 15,  718787259);
  b = md5_ii(b, c, d, a, x[i+ 9], 21, -343485551);

  a = safe_add(a, olda);
  b = safe_add(b, oldb);
  c = safe_add(c, oldc);
  d = safe_add(d, oldd);
 }
 return Array(a, b, c, d);
}
function md5_cmn(q, a, b, x, s, t) {
 return safe_add(bit_rol(safe_add(safe_add(a, q), safe_add(x, t)), s),b);
}
function md5_ff(a, b, c, d, x, s, t) {
 return md5_cmn((b & c) | ((~b) & d), a, b, x, s, t);
}
function md5_gg(a, b, c, d, x, s, t) {
 return md5_cmn((b & d) | (c & (~d)), a, b, x, s, t);
}
function md5_hh(a, b, c, d, x, s, t) {
 return md5_cmn(b ^ c ^ d, a, b, x, s, t);
}
function md5_ii(a, b, c, d, x, s, t) {
 return md5_cmn(c ^ (b | (~d)), a, b, x, s, t);
}
function safe_add(x, y) {
 var lsw = (x & 0xFFFF) + (y & 0xFFFF);
 var msw = (x >> 16) + (y >> 16) + (lsw >> 16);
 return (msw << 16) | (lsw & 0xFFFF);
}
function bit_rol(num, cnt) {
 return (num << cnt) | (num >>> (32 - cnt));
}
function str2binl(str) {
 var bin = Array();
 var mask = (1 << chrsz) - 1;
 for(var i = 0; i < str.length * chrsz; i += chrsz) {
  bin[i>>5] |= (str.charCodeAt(i / chrsz) & mask) << (i%32);
 }
 return bin;
}
function binl2hex(binarray) {
 var hex_tab = hexcase ? "0123456789ABCDEF" : "0123456789abcdef";
 var str = "";
 for(var i = 0; i < binarray.length * 4; i++) {
  str += hex_tab.charAt((binarray[i>>2] >> ((i%4)*8+4)) & 0xF) + hex_tab.charAt((binarray[i>>2] >> ((i%4)*8  )) & 0xF);
 }
 return str;
}
var pwmd5log = new Array();
function pwmd5() {
 if(!$(pwmd5.arguments[0]) || $(pwmd5.arguments[0]).value == '') {
  return;
 }
 numargs = pwmd5.arguments.length;
 for(var i = 0; i < numargs; i++) {
  if(!pwmd5log[pwmd5.arguments[i]] || $(pwmd5.arguments[i]).value.length != 32) {
   pwmd5log[pwmd5.arguments[i]] = $(pwmd5.arguments[i]).value = hex_md5($(pwmd5.arguments[i]).value);
  }
 }
}

下面是完整代码:

(0)

相关推荐

  • 易语言CNA算法实现快速加密解密文件的代码

    CNA文件加解密数据算法 .版本 2 .支持库 spec .支持库 iext .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 .局部变量 code, 字节集, , , 加密密码 .局部变量 test, 字节集, , , 要加密码的数据字节集 .局部变量 i, 整数型, , , 查看反馈信息 ' 简单例子 test = 到字节集 ("aaaaaaa aaa.*#(中.329}@#¥") code = 到字节集 ("中.有 3a#") CNA数据 (t

  • 详解易语言字节集动态加密

    原理很简单: 字节集1(n位随机字节集) 字节集2(m位随机字节集) 被加密字节集=字节集1+被加密字节集+字节集2 被加密字后的字节集=加密(被加密字节集,密码) 解密后的字节集=解密(被解密字节集,密码) 解密后的字节集=字节集1+被加密字节集+字节集2 解密后的字节集=取字节集中间(解密后的字节集,n+1,取字节集长度 (解密后的字节集) -m-n) .版本 2 .支持库 dp1 .子程序 加密_加密or解密, 字节集 .参数 字节集数据, 字节集 .参数 加密or解密, 整数型, , 1

  • 总结易语言MD5加密16位和32位方法

    以下是小编整理的方法内容: 取数据摘要 (到字节集 (文本)) 这个取到的是32位的 取文本中间 (取数据摘要 (到字节集 (文本)), 9, 16) 这个取到的是16位的 方法很简单,大家需要自己在程序中测试以下,感谢大家对我们的支持.

  • 易语言给文件加密的方法

    易语言加密文件夹源码例程程序结合易语言扩展界面支持库和操作系统界面功能支持库,实现文件夹的加密. 1.打开易语言软件 2.创建一个像我一样的窗口 当然也可以自己设计一些很好看的. 3.然后写出各个控件的执行命令源码 4.然后再点击上方的运行按钮 5.没有出问题,就会运行成功. 6.然后再编译软件,两个编译任选一个进行编译. 7.编译成功就会显示软件了. 总结:以上就是关于易语言对文件进行加密的内容,感谢大家的阅读和对我们的支持.

  • 易语言实现文件夹加密的代码

    加密锁上文件夹 此功能需要加载精易模块5.6 .版本 2 .支持库 shell .支持库 spec .支持库 dp1 .程序集 窗口程序集1 .程序集变量 密码, 文本型 .子程序 _按钮_浏览文件_被单击 编辑框_路径.内容 = 浏览文件夹 ("打开你需要加密的文件", ) .子程序 _按钮_加密_被单击 .局部变量 文件夹名称, 文本型 .判断开始 (寻找文本 (编辑框_路径.内容, "[已加密]", , 假) ≠ -1) 提示框 ("已加密"

  • 易语言数据加密方法步骤

    互联网的时代同样是信息爆炸的时代,我们每天都在进行着数据传输和交换,数据的诞生,不仅丰富了我们的日常生活,而且更给我们的工作和学习带来了无尽的便利.殊不知,数据的安全是一个极其重要的问题,那么,如何保证信息数据的安全呢?今天,笔者就教大家使用易语言给数据加密,一起来学习吧! 1.运行"易语言"主程序,弹出"新建工程对话框"→"Windows窗口程序"→"确定",进入"Windows窗口程序工程界面". 2.

  • 详解易语言调用js实现md5加密方法

    易语言调用js需要用到拓展组件的脚本组件, 在窗口创建完毕的事件里给脚本组件初始化设置下脚本组件的语言属性,在这里以JScript为例: 脚本组件执行脚本的简单方法是:  脚本组件1.执行 ()  然后根据需要调用的脚本函数   脚本组件1.运行 () 首先看下脚本组件1.执行 () 的参数和返回值: 调用格式: 〈逻辑型〉 对象.执行 (文本型 脚本代码) - 脚本语言支持组件->脚本组件 英文名称:Execute 执行指定的代码文本.返回真为执行正常,返回假为出错,错误信息可以从"错误

  • 易语言调用JS代码方法总结

    以下是我们易语言调用JS代码的步骤 步骤1: 步骤2: 步骤3: 步骤4: 以上就是四个详细步骤,感谢大家对我们的支持.

  • 详解易语言的程序的输入方法概念

    为了便于输入程序,易语言内置四种名称输入法:首拼.全拼.双拼.英文.三种拼音输入法均支持南方音及多音字.首拼输入法及全拼输入法在系统中被合并为"首拼及全拼输入法",系统自动判别所输入的拼音是首拼方式还是全拼方式.双拼输入法的编码规则与 Windows 系统所提供的双拼输入法一致.例如:欲输入"取整 (1.23)"语句,各种输入法的输入文本为: ・ 首拼及全拼输入法: qz(1.23) 或者 quzheng(1.23) ・ 双拼输入法: quvg(1.23) ・ 英文

  • 图文详解易语言dll调用

    易语言dll使用教程 1.图一不用说了把,打开易语言谁都会,本教程通用易语言5.11后所有版本(包括5.11) 2.图二:点击新建程序,选择第三个,windows动态链接库. 3.新建一个子程序,然后名字自定义,但是要记住名字哦,还有箭头所指,需要点击为公开,这样才能调用.箭头二是返回的数据,源码需要. 4.保存的文件名随意,但是调用的时候需要用到的文件名. 5.在新建个易语言窗口程序 ,新建个空白的dll框架,第一名字随意,返回要和dll里面访问的一样.如文本型. 新建的易语言窗口程序需要和d

  • 易语言调用JS取随机数

    易语言自带的取随机数,取小范围的数字还行,大了就不行了,后面的根本取不到,所以我们需要借且JS来取随机数 1.启动易语言新建一个空白的程序或者模块都可以 2.双击界面,进入代码编辑,在代码界面新建一个子程序,修改为子程序_取随机数_JS 3.让鼠标指针放在上面,按回车添加2个整数型参数,分别命名为[起始值][终止值] 4.可以把公开勾上,这样可以复制到模块里面进行调用.第一个参数[起始值]设置为可空,如果没有传入参数,默认就是为0 5.添加其他JS代码,完成编写,纯代码在最后,直接复制到易语言界

  • 详解易语言字符命令

    易语言字符命令,这个命令比较少见,但是有用,我教大家操作. 1.易语言新建一个windows窗口 点击进入代码编辑区 具体看如何用易语言编写自己第一个程序? 2.我们输入 这个命令 字符() 3.展开这个字符命令 我们发现只有一个参数 4.这个参数比较少见,字节型它的取值范围为0~255 我们输入100看看 5.运用调试输出这个函数,具体看易语言调试输出函数实例详解 我们输入调试输出 (字符 (100)) 6.结果为 d 这个需要对照 ASCII表看看

  • 详解易语言变量用法和原理

    易语言是一款可视全中文的编程语言,由于他的简单易用,深受国人喜欢,下面我来为大家介绍易语言变量的用法. 易语言变量,就像是数学中设x一样,顾名思义它是不定值的,它分为局部变量,全局变量,和程序集变量,下面我为用一个程序来向大家介绍这3种变量的区别. 打开易语言,新建一个windows窗口程序,将按钮按下图所示排列. 点击插入,选择窗口,插入一个新的窗口,点击按钮1,写入代码入下图所示, 点击窗口程序集,回车,添加一个程序集变量,命名为c,类型为文本型. 点击插入,分别添加全局变量,命名为q,类型

  • 详解易语言写ec模块的方法

    1.新建选择易语言模块 2.新建子程序,勾选公开,如果需要返回数据,填写返回数据.可以用变量,也可以用参数. 3."类"的应用,在插入中选择"类" 4.类名可以任意修改,勾选公开 新建方法名,勾选公开,需要返回,要填写返回类型. 5.调用模块中的"类",设置变量,然后变量类型填写要调用的"类" 也可以在模块中封装全局变量,然后类型填写"类",调用时可直接用此变量 感谢大家对我们的支持.

  • 实例详解易语言返回函数

    返回()是易语言的重要函数,很多函数都有返回值,就是用这个函数返回. 非无私奉献,拒绝看经验不回复,学懂了记得按照下面做: 具体操作请看图. 1.易语言新建一个windows窗口 点击进入代码编辑区 2.我们首先定义一个变量a 整数型 3.然后我们输入计次循环首 这个具体用法请看 易语言计次循环首函数实例讲解 4.我们在循环里输入函数 如果真(a>5) 这个具体用法请看 易语言如果真函数用法 5.然后我们在最后位置输入 调试输出(1) 运行结果为1 6.我们在如果真下面输入 返回() 发现没有结

  • 详解易语言IDE配置及编译输出

    易语言IDE 易语言(全称易语言·飞扬)公司垄断了易语言的版权,我们使用的IDE如果不出意外就是市面上唯一的一款易语言IDE(有不同的版本号) 支持库.程序.属性 『支持库』.『程序』.『属性』这三个按钮默认位于IDE的左下角 支持库:提供默认的代码库支持,可以通过工具->支持库配置选择增加新的支持库 程序:主要菜单,编写代码的地方 属性,在可视化状态下点击组件图片会显示相应的属性,可以直接在属性区域对组件进行简单设置(如标题.内容等) 快捷键 编写代码时使用Ctrl+Tab键在菜单间来回切换

随机推荐