数据库受到限制怎么办？

网络整理 - 09-05

不知道你是否从经遇到过这样的空间，他限制你使用数据库的大小，比如ACCESS MYSQL都限制在100M以下，如果你感觉这个空间很实惠，但是数据库受到限制又想还用这样的空间怎么办，由于我自己就遇到这样的问题，自己写了一个代码和大家分享，我的思路就是一个数据库不能超过100M，那么十个呢？10*100＝1G，这样你的数据库还不够用吗？
代码如下，(数据库不受限制或高手可过)

判断数据库代码：
mdb=request.querystring("mdb")

调用代码：
if mdbsort<>"" then
sql="SELECT top 11 id,name from znwl_article where classid="&mdbsort&" order by click DESC"
else
sql="SELECT top 11 id,name from znwl_article order by click DESC"
end if
set rs=server.createobject("adodb.recordset")
if mdb=1 then
rs.open sql,conn1,1,1
namesort="wzyy"
elseif mdb=2 then
rs.open sql,conn2,1,1
namesort="yjzx"
...
else
response.write"信息错误"
end if

数据库连接代码
'定义数据库链接文件，根据自己的情况修改
Const AccessPath="数据库目录"
Const AccessFile="db1.mdb"
Const AccessFile1="db2.mdb"
...

'定义数据库连接
Dim Conn1,conn2
On Error Resume Next
Set Conn1= Server.CreateObject("ADODB.Connection")
Conn1.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(AccessPath&"/"&AccessFile)
Conn1.Open
'定义数据库连接2
Set conn2= Server.CreateObject("ADODB.Connection")
conn2.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(AccessPath&"/"&AccessFile1)
conn2.Open
...
代码可以做成类，方便调用，有想法的朋友可以自己试试

有用MYSQL数据库的朋友，可以按照这个思路写一个代码