<%
db="chinese/datadatayhy/"&dataname&"" '
on error resume next '
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from config",conn,1,1
webname=trim(rs("webname"))
icp=rs("icp")
default=rs("default")
rs.Close
set rs=nothing
if default=1 then
response.redirect "chinese/index.asp"
end if
if default=2 then
response.redirect "english/index.asp"
end if
%>
<%=webname%>-网站首页