Barra De Progresso
#1
Posted 18/09/2006, 13:20
upload.php
<?
//INICIA SESSÃO
session_start();
//SE FOR ACIONADO O BOTÃO ENVIAR
if ($_POST['recipient']==1)
{
//ELIMINA O LIMITE DE TEMPO DE EXECUÇÃO
set_time_limit (0);
//REPASSA ARQUIVO DO UPLOAD À VARIÁVEL
$arquivo = isset($_FILES['arquivo']) ? $_FILES['arquivo'] : FALSE;
//TAMANHO MÁXIMO DO ARQUIVO EM BYTES
$maximo = 50000000;
//CASO A VARIÁVEL $arquivo CONTENHA O VALOR FALSE
if(!$arquivo)
{
$prob = "Não acesse esse arquivo diretamente!<br>";
break2;
}
else
{
//VERIFICA O TIPO DE ARQUIVO
if($_FILES['arquivo']['type'] !== "application/msaccess")
{
$prob = "O arquivo enviado por você não é um arquivo do access! Envie outro!<br>";
break2;
}
else
{
//VERIFICA LIMITE DE UPLOAD
if($_FILES['arquivo']['size'] > $maximo)
{
$prob = "Erro! O arquivo enviado por você ultrapassa o limite máximo de " . $maximo . " bytes! Envie outro arquivo<br>";
break2;
}
else
{
//DIRETÓRIO PARA ONDE O ARQUIVO SERÁ MOVIDO
$diretorio="./upload/";
//MOVE PARA O DIRETÓRIO DESEJADO
if (move_uploaded_file($arquivo['tmp_name'], $diretorio . $arquivo['name']))
{
//CONEXÃO COM CLASSE ODBC
include("conectaodbcaccess.php");
//CONEXÃO COM MYSQL
include("conectaodbcmysql.php");
//DADOS TABELAS DO ARQUIVO MDB
$tbl1 = odbc_exec($odbc, 'SELECT * FROM tblextrato') or die (odbc_errormsg());
while(odbc_fetch_row($tbl1))
{
$data = odbc_result($tbl1,"mes e ano");
$codigo = odbc_result($tbl1,"codigo");
$codconv = odbc_result($tbl1,"codigo convenio");
$matricula = odbc_result($tbl1,"matricula");
$nome = odbc_result($tbl1,"nome");
$vlincluir = odbc_result($tbl1,"valor incluir");
$vlexcluir = odbc_result($tbl1,"valor excluir");
//INSERI DADOS DO ACCESS NA TABELA MYSQL
$sql1 = "INSERT INTO tblextrato VALUES ('$data', '$codigo', '$codcon', '$matricula', '$nome', '$vlincluir', '$vlexcluir')";
$query2 = odbc_exec($odbc2, $sql1) or die (odbc_errormsg());
//FECHA CONEXÃO ODBC COM MYSQL
odbc_close($odbc2);
}
//FECHA CONEXÃO ODBC COM ACCESS
odbc_close($odbc);
if ($query2)
{
$ok1 = "Arquivos inseridos com sucesso na Tabela Extrato!!<br>";
}
else
{
$prob1 = "Problema com inserção na tblextrato!<br>";
}
$tbl2 = odbc_exec($odbc, 'SELECT * FROM tblextratoconvenios') or die (odbc_errormsg());
while(odbc_fetch_row($tbl2))
{
$cod = odbc_result($tbl2,"codigo");
$convenio = odbc_result($tbl2,"convenio");
//INSERI DADOS DO ACCESS NA TABELA MYSQL
$sql2 = "INSERT INTO tblextratoconvenios VALUES ('$cod', '$convenio')";
$query3 = odbc_exec($odbc2, $sql2) or die (odbc_errormsg());
//FECHA CONEXÃO ODBC COM MYSQL
odbc_close($odbc2);
}
//FECHA CONEXÃO ODBC COM ACCESS
odbc_close($odbc);
if ($query3)
{
$ok2 = "Arquivos inseridos com sucesso na Tabela Extrato Convênios!!<br>";
}
else
{
$prob2 = "Problema com inserção na tblextratoconvenios!<br>";
}
$tbl3 = odbc_exec($odbc, 'SELECT * FROM tblextratoservidores') or die (odbc_errormsg());
while(odbc_fetch_row($tbl3))
{
$matr = odbc_result($tbl3,"matricula");
$nom = odbc_result($tbl3,"nome");
$senha = odbc_result($tbl3,"senha");
//INSERI DADOS DO ACCESS NA TABELA MYSQL
$sql3 = "INSERT INTO tblextratoservidores VALUES ('$matr', '$nom', '$senha')";
$query4 = odbc_exec($odbc2, $sql3) or die (odbc_errormsg());
//FECHA CONEXÃO ODBC COM MYSQL
odbc_close($odbc2);
}
//FECHA CONEXÃO ODBC COM ACCESS
odbc_close($odbc);
if ($query4)
{
$ok3 = "Arquivos inseridos com sucesso na Tabela Extrato Servidores!!<br>";
}
else
{
$prob3 = "Problema com inserção na tblextratoservidores!<br>";
}
}
else
{
$prob = "Erro ao enviar seu arquivo!<br>";
$erro = $_FILES['upfile']['error'];
}
}
}
}
if ($ok1!='' and $ok2!='' and $ok3!='')
{
$erro = "Upload realizado com sucesso!";
}
}
?>
<html>
<head>
<title>Upload Arquivo MDB</title>
<script language="JavaScript">
function mostrar()
{
document.form.recipient.value = "1";
document.form.submit();
}
</script>
</head>
<body bgcolor="#ffffff" text="#000000" id=all>
<h2><HR size=7 COLOR="Gainsboro"></h2>
<form name="form" method="POST" action="upload.php" enctype="multipart/form-data">
<p>Escolha o arquivo para upload <input name="arquivo" type="file"><br><br>
<input type="submit" value="Enviar >>" onclick=" mostrar(); document.getElementById('carregando').style.display='inline'"></p>
<input type="hidden" name="recipient" value="0">
</form>
<br>
<br>
<div id="carregando" style="display: none;"> Carregando, aguarde... </div>
<?
echo "<h6 align='center'>$prob</h6>";
echo "<h6 align='center'>$prob1</h6><br>";
echo "<h6 align='center'>$prob2</h6><br>";
echo "<h6 align='center'>$prob3</h6><br>";
echo "<h6 align='center'>$erro</h6>";
?>
<h1><HR size=7 COLOR="Gainsboro"></h1>
</body>
</html>
___________________________________
Josy R.L.
Grupo Plyme
www.plyme.com.br
___________________________________
#2
Posted 18/09/2006, 16:30
http://sean.treadway.info/demo/upload/
Edit ----- >
Complementando:
http://encodable.com/filechucker/
http://www.sibsoft.net/xupload.html
Edição feita por: bimonti, 18/09/2006, 16:35.
Yeah I do have some stories, and it's true I want all the glory ...
#3
Posted 18/09/2006, 17:42
___________________________________
Josy R.L.
Grupo Plyme
www.plyme.com.br
___________________________________
#4
Posted 19/09/2006, 07:52
Yeah I do have some stories, and it's true I want all the glory ...
#5
Posted 18/09/2017, 19:04
Propecia Result Photos Which Store Has Cheap 75 Mcg Synthroid Cialis Billig
Cytotec Posologie <a href=http://cialtobuy.com>cialis</a> Cialis N0 Prprsscription
#7
Posted 18/09/2017, 23:29
Viagara For Men cialis Amoxicillin And Maximum And Dosage
Kamagra Gels Veterinary Fluconazole From Canada
Levitra Generico Gratis <a href=http://cialtobuy.com>cialis</a> Lasix Overnight Buy No Prescription
#8
Posted 06/10/2017, 06:15
Farmaco Levitra Generico viagra online Pregnant And Taking Amoxicillin Forum Viagra 50 Mg
Can You Take Expiered Amoxicillin viagra Comprare Cialis In Farmacia Best Online Price Propecia
#9
Posted 23/10/2017, 21:29
Levitra Generico Dove Comprare Indian Pharmacy Viagra Pills For Sale Usa viagra Buy Levitra Generic Online Acticin Website By Money Order Pharmacy
Viagra Per Cuore cialis price Phenergan Without A Prescription Vairga
#10
Posted 24/10/2017, 01:56
#11
Posted 03/11/2017, 18:50
Prix Cialis En Pharmacie France viagra online prescription Order Cialis Pills
Viagra 100mg cialis Sortie Priligy En Australie Le Viagra C'Est Comme
#12
Posted 25/11/2017, 16:15
Zithromax For Bronchitis cialis Viagra For Sell No Prescriction Synthroid Without A Script
Priligy Eu viagra Acheter Cialis Original Amoxicillin Side Effect Zithromax 5 Day
#13
Posted 08/02/2023, 16:52
Now, after training this summer in Slovakia and demonstrating commitment with his early arrival to Greenburgh on Aug real cialis no generic
Oh go on, let s make it twice best time to take clomid for men 8 per 24 period in the acupuncture group vs
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)