Question

由于一些并发问题，我不得不创建一个包含多个工作表的工作簿。在执行结束时，一些工作表将有数据，有些工作表将不会。我使用执行SQL任务创建工作表。

我正在尝试遍历工作簿并删除没有多行的工作表。换句话说，如果行数不大于1，则删除工作表。任何有关此问题的指针都将受到赞赏。如果您需要有关我的问题的更多详细信息，请与我们联系。提前谢谢。

修改

以下是我从MSDN获得的脚本任务。我将它修改为可以到达Excel工作表并计算行数的点，现在我想做的就是当count = 1然后删除工作表。有人可以帮助我吗？

using System;
using System.Data;
using Microsoft.SqlServer.Dts.Runtime;
using System.Windows.Forms;
using System.Data.OleDb;
using System.IO;

namespace ST_c346c80b4e6747688383c47a9f3e6f78.csproj
{
    [System.AddIn.AddIn("ScriptMain", Version = "1.0", Publisher = "", Description = "")]
    public partial class ScriptMain : Microsoft.SqlServer.Dts.Tasks.ScriptTask.VSTARTScriptObjectModelBase
    {

        #region VSTA generated code
        enum ScriptResults
        {
            Success = Microsoft.SqlServer.Dts.Runtime.DTSExecResult.Success,
            Failure = Microsoft.SqlServer.Dts.Runtime.DTSExecResult.Failure
        };
        #endregion



            public void Main()
        {
            string count = "";
            string fileToTest;
            string tableToTest;
            string connectionString;

            fileToTest = Dts.Variables["ExcelFile"].Value.ToString();
            tableToTest = Dts.Variables["ExcelTable"].Value.ToString();

            Dts.Variables["ExcelTableExists"].Value = false;

                connectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" +
                "Data Source=" + fileToTest + ";Extended Properties=Excel 8.0";
                string SQL = "SELECT COUNT (*) FROM [" + tableToTest + "$]";
                using (OleDbConnection conn = new OleDbConnection(connectionString))
                {
                    conn.Open();
                    using (OleDbCommand cmd = new OleDbCommand(SQL, conn))
                    {
                        using (OleDbDataReader reader = cmd.ExecuteReader())
                        {
                            reader.Read();
                            count = reader[0].ToString();
                            //if (count = 1)

                        }
                    }
                    conn.Close();
                }
                //return count;
            }

       }
}

修改

在进一步调查中，我发现我需要添加excel interop程序集才能工作。我没有这个选项，因为这个解决方案将被移植到140台不同的机器上。

Answer 1

遗憾的是，您无法使用OLEDB删除Excel中的工作表，您可以做的最好是使用DROP Table命令清除数据

connectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" +
                     "Data Source=" + fileToTest + 
                     ";Mode=ReadWrite;Extended Properties=Excel 8.0";

string SQL = "SELECT COUNT(*) FROM [" + tableToTest + "$]";

using (OleDbConnection conn = new OleDbConnection(connectionString))
{
    conn.Open();
    using (OleDbCommand CountCmd = new OleDbCommand(SQL, conn))
    {
        int RecordCount = (int)CountCmd.ExecuteScalar();

        if (RecordCount == 1)
        {
            SQL = "DROP TABLE [" + tableToTest + "$]";
            using (OleDbCommand DropCmd = new OleDbCommand(SQL, conn))
            {
                DropCmd.ExecuteNonQuery();
            }
        }
    }
    conn.Close();
}

注意：使用Mode=ReadWrite。您可以包含/排除HDR=Yes/No，但如果您想要对工作簿进行读/写访问，则不得包含IMEX=1

顺便说一句：没有必要使用OleDbDataReader来读取单个标量结果，而是使用ExecuteScalar（）。

使用OleDB的唯一方法是将要保留的数据复制到新的excel文件中并替换原始文件。如果你这样做，你将失去任何公式或格式。

使用SSIS在Excel中删除单个工作表

1 个答案: