当前位置: 首页 > 图文教程 > 网络编程 > ASP > 数据库受到限制怎么办?

ASP
Web程序中网页间数据传递方法小结
加速ASP程序的显示速度
一个求最大值与最小值的函数
对Session和Cookie的区分与理解
ASP VBScript 函数速查表
用Asp隐藏文件路径,实现防盗链
如何使用ASP生成HTML文件
常用Email组件发送函数
用asp实现QQ在线查询
创建一个ASP通用分页类(一)
创建一个ASP通用分页类(二)
如何使用ASP制作类似安装向导的页面?
远程注册自己的组件
浅谈ASP中Request对象获取客户端数据的顺序
一个拷贝整个文件夹(包括子文件夹)的方法
十天学会ASP之第一天
十天学会ASP之第二天
十天学会ASP之第三天
十天学会ASP之第四天
十天学会ASP之第五天

ASP 中的 数据库受到限制怎么办?


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 171 ::
收藏到网摘: n/a

不知道你是否从经遇到过这样的空间,他限制你使用数据库的大小,比如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数据库的朋友,可以按照这个思路写一个代码