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

ASP
asp搜索两个以上的词的原理
如何使用花生壳?
asp汉字转换成汉语拼音代码
asp程序实现伪静态的代码
asp处理xml数据的发送、接收类
ASP中使用jmail发送邮件的函数
asp中获取字符串中的时间字符串
ASP按照字数限制自动截取标题内容
asp中将内容生成word文档的函数
用ASP自动清空IE缓存里的内容
asp检测conn.execute是否执行成功的函数
自动获取当前页面URL的ASP函数
ASP采集中获取网页内所需的html代码
asp图片采集并且本地重命名保存的函数
如何使用asp去字符串中的超链接
asp网站通过限制请求防止被采集的函数
asp利用正则去掉字符串中所有html内容
用ASP取出HTML里面的图片地址的函数
fso实现整个文件夹内容的复制到另一个文件夹中
适合所有表的添加、删除、修改的函数

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 65 ::
收藏到网摘: 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数据库的朋友,可以按照这个思路写一个代码