Hi All.

I just thought I’d past this code that is collected and modified.
It’s from a whole lot of ppl that I can’t really remember who actually made it, but it work (give credit to the dude(s) out there whose name(s) I can’t remember. hehe)
(this code is just to help you get started, feel free to change and improve it as you see fit.) ^_^

Step 1: Create new Class and copy code below.

using System;
using System.Collections.Generic;
using System.Text;
using System.Reflection;
using System.IO;
using Microsoft.Office.Interop.Excel;
using System.Data;

namespace VGS
{
class ClassExcel
{
private String m_sFileName;

Application excelApp = null;
Workbook workbook = null;
Sheets sheets = null;
Worksheet newSheet = null;

public ClassExcel(String p_sFileName)
{
m_sFileName = p_sFileName;
}

public void ChangeFileName(String p_sFileName)
{
m_sFileName = p_sFileName;
}

public void SaveDatasetToExcel(DataSet p_dts)
{
try
{
if (File.Exists(m_sFileName))
{
File.Delete(m_sFileName);
}
if (File.Exists(m_sFileName) == false)
{
MakeTemp(m_sFileName);
}

if (File.Exists(m_sFileName))
{
DataSet dts = new DataSet();
dts = p_dts;

excelApp = new Application();
workbook = excelApp.Workbooks.Open(m_sFileName, 0, false, 5, “”, “”,
false, XlPlatform.xlWindows, “”,
true, false, 0, true, false, false);

sheets = workbook.Sheets;

foreach (Worksheet sheet in sheets)
{
sheet.Select(Type.Missing);

System.Runtime.InteropServices.Marshal.ReleaseComObject(sheet);
}

for (int iTable = 0; iTable 0)
{
newSheet = (Worksheet)sheets.Add(sheets[1], Type.Missing, Type.Missing, Type.Missing);
newSheet.Name = dts.Tables[iTable].TableName;
for (int cc = 0; cc < dts.Tables[iTable].Columns.Count; cc++)
{
newSheet.Cells[1, cc + 1] = "'" + dts.Tables[iTable].Columns[cc].ColumnName;
}

for (int cc = 0; cc < dts.Tables[iTable].Columns.Count; cc++)
{
for (int rc = 0; rc < dts.Tables[iTable].Rows.Count; rc++)
{
if (dts.Tables[iTable].Rows[rc][cc] == null)
newSheet.Cells[rc, cc] = "";

if (dts.Tables[iTable].Columns[cc].DataType == System.Type.GetType("System.String"))
{
newSheet.Cells[rc + 2, cc + 1] = "'" + dts.Tables[iTable].Rows[rc][cc];
}
else
{
newSheet.Cells[rc + 2, cc + 1] = dts.Tables[iTable].Rows[rc][cc];
}
}
}
}
}

workbook.Save();
workbook.Close(null, null, null);
excelApp.Quit();
}
}
finally
{
newSheet = null;
sheets = null;
workbook = null;
excelApp = null;

GC.Collect();
}
}

private void MakeTemp(string p_sTempFileName)
{
Application exc = null;
try
{
exc = new Application();
Workbooks workbooks = exc.Workbooks;
_Workbook workbook = workbooks.Add(XlWBATemplate.xlWBATWorksheet);
_Worksheet worksheet = (_Worksheet)workbook.Worksheets[1];
Range range = worksheet.get_Range("A1", System.Reflection.Missing.Value);
Object[] data = new Object[] { "" };
range.GetType().InvokeMember("Value", System.Reflection.BindingFlags.SetProperty, null, range, data);
workbook.Close(true, p_sTempFileName, null);
}
catch (Exception ex)
{
Console.WriteLine(ex.Message);
Console.ReadLine();
}
finally
{
if (exc != null)
exc.Quit();
}
}
}
}

ps. remember to add the reference:
"using Microsoft.Office.Interop.Excel;"
to your project;

Step 2: Done. lol

cheers.

1) ALL the data are in STRING, how to keep the type of the data ?

2) How to prevent the null values ?

Thanks

BUT… with some luck and few wild guesses, I got it to work:
CHEERS!!!!!

public static void CreateWorkbook(DataSet ds, String path)
{

XmlDataDocument xmlDataDoc = new XmlDataDocument(ds);
XslCompiledTransform xt = new XslCompiledTransform();
StreamReader reader =new StreamReader(typeof (WorkbookEngine).Assembly.GetManifestResourceStream(typeof (WorkbookEngine), “Excel.xsl”));
XmlTextReader xRdr = new XmlTextReader(reader);
xt.Load(xRdr, null, null);
StringWriter sw = new StringWriter();

xt.Transform(xmlDataDoc, XmlWriter.Create(sw));

StreamWriter myWriter = new StreamWriter (path + “\\Report.xls”);
myWriter.Write (sw.ToString());
myWriter.Close ();
}

Take care!

Tachyon

http://aspalliance.com/471_Convert_XML_To_an_Excel_Spreadsheet_Using_XSL.5