有多个数据库 test1.mdb、test2.mdb、test3.mdb....很多。。怎么改conn能让它随机选择某个数据库文件。所有数据库都是一样的，只有一个表的内容不同。因为数据库太大访问网站时CPU彪满，我想把内容分别放到多个数据库文件。
本人小菜，麻烦把直接修改好的代码贴上来。
----------------conn.asp------------------------
<%
'防止在ie中注入 s
dim sql_injdata,SQL_inj,SQL_Get,SQL_Data
SQL_injdata = "'|and|exec|insert|select|delete|update|count|*|%|chr|mid|master|truncate|char|declare"
SQL_inj = split(SQL_Injdata,"|")

If Request.QueryString<>"" Then
 For Each SQL_Get In Request.QueryString
 For SQL_Data=0 To Ubound(SQL_inj)
 if instr(ucase(Request.QueryString(SQL_Get)),ucase(Sql_Inj(Sql_DATA)))>0 Then
 Response.Write "<Script Language=javascript>alert('请不要在参数中包含非法字符尝试注入！');history.back(-1)</Script>"
 Response.end
 end if
 next
 Next
End If
'防止在ie中注入 e
%>

<%
dim conn
dim connstr
dim db
db="../mdb/test.mdb" '数据库文件位置
on error resume next
connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn.open connstr
end if

sub CloseConn()
 conn.close
 set conn=nothing
end sub
%>
<%
function echo_lb1_4(str,str_zs1)

 x=split(str,"||")
 if x(0)<>"0" then
  sql2="select * from xm_lb_1 where id1="&x(0)&"  "
  Set rs2= Server.CreateObject("ADODB.Recordset")
  rs2.open sql2,conn,1,1
  name1=rs2("name")
 end if
 if x(1)<>"0" then
  sql2="select * from xm_lb_2 where id2="&x(1)
  Set rs2= Server.CreateObject("ADODB.Recordset")
  rs2.open sql2,conn,1,1
  name2=rs2("name")
 end if
 if x(2)<>"0" then
  sql2="select * from xm_lb_3 where id3="&x(2)
  Set rs2= Server.CreateObject("ADODB.Recordset")
  rs2.open sql2,conn,1,1
  name3=rs2("name")
 end if
 if x(3)<>"0" then
  sql2="select * from xm_lb_4 where id4="&x(3)
  Set rs2= Server.CreateObject("ADODB.Recordset")
  rs2.open sql2,conn,1,1
  name4=rs2("name")
 end if
 
 if name1<>"" then               j=1
 if name1<>"" and name2<>"" then           j=2
 if name1<>"" and name2<>"" and name3<>"" then          j=3
 if name1<>"" and name2<>"" and name3<>"" and name4<>"" then      j=4
 if j=4 then    echo_lb1_4= name1&str_zs1&name2&str_zs1&name3&str_zs1&name4
 if j=3  then      echo_lb1_4=name1&str_zs1&name2&str_zs1&name3
 if j=2  then          echo_lb1_4=name1&str_zs1&name2
 if j=1  then            echo_lb1_4=name1
end function

%>
-------------------------------