C#

Moreno Airoldi wrote:

As for opening the xls file, you will be able to do that safely once you call Close on it (on the corresponding Workbook object), so that won't be a problem. Smile

Microsoft.Office.Interop.Excel.Application myApp = null;
Microsoft.Office.Interop.Excel.Workbook myWorkbook = null;
try
{
    myApp = new Microsoft.Office.Interop.Excel.ApplicationClass();
    myApp.AskToUpdateLinks = false;
    myApp.DisplayAlerts = false;
    myWorkbook = myApp.Workbooks.Add(Microsoft.Office.Interop.Excel.XlWBATemplate.xlWBATWorksheet);
    myWorkbook.SaveAs("D:\\test.xls", Microsoft.Office.Interop.Excel.XlFileFormat.xlXMLSpreadsheet,
        System.Type.Missing, System.Type.Missing, false, false,
        Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlNoChange, System.Type.Missing,
        System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing);

}
catch (Exception ex)
{
    MessageBox.Show(ex.Message, "ERROR", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
finally
{
    if (myWorkbook != null)
    {
        myWorkbook.Close(false, "", null);
        myWorkbook = null;
    }
    if (myApp != null)
    {
        myApp.Quit();
        myApp = null;
    }
}

System.Diagnostics.Process.Start("D:\\test.xls");

Microsoft.Office.Interop.Excel.Application myApp = null;
Microsoft.Office.Interop.Excel.Workbook myWorkbook = null;
try
{
    try
    {
        myApp = new Microsoft.Office.Interop.Excel.ApplicationClass();
        myApp.Visible = true;
        myApp.AskToUpdateLinks = false;
        myApp.DisplayAlerts = false;
        myWorkbook = myApp.Workbooks.Add(Microsoft.Office.Interop.Excel.XlWBATemplate.xlWBATWorksheet);
        myWorkbook.SaveAs("D:\\test.xls", Microsoft.Office.Interop.Excel.XlFileFormat.xlXMLSpreadsheet,
            System.Type.Missing, System.Type.Missing, false, false,
            Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlNoChange, System.Type.Missing,
            System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing);

    }
    finally
    {
        if (myWorkbook != null)
        {
            myWorkbook.Close(false, "", null);
            myWorkbook = null;
        }
    }

    System.Threading.Thread.Sleep(3000);
    System.Diagnostics.Process.Start("D:\\test.xls");
    System.Threading.Thread.Sleep(3000);
}
catch (Exception ex)
{
    MessageBox.Show(ex.Message, "ERROR", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
finally
{
    if (myApp != null)
    {
        myApp.Quit();
        myApp = null;
    }
}

for (int i = 1; i < 6; i++)
{
    Microsoft.Office.Interop.Excel.Application myApp = null;
    Microsoft.Office.Interop.Excel.Workbook myWorkbook = null;
    try
    {
        try
        {
            myApp = new Microsoft.Office.Interop.Excel.ApplicationClass();
            myApp.Visible = true;
            myApp.AskToUpdateLinks = false;
            myApp.DisplayAlerts = false;
            myWorkbook = myApp.Workbooks.Add(Microsoft.Office.Interop.Excel.XlWBATemplate.xlWBATWorksheet);
            myWorkbook.SaveAs("D:\\test" + i.ToString() + ".xls", Microsoft.Office.Interop.Excel.XlFileFormat.xlXMLSpreadsheet,
                System.Type.Missing, System.Type.Missing, false, false,
                Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlNoChange, System.Type.Missing,
                System.Type.Missing, System.Type.Missing, System.Type.Missing, System.Type.Missing);

        }
        finally
        {
            if (myWorkbook != null)
            {
                myWorkbook.Close(false, "", null);
                myWorkbook = null;
            }
            if (myApp != null)
            {
                myApp.Quit();
                myApp = null;
            }
        }

        System.Diagnostics.Process.Start("D:\\test" + i.ToString() + ".xls");
    }
    catch (Exception ex)
    {
        MessageBox.Show(ex.Message, "ERROR", MessageBoxButtons.OK, MessageBoxIcon.Error);
    }
}

Harry666 wrote:

I inserted the line GC.Collect() and now it works fin

Luke Perrin wrote:

file2.MoveTo(file.ToString());

List<FileInfo> fi = new List<FileInfo>();
ListBox l = new ListBox();
private void Form1_Load(object sender, EventArgs e)
{


}
private void GetSubFoldersAndFiles(string path)
{



    foreach (string d in Directory.GetDirectories(path))
    {
        try
        {
            GetSubFoldersAndFiles(d);
        }
        catch (Exception)
        {


        }

    }
    foreach (string f in Directory.GetFiles(path))
    {
        fi.Add(new FileInfo(f));

    }
}

private void Form1_Shown(object sender, EventArgs e)
{
    l.Dock = DockStyle.Fill;
    this.Controls.Add(l);


    foreach (DriveInfo di in DriveInfo.GetDrives())
    {
        if (di.IsReady)
        {
            GetSubFoldersAndFiles(di.RootDirectory.FullName);
        }
    }
    var a = (from s in fi orderby s.Length descending select s);
    l.DataSource = a.ToList();
}