<%Id = Request.QueryString("Id") varSQL = "SELECT Dominio, NomeEmpresa, Endereco, Numero, Bairro, Cidade, Estado, CEP, Telefone, Fax, Email, SiteSlogan, SiteDescricao, SitePalavras, SiteStatus FROM tbl_Configuracoes" Set rsPrincipal = Conexao.Execute(varSQL) Dominio = rsPrincipal("Dominio") NomeEmpresa = rsPrincipal("NomeEmpresa") Endereco = rsPrincipal("Endereco") Numero = rsPrincipal("Numero") Bairro = rsPrincipal("Bairro") Cidade = rsPrincipal("Cidade") Estado = rsPrincipal("Estado") Telefone = rsPrincipal("Telefone") Fax = rsPrincipal("Fax") Email = rsPrincipal("Fax") SiteSlogan = rsPrincipal("SiteSlogan") SiteDescricao = rsPrincipal("SiteDescricao") SitePalavras = rsPrincipal("SitePalavras") SiteStatus = rsPrincipal("SiteStatus") Set rsPrincipal = Nothing%>