域名注册

虚拟主机

网站建设

企业邮局

网站优化

网站备案

服务器租用

服务器租用

服务器托管

其它服务

您现在的位置： 创新互联 >> 网站建设 >> 网站建设常见问题 >> ASP程序加密解密方法全面解析

ASP程序加密解密方法全面解析

作者：谭小姐 文章来源：网站建设部 点击数：1402 更新时间：2010-3-26

使用组件加密asp

以上被screnc加密过的程序，是可以解密的(解密方法下文有介绍)，如果你想彻底保护自己的asp代码，可以通过开发activex dll组件的方法进行保护。

Dll文件是被编译过的机器代码，如果没有源项目文件，是不可能被反编译的，所以组件加密这种方法最安全，也不可能被破解。下面我们来举例说明操作过程，例如你要保护以下asp代码：

以下是引用片段：

　　set rs=server.createobject("adodb.recordset")

　　sql="select * from gq where xs=1 order by date asc"

　　rs.open sql,conn,1,1

　　if rs.eof and rs.bof then

　　response.write"<A HREF=new0.asp?lbid=gqx ><%= gqx %></A>" <br />

　　else

　　Response.Write ""

　　end if

　　set rs=nothing

　　conn.close

　　set conn=nothing

可以把它们改写成VB组件，然后在ASP文件中调用组件即可。操作步骤如下：

　　(1)新建一个vb6的activex dll项目

　　在属性窗口中，命名你的库模块和项目文件(例如项目名lacl，模块名disp)，以后在asp文件中，调用的对象名将为lacl_disp

　　选择vb6中的项目菜单中的references ，选中microsoft activex data objects 2.0 library

　　(2)编写VB组件

　　接下来把<欲保护的asp代码>改写成VB组件，代码如下：

以下是引用片段：

public function html_combo(disp_table as string) as string

dim outstring as string

dim conn as adodb.connection

dim rst as adodb.recordset

dim sqlstring as string

set conn = createobject("adodb.connection")

set rst = createobject("adodb.recordset")

sqlstring = "select * from " & disp_table & " where xs=1 order by date asc"

'以上是在VB中打开数据库操作，数据库中的表名、字段名，你可以根据自己的需要修改

conn.open "dsn=sumnet"

rst.open sqlstring, conn, 3, 3

if rst.eof and rst.bof then

outstring ="还没有这类单位信息"

else

rst.movefirst

outstring = "<A HREF=new0.asp?lbid="&request("lbid") & "></A>"

end if

html_combo = outstring

rst.close

conn.close

end function

　　写好以上VB代码后，保存项目并开始编译。

(3)生成安装文件

　　打开visual studio 6中附带的package deployment wizard程序，选择刚才建立的activex项目文件lacl;选择package，选择要打包的脚本或使用默认脚本，选择标准安装，为生成的安装文件选择一个存放目录，选择single　cab. 其他均默认;然后单击下一步，安装文件就自动生成了!

(4)在IIS服务器上安装组件

　　在IIS服务器上运行这个安装文件，把组件安装到服务器上。

上一篇文章：网站建设中asp提取随机记录

下一篇文章：网站制作中div+css与table+css的优缺点