Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Koreia

Importando txt para o banco MySql

Por , em ASP Clássico

Recommended Posts

Koreia    0

Koreia
Postado

Boa tarde pessoal,

 

Irei começar a desenvolver uma pagina em asp, que tem que ler um arquivo .txt, que o usuário enviou para o server, e a cada linha do arquivo é um registro que tem que ser importado para dentro do banco Mysql.

 

Descrição do arquivo: serão 65 campos que serão importados os mesmos estão separados por ";" para facilitar de pegar os campos com split.

tem arquivos com 600 linhas de 600~800Kb de tamanho e arquivos com até 8000 linhas que chegam a quase 5MB, isso depende do quanto o usuário trabalhou.

 

Agora minha pergunta é:

Qual a melhor forma de realizar essa importação para o banco?

 

Minha grande preocupação é com o timeout do script pois ele tem q ler todo arquivo e importar tudo na mesma transação do banco .

 

Grato

Marcelo

Compartilhar este post

Link para o post
Compartilhar em outros sites

xanburzum    169

xanburzum
Postado

olha este exemplo, a diferença que o texto esta em uma linha cada e quero criar um link depois.

 

Num TXT com este conteúdo.

---------------------------------------------------------------------------------

Freecode|http://www.burzum.org

MSDN|http://www.msdnbrasil.com.br

TechNet|http://www.technetbrasil.com.br

Freecode|http://www.freecode.com.br/drArtigos

Microsoft|http://www.microsoft.com.br

Forum|http://www.freecode.com.br/forum

Artigos|http://www.freecode.com.br/drArtigos

Tutoriais|http://www.freecode.com.br/tutorias

---------------------------------------------------------------------------------

 

<html>
<head>
<title>Busca em FSO</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body bgcolor="#CCCCCC">
<form method="post" action="busca_fso_action.asp">
 <table width="650" cellpadding="1" cellspacing="0" border="1" align="center">
   <tr> 
     <td> <div align="center"><font color="#666699" size="2" face="Verdana, Arial, Helvetica, sans-serif"><strong>:: 
         Entre com a pesquisa</strong></font></div></td>
   </tr>
   <tr> 
     <td><font color="#666699" size="2"><strong><font face="Verdana, Arial, Helvetica, sans-serif">Pesquisar:</font> 
       <input name="pesquisa" type="text" id="pesquisa" size="20" maxlength="50">
         
       <input type="submit" name="Submit" value="buscar">
       <input type="hidden" name="botao" value="true">
       </strong></font> </td>
   </tr>
   <tr>
     <td> </td>
   </tr>
 </table> 
</form>
</body>
</html>

 

código ASP

 

<% Option Explicit
' declaro as variaveis
Dim fso, fsofile,varpesquisa,varcaminho,contador,linha,icampo

' recupero as variaveis
varpesquisa=Trim(request.form("pesquisa"))
' retiro o aspas simples
varpesquisa=Replace(varpesquisa,"'","")

' crio o FSO

Set fso=Server.createobject("Scripting.FileSystemObject")
' abro o arquivo txt
varcaminho=Server.MapPath("texto.txt")
Set fsofile=fso.opentextfile(varcaminho,1,true,false)
if fsofile.AtEndOfStream = true then
	response.Redirect("busca_fso_form.asp?msgeof=1")
else
	contador=0
	while not fsofile.AtEndOfStream = true
		linha=fsofile.readline
		icampo=Split(linha,"|",-1,1)
			if LCase(varpesquisa) = LCase(icampo(0)) then
				response.Write("<a href='"&icampo(1)&"'>"& icampo(0)&"</a><br>")
    			     contador=contador + 1
			end if
	wend
			response.Write("<br> Total de registros encontrados:") &contador
end if
fsofile.close
Set fsofile=nothing
Set fso= nothing
%>

 

você pode usar este modelo e adequar a sua necessidade.

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito