% aa= Request.ServerVariables("server_name") pp = replace(aa,"att.com.tw","") pp = replace(pp,".","") sql = "select f01,f02,f20 from meb_log_list where f01 ='" & pp & "' and f28='Y'" set rs=cnn.execute (sql) if not rs.eof then tit =rs("f20") end if %>