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

ASP
嵌入式Web视频点播系统实现方法
GB与BIG5内码转换COM原代码
金额阿拉伯数字转换为中文的存储过程
利用 WSH 作定时工作流程
用InstallShield 进行 ASP 软件的打包和自动安装
服务器获得客户端时间的方法
关于如何读出图片的高度与长度的总结
按下回车键指向下一个位置的一个函数
一个不错的随机函数
一套加解密字符串的函数
一段加密函数(base64)
一段加密函数
使用asp实现支持附件的邮件系统(三)
使用asp实现支持附件的邮件系统(二)
使用asp实现支持附件的邮件系统(一)
检查当前目录下是否存在指定的文件,如果存在就重新命名
MD5加密的javascript实现例子
如何在服务器端调用winzip命令行对上传的多个文件打包压缩
MD5不可逆加密算法的ASP实现实例
看人家用使用InstallShield制作ASP安装程序(6)

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


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