账号通
    

账号  

密码  

4388

查看

6

回复
主题:sql标签的外部access数据源支持相对路径 [收藏主题] 转到:  
fqzcp 当前离线

162

主题

2

广播

0

粉丝
添加关注
级别:一年级

用户积分:2757 分
登录次数:195 次
注册时间:2007/10/28
最后登录:2015/5/31
fqzcp 发表于:2008/11/30 16:10:00   | 显示全部帖子 查看该作者主题 楼主 
做在线知识付费 选科汛云开店

这段时间在搞一个房产网站www.fq2009.com

需要用自定义SQL标签调用ACCESS论坛数据库里的信息。用官方默认的数据库连接方式要填写物理路径,感觉在开发和测试的时候有点麻烦,不是很方便。在不同电脑里面都要用“数据库字段替换”改SQL标签的数据库连接。

昨天看到论坛里讲的5.5版本的时候会支持外部access数据源相对路径。昨晚自己分析了下代码,修改下,不是啦,可以了。

 

修改admin/Include/LabelFunctionAdd.asp文件里的代码:

1.把“Sub testsource()”里面的“tconn.open str”替换为:

 

    If request("lj_type")=1 then '修改自定义SQL标签,数据库为外部ACCESS数据库时候,连接代码直接填写相对文件地址。 庄昌平 2008-11-30
       tconn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(str)
    Else
       tconn.open str
    End If

 

2.把“function testsource()”里面的:

    var url = 'labelfunctionadd.asp';
    var pars='action=testsource&str='+str;

 

   替换为:

   

以下内容只有回复后才可以浏览,请先登录!

3.把“Sub OpenExtConn()”里面的“tconn.open datasourcestr”替换为:

   If DataSourceType=1 Then '修改自定义SQL标签时,数据库为外部ACCESS数据库时候,连接代码直接填写相对文件地址。 庄昌平 2008-11-30
   tconn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(datasourcestr)
   Else
   tconn.open datasourcestr
   End If

 

第二步:ks_cls/Kesion.Label.SQLCls.asp文件里的最底部代码:

 

   把“tconn.open datasourcestr”同样替换为:

   If DataSourceType=1 Then '修改自定义SQL标签,数据库为外部ACCESS数据库时候,连接代码直接填写相对文件地址。 庄昌平 2008-11-30
   tconn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(datasourcestr)
   Else
   tconn.open datasourcestr
   End If

 

其实原理很简单!我的QQ:744503198

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.06299秒 powered by KesionCMS 9.0