Roberto Carvalho Postado Dezembro 15, 2007 Denunciar Share Postado Dezembro 15, 2007 Segue o Codigo de uma importação de arquivos em ASP com uma barra de progresso informando o andamento da importação:<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <title>Importação de Arquivos</title> <style type="text/css"> body{ font-family: Trebuchet MS, Lucida Sans Unicode, Arial, sans-serif; background-color:#E2EBED; margin:0px; padding:0px; height:100%; width:100%; line-height:130%; font-size:0.9em; text-align:center; } #pageContent{ width:760px; margin:0 auto; text-align:left; border-left:1px solid #000; border-right:1px solid #000; background-color:#FFF; height:100%; } #pageContent p{ padding-left:10px; padding-right:10px; } #dhtmlgoodies_progressPane{ width:100%; height:100%; background-color:#FFF; z-index:5000; position:absolute; left:0px; top:0px; } #dhtmlgoodies_progressBar_bg{ position:absolute; left:50%; top:50%; width:300px; height:20px; border:1px solid #000; background-color:#EEE; margin-left:-150px; margin-top:-20px; text-align:center; } #dhtmlgoodies_progressBar_outer{ position:absolute; left:0px; top:0px; width:0px; height:100%; overflow:hidden; } #dhtmlgoodies_progressBar{ position:absolute; left:0px; top:0px; width:300px; background-color:#184EB8; filter: Alpha(Opacity=0, FinishOpacity=100,Style=1,StartX=0, StartY=0, FinishX=200,FinishY=20); height:100%; z-index:5000; } #dhtmlgoodies_progressBar_txt{ color:#000; z-index:10000; width:100%; height:100%; left:0px; top:0px; position:absolute; font-family:arial; font-size:0.8em; line-height:20px; /* Same as height of progress bar */ } </style> <script type="text/javascript"> var progressbar_steps = 100; var dhtmlgoodies_progressPane = false; var dhtmlgoodies_progressBar_bg = false; var dhtmlgoodies_progressBar_outer = false; var dhtmlgoodies_progressBar_txt = false; var progressbarWidth; var currentStep = 0; function moveProgressBar(steps){ if(!dhtmlgoodies_progressBar_bg){ dhtmlgoodies_progressPane = document.getElementById('dhtmlgoodies_progressPane'); dhtmlgoodies_progressBar_bg = document.getElementById('dhtmlgoodies_progressBar_bg'); dhtmlgoodies_progressBar_outer = document.getElementById('dhtmlgoodies_progressBar_outer'); dhtmlgoodies_progressBar_txt = document.getElementById('dhtmlgoodies_progressBar_txt'); progressbarWidth = dhtmlgoodies_progressBar_bg.clientWidth; } if(!steps){ dhtmlgoodies_progressBar_outer.style.width = progressbarWidth + 'px'; dhtmlgoodies_progressBar_txt.innerHTML = '100%'; }else{ currentStep=steps; if(currentStep>progressbar_steps)currentStep = progressbar_steps; var width = Math.ceil(progressbarWidth * (currentStep / progressbar_steps)); dhtmlgoodies_progressBar_outer.style.width = width + 'px'; var percent = Math.ceil((currentStep / progressbar_steps)*100); dhtmlgoodies_progressBar_txt.innerHTML = percent + '%'; if(currentStep==progressbar_steps){ } } } function demoProgressBar(step2) { if(currentStep<progressbar_steps){ moveProgressBar(step2); } } </script> </head> <body> <div id="dhtmlgoodies_progressPane"> <div id="dhtmlgoodies_progressBar_bg"> <div id="dhtmlgoodies_progressBar_outer"> <div id="dhtmlgoodies_progressBar"></div> </div> <div id="dhtmlgoodies_progressBar_txt">0 %</div> </div> </div> <div id="pageContent"> </body> </html> <!--#include file="conn.asp"--> <% conta=0 conta2=0 Set FSO = Server.CreateObject("Scripting.FileSystemObject") Set leitura1 = fso.OpenTextFile(server.MapPath("teste.txt"), 1, False) Do While not leitura1.AtEndOfStream leitura1.readline conta= conta+1 loop result= 100/conta leitura1.close set leitura1= nothing Set leitura = fso.OpenTextFile(server.MapPath("teste.txt"), 1, False) Do While not leitura.AtEndOfStream str= leitura.readline & vbcrlf tipo= Mid(str,1,1) tipo2= cint(tipo) cpf= Mid(str,2,11) valor= Mid(str,13,9) valor2 = valor / 100 data= mid(str,28,2) & "/" & Mid(str,26,2) & "/" & Mid(str,22,4) data2 = cdate(data) Set rsUser = Server.CreateObject("ADODB.Recordset") rsUser.open "select * from clientes", conn, 3, 3 rsuser.addnew rsuser("tipo")=tipo2 rsuser("cpf")=cpf rsUser("valor") = valor2 rsuser("data")=data2 rsUser.Update conta2= conta2 + result if conta2>= "99" then conta2="100" end if conta3=cint(conta2) if conta3>=100 then conta3=100 end if %> <script language=javascript> demoProgressBar('<%=conta3%>') </script> <% Loop leitura.close set leitura=nothing rsUser.close set rsUser = nothing conn.close %> Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 bareta Postado Dezembro 17, 2007 Denunciar Share Postado Dezembro 17, 2007 lembreteesta barra não é para mostrar o andamento de uploads e sim para mostrar a leitura de arquivos txt ou outros...cada comp de upload terá uma maneira diferente de se fazer e deve-se ler a documentação que provavelmente lá tera um exemplo. Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Roberto Carvalho
Segue o Codigo de uma importação de arquivos em ASP com uma barra de progresso informando o andamento da importação:
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.