Gerar Execel

[feasso 0]

Como faço para ao gerar arquivos do excel, criar cada tabela em uma aba diferente do execel ?

[xanburzum 169]

dá uma pesquisada no forum k existem varios exemplos

 

ex:

<% 
Response.ContentType = "application/vnd.ms-excel"

set objconn=server.createobject("adodb.connection")

connpath= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\teste\nwind.mdb"
objconn.Open connpath

set objrs=objconn.execute("select CódigoDoProduto,NomedoProduto,PreçoUnitário " & _
	"from produtos where CódigoDoProduto < 20 ")

%>
<TABLE BORDER=1>
<TR>
<% 
'Percorre cada campo e imprime o nome dos campos da tabela
For i = 0 to objrs.fields.count - 1 
%>
<TD><% = objrs(i).name %></TD>
<% next %>
</TR>
<% 

'Percorre cada linha e exibe cada campo da tabela

while not objrs.eof
%>
<TR>
<% For i = 0 to objrs.fields.count - 1
%>
<TD VALIGN=TOP><% = objrs(i) %></TD>
<% Next %>
</TR>
<%
objrs.MoveNext

wend

objrs.Close
objconn.close
%>
</TABLE>

ja consegui recuperar os dados atraves de [sheet1$], em planilha diferente ,tipo:

 

"SELECT * FROM [sheet1$];"

 

para criar nunca precisei, mas procure por [sheet1$]

ou use o DypsXLS ,verifique o COM XLA2.XLASheet2,

você pode tentar utilizar o método Add da classe WorkBooks para criar uma pasta de trabalho,uma WorkSheet