Escrevendo em Arquivo Excel(xls)

[Neto Diniz 0]

bom dia,

 

Alguem poderia me dar um help, please!!!

 

Estou precisando de um help, tenho um dataset que contem 1 registro pego ele e crio um arquivo xls e escrevo essa linha no arquivo... até ai tudo bem... mas o problema é que ele pega o próximo e escreve por cima ou seja... está sobrescrevendo a linha. abaixo o código... obrigado pela ajuda...

 

 

 

 

foreach (DataRow dw in ds.Tables[0].Rows) 

{

codassociado++;

nome_titular = dw[


"NOME"].ToString(); 

tribunal = dw[


"TRIBUNAL"].ToString(); 

 


OdbcCommand Cmd2 = new OdbcCommand("SELECT TRIBUNAL, NOME_TITULAR, ENDERECO, BAIRRO, CEP, CIDADE, ESTADO FROM SERVIDORES WHERE NOME_TITULAR = '" + nome_titular + "' AND TRIBUNAL = '" + tribunal + "'", MyConnection); 

Cmd2.Connection.Open();

 


OdbcDataAdapter da2 = new OdbcDataAdapter(Cmd2); 

 


DataSet ds2 = new DataSet(); 

da2.Fill(ds2);

 


OdbcDataReader dr2 = Cmd2.ExecuteReader(); 

 


//dr2.Read();

 

string caminho = "C:/Carteiras.xls"; 

 


using (StreamWriter sw = File.CreateText(caminho)) 

{

 


// percorre o datareader e escreve os dados no arquivo .xls definido

 

while (dr2.Read()) 

{

sw.WriteLine(dr2[


"TRIBUNAL"].ToString() + "\t" + dr2["NOME_TITULAR"].ToString() + "\t" + dr2["ENDERECO"].ToString() + "\t" + dr2["BAIRRO"].ToString() + "\t" + dr2["CEP"].ToString() + "\t" + dr2["CIDADE"].ToString() + "\t" + dr2["ESTADO"].ToString() + "<br />"); 

}

}

 

}

[quintelab 91]

De uma olhada nesse artigo: http://www.macoratti.net/09/07/xls_sql1.htm

 

Abraços...