Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Oi pessoal, estou usando este script para gerar um arquivo xls. Está funcionando, porém alguns campos como o do cnpj, estão com uns caracteres estranhos. Como faço para arrumar isso?
<% Call Open_cn %>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="application/vnd.ms-excel;charset=iso-8859-1">
</head><%
strSel = " SELECT * FROM Empresa WHERE empTipo = 'R' ORDER By empRazao "
Set rsSel = Conexao.Execute(strSel)
If Not rsSel.EOF Then
Response.ContentType = "application/vnd.ms-excel"
Response.AddHeader "content-disposition","attachment;filename=Relatorio.xls"
%>
<table width="100%" border="1" cellpadding="0" cellspacing="0" bordercolor="#000000">
<tr>
<td class="Normal"><font color="#000000">Razao</font></td>
<td class="Normal"><font color="#000000">Fantasia</font></td>
<td class="Normal"><font color="#000000">Cnpj</font></td>
</tr>
<% While Not rsSel.EOF %>
<tr>
<td class="Normal"><font color="#000000"><%=rsSel("empRazao")%></font></td>
<td class="Normal"><font color="#000000"><%=rsSel("empFantasia")%></font></td>
<td class="Normal"><font color="#000000"><%=rsSel("empCnpj")%></font></td>
</tr>
<%
rsSel.MoveNext
Wend</table>
</body>
</html>Carregando comentários...