一个简单实用的 vb 加密/解密算法

一个简单实用的 vb 加密/解密算法的相关文章

• 
  一个简单的加密/解密方法

  Private Function EncryptString(strString) Dim CharHexSet, intStringLen, strTemp, strRAW, i, intKey, intOffSet Randomize Timer intKey = Round((RND * 1000000) + 1000000) '##### Key Bitsize intOffSet = Round((RND * 1000000) + 1000000) '##### KeyOffSet Bitsize If IsNull(strString) = False Then strRAW = strString intStringLen = Len(strRAW) For i = 0 to intStringLen - 1 strTem...[ 查看全文 ]

  比你爹还范

  151
• 
  一个实用的VB屏幕程序

  标签：编程语言 网络编程

  在VB5.0具有面向对象的程序设计思想及可视化的编程方式，可开发出各种多媒体应用程序，颇得软件设计者青睐。笔者最近应用VB5.0编制了一程序，成功实现了“图文并茂”的屏幕效果，即：屏幕出现用户选定的一幅赏心悦目的图像，在图像下方有一行字幕缓缓地从屏幕右边向左边移动，全部文字移至左边消失后，从右边又平滑拖出字幕，字幕移动过程中既不影响图像的整体效果又能对图像进行提示、说明，使应用程序界面充...[ 查看全文 ]

  探究哦

  151
• 
  编译原理的一个简单的枚举算法

  标签：编程语言 网络编程

    模仿C 能判断#include;main();int;char;for;printf;scanf;{};  private   //在str中找第一个单词 如果 找到则返回第一个单词的地址（phrase）和下一个要分析单词的入口（nextptr）    //如果str是空串则返回false     function phrase(str:string;phrase,nextptr:pchar):bool; //     //括号匹配...[ 查看全文 ]

  寂寞碣石僧人

  21
• 
  VB面向对象编程的一个简单的演示程序

  这个例子，也可以看作是使用类模块的入门级的演示。 新建一个工程，在form1中添加3个文本框。我们希望对这三个文本框中输入的字符进行限制，第一个只允许输入数字，第二个只允许输入字母，第三个只允许输入大写字母。 一般的做法，可以在这三个文本框的keypress事件过程中分别写检查代码。好一点的方案，是把检查代码写成一个共用的过程，让这三个文本框的keypress事件去各自进行调用。 ...[ 查看全文 ]

  奋斗99小青年

  641
• 
  使用ASP加密算法加密你的数据（一）

  标签：ASP

    简介 首先简单介绍一下有关加密的背景。由于美国禁止几种密码算法的对外出口的 加密位数（例如SSL的40位加密限制），本文将介绍一种ASP可以使用的简单字符加密算法， 而不是那些受限制的加密算法。其实，这里介绍的加密算法对于一般的运用来说已经足够 解密人麻烦一阵子的了。它的加密基础是最简单的Vernum密码方法，我将在下一篇文章中 介绍这种密码。 它的基本原理是，需要...[ 查看全文 ]

  戈壁雏鹰

  671
• 
  用VB6做一个简单的文件上传组件(一)

  标签：ASP

    最近在单位做的一个项目里需要有文件上传的功能，正好手头一本书的附赠光盘里有一个上传组件，心中大喜。可惜随之便发现这是一个试用版，不给钱就只能用50次，太小气了！！好在头头催得不紧，时间充裕，干脆自己试着做一个，既可长经验值，又能长成就感，不试白不试！以下介绍的便是俺折腾了两天半捣鼓出来的一个只能说是雏形的玩意，区区三十行代码，大侠们不要笑俺哦，这只是写给与俺一样好奇心强但...[ 查看全文 ]

  霸道小徐

  11
