marcos_804 Postado Maio 9, 2006 Denunciar Share Postado Maio 9, 2006 Alguém sabe como eu posso fazer para poder trasportar dados de um banco de dados access para excel, isso em asp via browser...Se alguém souber quais as configurações necessárias do iis para eu fazer isso?--> desde já agradeçe! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 jucacabala Postado Maio 9, 2006 Denunciar Share Postado Maio 9, 2006 já fiz assim e deu certo,da uma olhada neste link que la também tem alguma coisahttp://www.visualbasic.mat.br/vb/artigos_b...rch=excel&B3=OK<!--#include file="../conexao.inc" --><% Dim conexaodb, email, arquivo_excel if session("id")="" then response.redirect "index.asp" end if str = "select email from cadastro order by email asc" str2 = "select email from cadastro order by email asc" call abreconexao Set rs = conexaodb.Execute(str) Set rs2 = conexaodb.Execute(str2) rs.MoveFirst arquivo_excel= "emails.xls" set fso = createobject("scripting.filesystemobject") Set act = fso.CreateTextFile(server.mappath(arquivo_excel), true) act.WriteLine("<html><body>") act.WriteLine("<table border=""1"">") act.WriteLine("<tr>") act.WriteLine("<th nowrap>Email</th>") act.WriteLine("</tr>") Do While Not rs.Eof Act.WriteLine("<tr>") act.WriteLine("<tudo align=""right"">" & rs("email") & "</tudo>" ) act.WriteLine("</tr>") rs.movenext loop act.WriteLine("</table></body></html>") act.close rs2.MoveFirst arquivo_doc= "emails.doc" set fso = createobject("scripting.filesystemobject") Set act2 = fso.CreateTextFile(server.mappath(arquivo_doc), true) act2.WriteLine("<html><body>") act2.WriteLine("<b>Emails</b>") act2.WriteLine("<br>") Do While Not rs2.Eof act2.WriteLine("<br>" & rs2("email")) rs2.movenext loop act2.close%> <html><head><title>...::: Só Vitória</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><link href="../estilos.css" rel="stylesheet" type="text/css"></head><body leftmargin="0" topmargin="5" marginwidth="0" marginheight="0"><table width="760" border="0" cellspacing="0" cellpadding="0"> <tr> <tudo width="740" colspan="2"> <!--#include file="menu.asp" --> </tudo> </tr> <tr> <tudo colspan="2"> </tudo> </tr> <tr> <tudo colspan="2"> <table width="100%" border="0" cellpadding="5" cellspacing="5" class="arial_textosObs"> <tr> <tudo width="25" rowspan="6"> </tudo> <tudo class="arial9a"><a href="emails.xls" target="_blank" id="link01">»gerar listagem de emails em .xls (planilha excel</a>) </tudo> </tr> <tr> <tudo class="arial9a"><a href="emails.doc" target="_blank" class="arial9a" id="link01">»gerar listagem de emails em .doc (arquivo texto) </a></tudo> </tr> </table></tudo> </tr> <tr> <tudo colspan="2"> </tudo> </tr> <tr> <tudo colspan="2" align="right"> <!--#include file="../rodape.asp" --></tudo> </tr></table></body></html> Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
marcos_804
Alguém sabe como eu posso fazer para poder trasportar dados de um banco de dados access para excel, isso em asp via browser...
Se alguém souber quais as configurações necessárias do iis para eu fazer isso?
--> desde já agradeçe!
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.