亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 學院 > 開發設計 > 正文

如何對字符串進行加密解密

2019-11-18 17:51:27
字體：大 中 小
來源：轉載
供稿：網友
本人在操作數據庫時，考慮到該數據庫還有可能被其他軟件打開，所以想能否有另外一種方式把數據庫中數據進行加密呢，也
就是說，即使別人利用其他的軟件打開了該數據庫，看到的也是一片亂碼，根本不知道數據庫進而是什么內容。出于這種情況，本人利用VB中自帶
RND（）函數的功能編寫了如下加密解密方法。
當RND（）的參數（我們稱它為種子）為負值時，同一種子產生同一個隨機序列，同時VB還具有強大的二進制技術功能。
這樣我們可以按以下方法實現字符串內容的加密解密。

源程序如下：

PublicFunctionStringEnDeCodecn(strSourceAsString,MA)AsString
'該函數只對中西文起到加密作用
'參數為：源文件，密碼
OnErrorGoToErrEnDeCode
DimXAsSingle
DimCHARNUMAsLong,RANDOMINTEGERAsInteger
DimSINGLECHARAsString*1
DimstrTmpAsString
IfMA<0Then
MA=MA*(-1)
EndIf
X=Rnd(-MA)
Fori=1ToLen(strSource)Step1'取單字節內容
SINGLECHAR=Mid(strSource,i,1)
CHARNUM=Asc(SINGLECHAR)
g:RANDOMINTEGER=Int(127*Rnd)
IfRANDOMINTEGER<30OrRANDOMINTEGER>100ThenGoTog
CHARNUM=CHARNUMXorRANDOMINTEGER
strTmp=strTmp&Chr(CHARNUM)
Nexti
StringEnDeCodecn=strTmp
ExitFunction
ErrEnDeCode:
StringEnDeCodecn=""
MsgBoxErr.Number&"/"&Err.Descr如果要解密的話，只須鍵入以下語句：
tmp1=stringendecn(tmp,75)

如有不妥之處，請與我聯系：
Flea_cyp@163.com->

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
久久久久久久999| 国模叶桐国产精品一区| 午夜精品一区二区三区在线视频| 激情久久av一区av二区av三区| 欧美精品videofree1080p| 久久精品99无色码中文字幕| 久热精品在线视频| 成人国产在线视频| xxx欧美精品| 国产精品第一区| 国产国语videosex另类| 国产日韩欧美黄色| 日韩视频欧美视频| 中文字幕亚洲一区二区三区五十路| 在线日韩精品视频| 国产精品美女久久久免费| 日韩av电影在线免费播放| 91九色视频导航| 日本精品久久久久久久| 日韩成人在线电影网| 日韩欧美国产中文字幕| 欧美性猛交xxxx乱大交3| 欧美激情免费在线| 日韩在线一区二区三区免费视频| 米奇精品一区二区三区在线观看| 91精品久久久久久久久久另类| 亚洲欧美国产日韩天堂区| 久久精品视频亚洲| 国产在线精品自拍| 亚洲国产欧美日韩精品| 久久影院中文字幕| 国产成人精品久久二区二区| 欧美激情视频一区二区| 91最新国产视频| 55夜色66夜色国产精品视频| 九九精品在线观看| 国产噜噜噜噜噜久久久久久久久| 日韩美女在线观看| 欧美亚洲激情视频| 久久久人成影片一区二区三区| 久久久人成影片一区二区三区| 91系列在线播放| 久久成人人人人精品欧| 91网站免费观看| 国产精品视频久久久| 欧美专区日韩视频| 久色乳综合思思在线视频| 国产成人午夜视频网址| 久久久久久成人| 日韩暖暖在线视频| 久99久在线视频| 精品久久久久久中文字幕大豆网| 国产精品老女人视频| 久久精品久久久久久国产 免费| 92福利视频午夜1000合集在线观看| 国产精品久久久久久久久| 国产精品一区二区久久精品| 亚洲精品女av网站| 亚洲精品一区av在线播放| 日韩中文字幕在线免费观看| 国产精品xxxxx| 丁香五六月婷婷久久激情| 亚洲japanese制服美女| 国产不卡一区二区在线播放| 狠狠久久五月精品中文字幕| 亲爱的老师9免费观看全集电视剧| 国产精品国产三级国产aⅴ浪潮| 日本精品视频在线| 狠狠色香婷婷久久亚洲精品| 最新国产精品拍自在线播放| 国产视频精品va久久久久久| 国产91精品最新在线播放| 精品免费在线视频| 热re91久久精品国99热蜜臀| 国产网站欧美日韩免费精品在线观看| 精品亚洲一区二区三区在线观看| 亚洲国产欧美在线成人app| 亚洲影视九九影院在线观看| 国产一区香蕉久久| 91色视频在线观看| 亚洲欧美福利视频| 欧美日本亚洲视频| 亚洲国产精品一区二区久| 国产日韩欧美影视| 91精品国产高清自在线看超| 亚洲一区二区三区四区在线播放| 最新亚洲国产精品| 影音先锋欧美精品| 久久综合亚洲社区| 日本免费一区二区三区视频观看| 欧美精品一区三区| 欧美激情极品视频| 国产成人精品免高潮在线观看| 国产亚洲欧美日韩精品| 最近2019年日本中文免费字幕| 欧美日韩精品在线| 欧美日韩福利在线观看| 欧美在线播放视频| 欧美电影在线观看网站| 777国产偷窥盗摄精品视频| 日本午夜人人精品| 5278欧美一区二区三区| 疯狂做受xxxx高潮欧美日本| 亚洲国产另类 国产精品国产免费| 欧美性猛交xxxxx免费看| 奇门遁甲1982国语版免费观看高清| 色婷婷久久av| 日韩精品在线观看网站| 欧美成人午夜剧场免费观看| 亚洲国产精品yw在线观看| 欧美视频在线视频| 成人精品视频久久久久| 亚洲综合成人婷婷小说| 亚洲视频在线播放| 国产亚洲免费的视频看| 欧美大片免费观看在线观看网站推荐| 日韩中文字幕网站| 不卡av电影院| 中文字幕亚洲无线码a| 日韩一区二区av| 欧美激情精品久久久久久蜜臀| 欧美在线日韩在线| 色综合伊人色综合网| 精品亚洲va在线va天堂资源站| 久青草国产97香蕉在线视频| 国产精品免费小视频| 中文字幕久热精品视频在线| 国产一区二区在线免费视频| 国产一区二区三区精品久久久| 精品露脸国产偷人在视频| 久久精品视频99| 国产在线视频一区| 成人精品一区二区三区电影免费| 8x海外华人永久免费日韩内陆视频| 久久久久久尹人网香蕉| 92国产精品视频| 91美女片黄在线观看游戏| 久久国产精品99国产精| 久久精品国产一区二区电影| 成人免费福利视频| 91国产高清在线| 久久av在线播放| 在线视频国产日韩| 精品福利在线视频| 国产午夜精品免费一区二区三区| 亚洲免费福利视频| 亚洲天堂av女优| 国产精品影院在线观看| 日本久久久久久| 国产日韩在线观看av| 亚洲偷欧美偷国内偷| 亚洲伊人一本大道中文字幕| 欧美人与性动交| 国产成人精品999| 最近中文字幕2019免费| 亚洲精品久久久久久久久久久久| 亚洲图片制服诱惑| 亚洲www在线| 欧美精品在线极品| 一本色道久久综合狠狠躁篇怎么玩| 欧美黄色成人网| 91av视频在线观看| 久久久精品一区| 一本一本久久a久久精品综合小说|