• 
  一段php加密解密的代码

  标签：PHP

  <?php   $key = "This is supposed to be a secret key !!!";   function keyED($txt,$encrypt_key)   {   $encrypt_key = md5($encrypt_key);   $ctr=0;   $tmp = "";   for ($i=0;$i<strlen($txt);$i++)   {   if ($ctr==strlen($encrypt_key)) $ctr=0;   ...[ 查看全文 ]

  公鸡中的战斗机

  421
• 
  文本加密解密

  标签：Web开发

  第一步：把如下代码加入到head区域中 SCRIPT LANGUAGE="JavaScript" !-- Begin function Encrypt(theText) { output = new String; Temp = new Array(); Temp2 = new Array(); TextSize = theText.length; for (i = 0; i TextSize; i++) { rnd = Math.round(Math.random() * 122) + 68; Temp[i] = theText.charCodeAt(i) + rnd; Temp2[i] = rnd; } for (i = 0; i TextSize; i++) { output += String.fromC...[ 查看全文 ]

  通州三余启海银

  11
• 
  一个简单的时钟

  标签：编程语言 网络编程

  有诸多缺点，比如不是时间触发而是靠线程挂起 package com.zhou.clock; import java.awt.*; import java.awt.geom.*; import javax.swing.*; import java.lang.Math; import java.util.Date; public class Clock extends JFrame { ClockPane cp; public Clock (){ super("clock"); setDefaultCloseOperation(EXIT_ON_CLOSE); cp=new ClockPane(); cp.initTime(); //Container content=ge...[ 查看全文 ]

  dwid1850

  141
• 
  一个实用的JSP分页代码

  标签：Web开发

  有热心网友回复： str += " 转到select name='page' onChange=\"window.location.href='" + fileName + temp + "cur_page='+this.options[this.selectedIndex].value\""; 已经试过了，没问题 1.以下是实现分页的类PageResultSet 代码如下： package page.bean; import java.util.*; public class PageResultSet { /** * 分页数据 */ private Collection data = null; /** * 当前页 */ private ...[ 查看全文 ]

  我遇见了谁男

  1171
• 
  用VB6做一个简单的文件上传组件(二)

  标签：ASP

    接着上回，新建一个ActiveX DLLs类型的工程，并将缺省的工程名由“Project1”改为“Songbird”（当然你也有权不这样改，呵呵），将缺省的类名由“Class1”改为“FileUp”，至于为什么要这样改，以后你便知道了。     要想实现读取上传文件字节数据的功能，势必要涉及到Request对象，可是在VB中该怎么做呢？简单，只需要在工程中加入适当的类型库的参考即可。点击Project菜单选择R...[ 查看全文 ]

  开着铲车追宝马

  51
• 
  用VB设计一个定时闹钟程序

  标签：编程语言 网络编程

  使用win98的人一定知道其中有一个“计划任务"的应用程序,它能够到指定时间便开始工作。不要认为它很神秘,其实用VB来设计这样一个程序是非常容易的事,以下是一个简单的VB闹钟程序,可供各位使用VB的朋友参考,如有何不适之处,请多指点! 首先在form1上建立三个命令按钮,分别为command1(打开预启动的文件);command2(设定时间的按钮);第三个command3(即可启动)按钮可有可无;一个label1用来显示你预打开的文件名...[ 查看全文 ]

  孤狼不起床

  1171
• 
  VB制作一个通信卡片ActiveX控件

  标签：vb

  建立的"通信卡片"控件包括：姓名、职务、单位、地址和电话，如图1.1所示。 具体操作按以下步骤进行： 第一步：建立一个容器 启动Visual Basic 6.0，在新建工程对话框中选择"标准EXE"，单击"确定"按钮，建立一个启动过程，作为用户控件的容器。窗体的Caption属性设置为"通信卡片测试"。 第二步：增加一个工程（用户控件工程） 执行"文件"菜单中的"添加工程"命令，在"添加工程"...[ 查看全文 ]

  双重吊炸天

  461
• 
  常用加密算法

  public static string HashCryptString(string strText,string method){ if(method == "MD5"){ strText = System.Web.Security.FormsAuthentication.HashPasswordForStoringInConfigFile(strText,"MD5"); // MD5 md5 = new MD5CryptoServiceProvider(); // strText = System.Text.Encoding.UTF8.GetString(md5.ComputeHash(System.Text.Encoding.UTF8.GetBytes(strText))); } else if(method == "SHA1"){...[ 查看全文 ]

  小森森569

  21
• 
  一个ORACLE分页程序 挺实用的.

  标签：PHP

    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN" <HTML <HEAD <TITLEPaging Test</TITLE <META NAME="Generator" CONTENT="TextPad 4.0" <META NAME="Author" CONTENT="?" <META NAME="Keywords" CONTENT="?" <META NAME="Description" CONTENT="?" </HEAD <...[ 查看全文 ]

  大漠黑枸杞

  31
• 
  一个实用的CToolBar扩展类CToolBarEx

  标签：C语言教程 C语言函数

  一个实用的 CToolBar 扩展类 CToolBarEx 作者：xiaojin 下载源代码 我们知道，程序中的工具条是在CMainFrame中生成的，采用的类是CToolBar，使用起来很复杂。为此，对CToolBar的常用功能进行封装，生成了它的一个继承类CToolBarEx，大大简化了操作。本文参考了 VCKBASE 以前发表的关于工具条的文章，在此先表示感谢！ 编译环境：Windows 2000 Server sp3(en) 、VC++6.0 sp5...[ 查看全文 ]

  ___七宗罪丶

  531
• 
  一个非常简单的题

  标签：编程语言 网络编程

  /*使用方法可以建立英语库,每次可建立100个单词*/ #include io.h #include stdio.h #include stdlib.h #include time.h typedef strUCt {  char cha[50];  char eng[50]; }CTOE; void writefile(); void practicec(); int main() {  char id;  FILE *fp;  if((fp=fopen("g:ctoe.txt","r"))==NULL)/*检测文件...[ 查看全文 ]

  15755468

  11
• 
  一个简单的针插教程

  标签：拼布

  这个针插利用用过的罐头加上一点填充物就可以完成，这也是我喜欢它的原因之一，材料随手可得。 切一块 6 * 11.25英寸的布 对折然后用熨斗熨平整 然后打开，两边再向中间的中心线折叠 [ 查看全文 ]

  zm014520

  3151
• 
  一个非常实用的Javascript类库

  标签：Web开发

  一个Javascript 的类库，用于table内容排序。使用很方便，不用每次都去调用数据库了。 特别适合多表查询的排序。加上的style.display 切换，也可以实现分页。 效果演示 用法: 1.添加JS QUOTE: 以下是引用片段: 2.添加TABLE,注意的是:一定要有ID,class为"sortable" QUOTE: OK,可以了，简单的吧 如果觉得太单调，自己加点CSS吧，官方给出了改HEAD...[ 查看全文 ]

  菲baby杰

  11
• 
  一个ORACLE分页程序挺实用的.

  标签：Web开发

  !DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN" HTML HEAD TITLEPaging Test/TITLE META NAME="Generator" CONTENT="TextPad 4.0" META NAME="Author" CONTENT="?" META NAME="Keywords" CONTENT="?" META NAME="Description" CONTENT="?" /HEAD BODY BGCOLOR="#FFFFFF" TEXT="#000000&...[ 查看全文 ]

  青立凯文

  11