% Call SiteInfo if ISHTML = 1 then Response.expires = 0 Response.expiresabsolute = Now() - 1 Response.addHeader "pragma", "no-cache" Response.addHeader "cache-control", "private" Response.CacheControl = "no-cache" End If ID=request.QueryString("ID") if ID <> "" or IsNumeric(ID) then set rs = server.createobject("adodb.recordset") sql="select * from LiangjingCMS_Others where "&ViewFlag&" and ID="&ID rs.open sql,conn,1,3 If rs("SeoKeywords"&Language) <> "" Then SeoKeywords=rs("SeoKeywords"&Language) Else SeoKeywords=rs("OthersName"&Language) End If If rs("SeoDescription"&Language) <> "" Then SeoDescription=rs("SeoDescription"&Language) Else SeoDescription=rs("OthersName"&Language) End If SeoTitle=rs("OthersName"&Language) End If rs.close set rs=Nothing Headid=7 %>