(二十二)字符串的加密、解密
一、字符串的加密
方法一:
a.开始–>所有程序–>QTP–>Tools–>password ecoder
b.在password中输入需要加密的字符串
c.点击generate,在encoded String 中显示已加密的字符串
d.点击Copy赋值生成的字符串
在QTP中使用setSecure方法
语法:object.setSecure "5b23b9e5be5419ff434391325fa1e442fce8f258"
方法二:将DataTable中数据进行加密
a.选中需要加密数据所在的单元格
b.在右键菜单中,点击Data\Encrypt
c.单元格中显示被加密后的字符串
方法三:Crypt.Encrypt方法
Crypt Object
Description:The object used to encrypt strings.
Associated Method:
Description:Encrypts a string
Syntax:Crypt.Encrypt(Data)
Data:Type为string 是要加密的字符串
二、字符串解密
对任意不需要加密显示的文本框对象,使用setSecure方法,输入需要解密的字符串
对该对象使用GetROProperty方法获得该文本框显示的文本内容,即为解密后的字符串。
在Flight4a中,密码是在专家视图中是加密显示的,考虑一种情况:对于之前版本的系统做登录测试时,想要知道用的密码是什么,此时就需要解密。可以选用"用户名"不用加密解密的作为中介,来进行解密
Option Explicit
Dialog("Login").WinEdit("Agent Name:").SetSecure "5b246c6fd802606324fb4524696a776b"
Dim txt
txt=Dialog("Login").WinEdit("Agent Name:").GetROProperty("text")
Msgbox txt