|
Visualizando código
Postado por edu rw1 em 04/03/2010 16:52:53.
http://paste.lymas.com.br/1108
if($_POST['tipo']=="adicionarupload")
{
//IDENTIFICADOR PARA SABER AS DATA
$tabela_mysql2 = "A_CLIENTES_EVENTOS_TESTE";
$tabela_historico2 = "A_CLIENTES_EVENTOS_HISTORICO";
//--> CRIAR TABELAS SEPARADAS POR DATA MIN E DATA MAX COM CODIGO DE IDENTIFICADOR
//PEGAMOS O TIPO DE ARQUIVOS POSTADO
$TIPO_DO_ARQUIVO_POSTADO = substr($_FILES['arquivo']['name'], -5); //PEGA A EXTENSAO DO ARQUIVO
$exp_tipo_arq = explode(".",$TIPO_DO_ARQUIVO_POSTADO); // SEPARAMOS A EXTENSAO PELO PONTO .
$tp_arq = strtolower($exp_tipo_arq[1]); // IDENTIFICAMOS A EXTENSAO DENTRO DA VARIAVEL
if($tp_arq=="txt")
{
#########
# UPLOAD DO TXT PRO SERVIDOR.
#########
$NQS = $NQS_IDENTIFICADOR."".$TIPO_DO_ARQUIVO_POSTADO; //NOME DO ARQUIVO
$D_NQS = $_SERVER['DOCUMENT_ROOT']."/info/upload/$pastafoto/".$NQS;
{
//ARQUIVO UPADO, DAMOS A PERMISSAO PARA LEITURA POSTERIOR 777
//INSERIMOS NO MYSQL O HISTORICO DO ARQUIVO
$INSER_ARQUIVO = mysql_query("INSERT INTO $tabela_historico2
(
clienteseventoshistorico_id,
data,
hora,
arquivo,
identificador
)
VALUES
(
'',
'".$NQS."',
'".$NQS_IDENTIFICADOR."'
)
if($INSER_ARQUIVO)
{
//LOCALIZAMOS O TXT NO SERVER
//IDENTIFICAMOS O TIPO DE TXT NA IMPORTACAO DOS CADASTROS.
if(substr($lines[0],0,$txt_header_cadastrocliente_lidetadeeventos_ctr)==$txt_header_cadastrocliente_lidetadeeventos)
{
$file = fopen($D_NQS,"r");
{
if ($linha = fgets($file))
{
if ($linha != "^^")
{
$N_LINHA_ARQUIVO = fgets($file,1024); //ARMAZENA DADOS DA LINHA
//SEPARAMOS OS CAMPOS PELO TAMANHO DOS CARACTERES COM SUBSTR
$COD_CLI = substr($N_LINHA_ARQUIVO,0,4); //CODIGO
$DT_EVENTO_CLI = substr($N_LINHA_ARQUIVO,5,10); //DATA DO EVENTO
$HR_EVENTO_CLI = substr($N_LINHA_ARQUIVO,16,8); //HORA DO EVENTO
$COD_EVENTO_CLI = substr($N_LINHA_ARQUIVO,25,7); //CODIGO DO EVENTO
$COD_RESULTADO_CLI = substr($N_LINHA_ARQUIVO,33,2); //CODIGO DO RESULTADO
$CONTATO_CLI = substr($N_LINHA_ARQUIVO,36,50); //NOME DO CONTATO
//REFORMULAMOS A NOVA DATA
$ANO_NOVADATA_CLI = substr($DT_EVENTO_CLI,6,4); //ANO
$DIA_NOVADATA_CLI = substr($DT_EVENTO_CLI,0,2); //DIA
$MES_NOVADATA_CLI = substr($DT_EVENTO_CLI,3,2); //MES
$NOVA_DATA_CLI = $ANO_NOVADATA_CLI."-".$MES_NOVADATA_CLI."-".$DIA_NOVADATA_CLI;
//VERIFICAMOS SE NAO FOR REPETIDO
$SQL_REPETIDO = mysql_query("SELECT cliente,data_ocorrencia,hora_ocorrencia FROM $tabela_mysql2 WHERE cliente = '".trim($COD_CLI)."' and data_ocorrencia = '".$NOVA_DATA_CLI."' and hora_ocorrencia = '".$HR_EVENTO_CLI."'");
{
$SQL_ATUALIZA_EVENTOS = mysql_query("UPDATE $tabela_mysql2 SET
evento = '".trim($COD_EVENTO_CLI)."',
resultado = '".trim($COD_RESULTADO_CLI)."',
contato = '".trim($CONTATO_CLI)."'
where cliente = '".trim($COD_CLI)."' and data_ocorrencia = '".$NOVA_DATA_CLI."' and hora_ocorrencia = '".trim($HR_EVENTO_CLI)."'") or print mysql_error();
}
else
{
//INSERINDO DADOS
$SQL_CADASTRA_EVENTOS = mysql_query("INSERT $tabela_mysql2
(
clienteseventos_id,
cliente,
data_ocorrencia,
hora_ocorrencia,
evento,
resultado,
contato
)
VALUES
(
'',
)
}
if($SQL_CADASTRA_EVENTOS)
{
echo alerta_redirect ("ARQUIVO IMPORTADO COM SUCESSO!","$link_voltar");
}
if($SQL_ATUALIZA_EVENTOS)
{
echo alerta_redirect ("ARQUIVO ATUALIZADO COM SUCESSO!","$link_voltar");
}
} //IGNORA LINHA COM *
} //IGNORA LINHA EM BRANCO
} // WHILE
}
else
{
echo alerta_redirect ("TXT INCORRETO PARA IMPORTAR LISTA DE EVENTOS (HEADER DEVE SER --> CAD_CLIENTEEVENTOS ), VERIFIQUE","$link_voltar");
//REMOVEMOS O TXT UPADO POIS ELE FOI IMCOMPATIVEL PARA IMPORTAÇÃO DOS DADOS.
}
}
} // IF MOVEUPLOADED FILE
}
else
{
echo alerta_redirect ("SELECIONE ARQUIVOS NO FORMATO TXT","$link_voltar");
}
}//ACAO
Colando um novo código
|