sql标签的外部access数据源支持相对路径-领先建站CMS提供服务商我们专注于CMS建站产品的研发

4396 查看	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

科汛商学院助您快速入门