按日期删除表而不删除系统表的函数/过程

CREATE PROCEDURE DeleteTablesByDate
    @dateToDelete DATE
AS
BEGIN
    DECLARE @tableName NVARCHAR(128)
    DECLARE @sql NVARCHAR(MAX)

    DECLARE tableCursor CURSOR FOR
    SELECT name
    FROM sys.tables
    WHERE name NOT LIKE 'sys%' -- 排除系统表
    AND name NOT LIKE 'dt%' -- 排除其他特定的表名规则

    OPEN tableCursor
    FETCH NEXT FROM tableCursor INTO @tableName

    WHILE @@FETCH_STATUS = 0
    BEGIN
        SET @sql = 'DROP TABLE ' + QUOTENAME(@tableName)
        EXEC sp_executesql @sql

        FETCH NEXT FROM tableCursor INTO @tableName
    END

    CLOSE tableCursor
    DEALLOCATE tableCursor
END