我的一亩三分地 我就喜欢!
13fen  设为主页
 收藏本站
 
当前位置: > 一亩三分地：首页 > 网络学院 > 网络编程 > ASP专区 > Asp未分类 > 使用组件来保护你的ASP代码
热门文章排行
热门文章排行 手推车”功能的实现(10-07)
八大法则防范ASP网站漏洞(10-23)
ASP教程十一、调试ASP脚本(10-23)
在JSP中访问数据库大全(10-23)
虚机服务中常见Asp.Net低级错误一览(03-21)
精采文章排行
精采文章排行 ASP.NET实现抓取网页中的链接(11-15)
ASP连接数据库的11种方法(11-10)
如何动态创建网页的RSS内容摘要(11-10)
ASP网站漏洞及入侵防范方法(11-10)
ASP自定义函数：对字符串正则替换(11-10)
技术专题推荐
网管论坛交流
　

使用组件来保护你的ASP代码 

作者:佚名   来源:一亩三分地   点击:   日期:2007-03-30
以前大家谈了很多有关打开数据库连接安全的问题，现在我再提出一种思路
使用ActiveX DLL来保护你的代码。（既可以不用为使用共享的加密软件而发愁，
更重要的是可以自己来顶制加密方法了，享受一下“一切尽在掌握之中”的感觉。
同时也为了让大家都自己动手来做出自己的组件来。）

ActiveX DLLs是被编译过的机器代码，如果没有源项目文件的话是不能够被编译的。
这个技术使得开发者有可能开发出公共的自动化程序，并且把它们作为shareware版本的程序发布
这个大家在chinaasp中销售的一些组件中就可以看到这个技术的运用。
如果你想保护你的ASP中的一些代码的安全，例如你不想让别人看见你是使用什么连接到
数据库的，或者不想让别人看到你的某个比较重要的函数是怎么完成的，或者某个重要的
流程（cAkk可以参阅），你就可以通过不断的开发你自己的组件，这可是个dll文件，就是别人得到了
这个dll文件，一时半会也根本不能够得到你要保护的重要信息。而且你自己开发的这些组件
给你的程序带来了源源不断的新功能。

下面就举一个很常用的，大家都很关心的有关如何保密打开数据库的过程的例子。
例子很简单，就是在一个下拉框中显示数据库中某个字段的内容。
整个过程如下：
1。新建一个VB6的ActiveX DLL项目
2。在属性窗口中，命名你的库模块和项目文件。例子中为keiths_lookup项目名和lookup模块名.
  这写名字是你在ASP中将引用到的dll函数名（在ASP中的对象名将为keiths_lookup.lookup）。
3.将项目和库模块使用同样的名字存盘（当然了，后缀是不能够一样的哦）。
4。从VB6中的项目菜单中选择References .然后选中Microsoft ActiveX data objects 2.0 library, Microsoft
    ActiveX Data Objects Recordset 2.0 library.
文件的代码如下：
  Public Function html_combo(comboname As String, Lookup_field 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 [Lookup_Description],[Lookup_Key] FROM _
            [Lookup_Table] WHERE [Lookup_Field] = '" & Lookup_Field & "'"
     
    '在这可输入你连接数据库的用户名和密码，现在就算客户端看见了ASP源代码
    '他也不可能知道你使用的是什么密码了，呵呵
    conn.Open  "DSN=Sumnet;UID=;PWD=.;"
    rst.Open sqlstring, conn, 3, 3

      If Not rst.EOF Then
              rst.MoveFirst
              outstring = "<Select name='" & comboname & "'>"
              Do While Not rst.EOF
              outstring = outstring & "<Option Value='" &  rst.Fields("lookup_key") & "'>" & _
                  rst.Fields("lookup_description") & "</Option> "
                    rst.MoveNext
              Loop
      End If
   
      outstring = outstring & "</Select>"
      html_combo = outstring

      rst.Close
      conn.Close   
End Function
代码结束，呵呵，基本上没什么技术难点把，现在保存你的项目并且开始编译工作。
1。打开Visual Studio 6中带的Package Deployment Wizard程序。
2。选择你刚才建立的ActiveX项目文件。
3。选择Package
4。选择你要打包的脚本或使用默认脚本
5。选择标准安装
6。选择一个放置你安装文件的目录
7。选择single cab.
8。其他均默认，然后单击下一步
9。现在安装程序完成后，把它拿到你的IIS服务器上安装把。

下面给出如何调用你自己做的这个组件的代码：
  <%@ Language="VBSCRIPT" %>
  <%
  Set look = Server.CreateObject("keiths_lookup.lookup")
  %>                         
  <HTML>
  <BODY>
  <%=look.html_combo("State","States")%>
  <BR>
  <%=look.html_combo("Position","Positions")%>
  <BR>
  <%=look.html_combo("Age_group","Age_Groups")%>                           
  </BODY>
  </HTML>
你看，asp如此的简单，谁看见了源文件你都不用担心了，可以看到，
使用ActiveX DLL技术可以很好的保护你的重要的代码，你需要安全的部分，
但我可不希望以后大家都牢牢地看住自己的代码不愿意公开了，毕竟
国内的软件行业还远远落后，需要大家齐心协力才能够一起进步呀。


【文章评论】 【收藏本文】 【推荐好友】 【打印本文】 【论坛讨论】

   相关文章:
·ASP中巧用Response属性 ·第六课:ASP脚本循环语句
·在 Web 页上使用条件数值格式 ·连接数据库查询手册（不仅仅适用于asp）
·警惕"给你的FileSystemObject对象加把锁" ·用ASP做全文检索

   文章评论:(条)
  
 请留名： 匿名评论   点击查看所有评论 网管论坛
 

  责任编辑:一分  声明：刊登此文章是为了传递更多信息,文章内容仅供参考,转载请注明出处。