PC6下载站

分类分类

结束ADOVB.INC的办法

关注+2004-11-07作者:蓝点

我在国外看到一篇文章,现转译如下。。。的确很有帮助



ASP的一个缺点是当我们在使用一个组件的时候,并不是拿来就可以用了比如你要使用ADO的时候,你得先包含ADOVBS.inc文件或者做类似的工作,看下面的代码:





<%

   Dim objConn, strSQL

   Set objConn = Server.CreateObject("ADODB.Connection")

   objConn.Open "DSN=Blah"



   strSQL = "SELECT * FROM Table1"



   Dim objRS

   Set objRS = Server.CreateObject("ADODB.Recordset")

   objRS.Open strSQL, objConn, adOpenKeyset



   '...

%>



现在让我们换个别的方法试试看

用METADATA标签



该标签的格式如下:





首先,你需要set TYPE="typelib",其中FILE和UUID两个只需要指定一个就可以了

您可以直接指定TLB或者dll文件给FILE属性。

打个比方,在我的机器上,我是这样做的:















现在让我们看一下怎么替换ADOVBS.INC文件

在原来包含该文件的位置替换成如下代码:





<%

   Dim objConn, strSQL

   Set objConn = Server.CreateObject("ADODB.Connection")

   objConn.Open "DSN=Blah"



   strSQL = "SELECT * FROM Table1"



   Dim objRS

   Set objRS = Server.CreateObject("ADODB.Recordset")

   objRS.Open strSQL, objConn, adOpenKeyset



   '...

%>





但是,我原来在原来的页面使用ADOVBS。INC好好的,为什么要使用这么长的一窜代码呢,太麻烦了,是的,是有点麻烦,但是您可以把这段代码放在GLOBAL,ASA里,那样你可以用APPLICATION获得一个全局变量。

注意要放在
展开全部

相关文章

更多+相同厂商

热门推荐

  • 最新排行
  • 最热排行
  • 评分最高
排行榜

    点击查看更多

      点击查看更多

        点击查看更多

        说两句网友评论

          我要评论...
          取消