PEWEB

255) { if ( $Mens == 1 ) { $Mensagem .= ", "; } $Mens = 1; $Mensagem .= "Descriçăo com $TDescricao Caracteres.(Máximo 255)"; } } if ( empty($SitesPChave) ) { if ( $Mens == 1 ) { $Mensagem .= ", "; } $Mens = 1; $Mensagem .= "Palavras-Chave"; } if ( count($CategoriaCodigo) == 0 ) { if ( $Mens == 1 ) { $Mensagem .= ", "; } $Mens = 1; $Mensagem .= "Categoria"; } if ( $UFSigla == "0" ) { if ( $Mens == 1 ) { $Mensagem .= ", "; } $Mens = 1; $Mensagem .= "Estado"; } if ( empty($Cidade) ) { if ( $Mens == 1 ) { $Mensagem .= ", "; } $Mens = 1; $Mensagem .= "Cidade"; } if ( ! empty($DataValidade) ) { $ValidaData = ValidaData($DataValidade); if ( $ValidaData != "" ) { if ( $Mens == 1 ) { $Mensagem .= ", "; } $Mens = 1; $Mensagem .= $ValidaData; } else { if ( ! empty($DataValidade) ) { $DataInvAtual = date("Ymd"); $DataInvValidade = substr($DataValidade,6,4).substr($DataValidade,3,2).substr($DataValidade,0,2); if ( $DataInvValidade < $DataInvAtual ) { if ( $Mens == 1 ) { $Mensagem .= ", "; } $Mens = 1; $Mensagem .= "Data de Validade do Site Maior que Data Atual"; } } } } if ( empty($NomeQuemCadastrou) ) { if ( $Mens == 1 ) { $Mensagem .= ", "; } $Mens = 1; $Mensagem .= "Nome de quem Cadastrou"; } if ( empty($EmailQuemCadastrou) ) { if ( $Mens == 1 ) { $Mensagem .= ", "; } $Mens = 1; $Mensagem .= "Email de quem Cadastrou"; } if ( empty($NomeResponsavel) ) { if ( $Mens == 1 ) { $Mensagem .= ", "; } $Mens = 1; $Mensagem .= "Nome do Responsável"; } if ( empty($EmailResponsavel) ) { if ( $Mens == 1 ) { $Mensagem .= ", "; } $Mens = 1; $Mensagem .= "Email do Responsável"; } if ( $Mens == 0 ) { $Db = pg_Connect(Conexao()); pg_exec($Db,"BEGIN"); $Sql = "select SitesNome, SitesUrl, SitesDescricao from Sites "; $Sql .= "where SitesUrl = '$SitesUrl'"; $Resp = pg_exec($Db,$Sql); $Rows = pg_NumRows($Resp); if ( $Rows != 0 ) { $Linha = pg_fetch_row($Resp,0); $Mens = 1; $Mensagem = "Site já Cadastrado
\n"; $Mensagem .= "Nome: $Linha[0]
\n"; $Mensagem .= "Url: $Linha[1]
\n"; $Linha[2] = nl2br($Linha[2]); $Mensagem .= "Descriçăo: $Linha[2]
\n"; pg_exec($Db,"END"); } if ( $Mens == 0 ) { $Sql = "select max(SitesCodigo) as Codigo from Sites"; $Resp = pg_exec($Db,$Sql); $Linha = pg_fetch_row($Resp,0); $Codigo = $Linha[0]; if ( empty($Linha[0]) ) { $Codigo = 1; } else { $Codigo = $Linha[0] + 1; } # Insere Sites # $Sql = "insert into Sites values ("; $Sql .= "$Codigo,'$SitesNome','$SitesDescricao','$SitesUrl',"; $Sql .= "'$SitesPChave','$NomeQuemCadastrou','$EmailQuemCadastrou',"; $Sql .= "'$NomeResponsavel','$EmailResponsavel','$Cidade','$UFSigla',"; $Senha = CriaSenha(); $SenhaCript = crypt ($Senha,"P"); $DataInclusao = date("Y/m/d"); $DataValidade = trim($DataValidade); if ( empty($DataValidade) ) { $Sql .= "null, "; } else { $DataValidade = substr($DataValidade,6,4) . "/" . substr($DataValidade,3,2) . "/" . substr($DataValidade,0,2); $Sql .= "'$DataValidade', "; } if ( $Adm == 1 ) { $Aprovado = "S"; } else { $Aprovado = "N"; } $Sql .= "'$SenhaCript','$DataInclusao','$Aprovado')"; $Resp = pg_exec($Db,$Sql); if ( ! $Resp ) { ExibeErroBD("Sql: $Sql"); pg_exec($Db,"ROLLBACK"); exit; } # Insere Categorias # for ( $C = 0; $C < count($CategoriaCodigo); $C++ ) { $Sql = "insert into SiteCategoria values ($Codigo,$CategoriaCodigo[$C])"; $Resp = pg_exec($Db,$Sql); if ( ! $Resp ) { ExibeErroBD("Sql: $Sql"); pg_exec($Db,"ROLLBACK"); exit; } } pg_exec($Db,"COMMIT"); pg_exec($Db,"END"); pg_Close($Db); echo "\n"; echo "\n"; echo "PEWEB\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; $arquivo = "cabecalho_e_menu.txt"; $tamanho = filesize($arquivo); $arqtxt = fopen($arquivo, "r"); if ($arqtxt) { $reg = fread($arqtxt, $tamanho); echo $reg; } else { echo " "; } echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo " \n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "

		texto\n"; echo " \n"; echo "				\n"; if ( $Adm == 1 ) { echo "Cadastrar um novo site \n"; echo "Alterar os sites cadastrados \n"; echo "Listar os sites cadastrados provisoriamente \n"; } else { echo "Cadastrar um novo site \n"; echo "Alterar os sites cadastrados \n"; } echo " \n"; echo "Site cadastrado com sucesso \n"; echo "URL: $SitesUrl "; echo "Senha de Acesso: $Senha "; if ( $Adm == 1) { echo "PEWEB \n"; echo "www.peweb.com.br \n"; } echo "\n"; echo "
\n"; echo "Copyright Š 1996/2003 Evaldo Williams - Todos os direitos do autor reservados \n"; echo "

\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; exit; } } } ?> PEWEB Alterar os sites cadastrados
\n"; echo "Listar os sites cadastrados provisoriamente

\n"; } else { // Modifiquei o link substituindo a figura sitalt.gif pela frase "alterar os sites cadastrados" // echo "Alterar os sites cadastrados

\n"; // importaçăo de cabeçalho e menu - início $arquivo = "cabecalho_e_menu.txt"; $tamanho = filesize($arquivo); $arqtxt = fopen($arquivo, "r"); if ($arqtxt) { $reg = fread($arqtxt, $tamanho); echo $reg; } else { echo " "; } // importaçăo de cabeçalho e menu - fim echo "\n"; echo "

\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "

\n"; echo "Caso năo encontre o que procura tenta fazer novamente a busca. Se precisar, leia o texto da seçăo ajuda.

\n"; echo "

\n"; echo "PEWEB - Alterar os sites cadastrados

\n"; } ?>