<% dim sql dim rs dim strAllowHTML dim strAllowflash dim ads1 dim ads2 sql="select * from config" set rs=server.createobject("adodb.recordset") rs.open sql,conn,1,1 strAllowHTML=rs("strAllowHTML") strAllowflash=rs("strAllowflash") ads1=rs("ads1") ads2=rs("ads2") rs.close %>