一般站长都知道在网站建设语言asp当中，最常用到的是access和mssql两个数据库。很多程序都想开发成两个数据库都可以使用的模式，但是碍于两个数据库得一些sql语句不一致，所以导致很多程序都分两个没有必要的版本，就是access和mssql版！而事实上，我们可以通过对代码判断和识别，控制整个程序的兼容性。也就是说，将两个版本兼容成一个系统。例如我的asp飞云小说系统，就是两种数据库都可以运作的程序。
那么，到底如何让程序存在数据库兼容性并且得到高效的运作呢。下边我将以我的飞云小说系统做范例，说说我的一些控制方法和代码。
首先，在必要的时候放弃兼容性的追求，采用不同数据库不同代码。
前面第一点，我们对代码已经做了一个设置，就是数据库类型的设置。那么当我们遇到一些不能通过兼容性解决，或者是像conn.execute和open方式上的追求的时候。我们可以利用前面systemdatabasetype的参数设置进行判断，然后相应使用不同的代码。
如：
if systemdatabasetype = sql then
'mssql数据库时使用的代码
else
'access数据库时使用的代码
end if
这样就可以保证程序的高效性以及稳定性。这也是整个程序的兼容性的一种。
第二，我们要控制一个参数，让程序知道我们现在运作的是什么数据库。
如：飞云小说程序中的config.asp文件参数
以下为引用的内容：
const systemdatabasetype = access '系统数据库类型,sql为mssql 2000/2005数据库，access为ms access 2000数据库
这是兼容性开始的基础，是整个程序数据库的判别。所以是非常有必要设置这么一个参数的。
第三，正确使用兼容性代码，而不使用特色代码。
很多人在写mssql数据库的是很，都很喜欢使用conn.execute语句，而不使用open方式。虽然在速度上，很多时间conn.execute会比open方式要高速度一点。但是这不是一概而论的。
比如说，在一个判断是否已经存在的过程算法当中。如果你已经使用了open进行了bof或eof的判断，那么你还要使用conn.execute进行判断的话，那速度，肯定是不如在open直接修改的好。
而且，在代码当中open方式的兼容性，远远要高过conn.execute。例如时间函数now的使用上.(这个函数在access和mssql的区别，大家自己去百度)
第四，在追求兼容性的情况下，牺牲一点效率也是必要的。
第三点当中，如果你的过程不需要判断是否存在，就是在没有打开open的情况下的话。你可以使用conn.execute。但是我的不是一概而论的。比如说，如果是一个比较少用到，不是频繁读取的过程。我会选择使用open方式，而不使用conn.execute方式。
虽然这过程的速度会降低。可是这不影响到我的使用，所以我还是选择open方式。原因很简单，就是兼容性的选择。
最后，
数据库连接方式和常用函数的区分
在我的程序当中，conn.asp里边还存在下边的一段代码:
代码：
if systemdatabasetype = sql then
connstr = provider = sqloledb; user id = & sqlusername & ; password = & sqlpassword & ; initial catalog = & sqldatabasename & ; data source = & sqlhostip & ;
fy_true = 1
fy_false = 0
fy_now = getdate
fy_ordertype = desc
fy_datepart_d = d
fy_datepart_y = yyyy
fy_datepart_m = m
fy_datepart_w = ww
fy_datepart_h = hh
else
connstr= provider = microsoft.jet.oledb.4.0;data source = & server.mappath(mdb)
fy_true = true
fy_false = false
fy_now = now
fy_ordertype = asc
fy_datepart_d = 'd'
fy_datepart_y = 'yyyy'
fy_datepart_m = 'm'
fy_datepart_w = 'ww'
fy_datepart_h = 'h'
end if
这个代码，除了区别数据库连接方式之后，还将mssql和access常用的语句进行变量赋值。这样做的好处就是后面使用相关内容的时候可以直接使用调用变量的方法，而不再需要进行数据库类型的判断。
例如对比时间的datediff函数问题上：
代码：
select * from [表] where datediff('&fy_datepart_d&,数据库时间,'变量名)=0 order by id desc
这样就免去了数据库的判别，减少了代码量和实用性。