RODBC连接期间限制用户权限：数据库只读权限失效问题咨询

我之前碰到过几乎一模一样的情况——RODBC的readOnly=T看起来像是个“银弹”，但实际上它只是客户端层面的软限制，数据库端的权限配置才是锁住修改操作的关键。你说账号已经设了只读但还能建表，说明数据库侧的权限没配到最严格的程度，下面给你一套可行的方案：

1. 从数据库端彻底锁死权限（核心步骤） #

RODBC的客户端限制绕开太容易了，数据库端的权限才是根本。你需要完全回收该账号的所有DDL（数据定义语言）权限，只保留SELECT权限，不同数据库的具体操作略有不同：

举几个常见数据库的例子： #

• SQL Server：

  -- 回收创建表的权限
  REVOKE CREATE TABLE FROM [your_username];
  -- 回收创建架构的权限（防止用户建新架构再建表）
  REVOKE CREATE SCHEMA FROM [your_username];
  -- 只授予指定架构的SELECT权限
  GRANT SELECT ON SCHEMA::dbo TO [your_username];
  

  还要检查这个账号是不是某个带创建权限的角色成员，比如db_owner或者db_ddladmin，如果是的话必须移除。

• MySQL：

  -- 回收所有写权限，只保留SELECT
  REVOKE ALL PRIVILEGES ON *.* FROM 'your_username'@'%';
  GRANT SELECT ON your_database.* TO 'your_username'@'%';
  FLUSH PRIVILEGES;
  

• PostgreSQL：

  -- 回收公共架构的创建权限
  REVOKE CREATE ON SCHEMA public FROM your_username;
  -- 只授予SELECT权限
  GRANT SELECT ON ALL TABLES IN SCHEMA public TO your_username;
  -- 确保未来新建的表也自动继承只读权限
  ALTER DEFAULT PRIVILEGES IN SCHEMA public GRANT SELECT ON TABLES TO your_username;
  

2. 强化RODBC客户端的双重保险 #

数据库端锁死之后，再加上客户端的限制，防止意外操作：

• 除了readOnly=T，在连接时加上驱动级别的只读参数（不同ODBC驱动的参数名可能不同，比如有些驱动用ReadOnly=1，有些用Mode=Read）：

  conn <- odbcConnect(
    dsn = "DSN",
    uid = "un",
    pwd = "pass",
    readOnly = TRUE,
    extra = "ReadOnly=1" # 驱动级别的只读设置
  )
  

• 可以封装自己的数据库操作函数，只允许调用sqlQuery这类只读方法，禁止使用sqlSave、sqlUpdate、sqlDrop这些会修改数据库的函数。比如：

  safe_sql_query <- function(conn, query) {
    # 简单校验，防止包含DDL语句
    if (grepl("CREATE|DROP|ALTER|INSERT|UPDATE|DELETE", toupper(query))) {
      stop("只读模式下不允许执行修改类语句")
    }
    sqlQuery(conn, query)
  }
  

3. 验证权限是否生效 #

最后一定要验证：

• 连接数据库后，执行查询查看账号的实际权限：

  # SQL Server例子
  sqlQuery(conn, "SELECT * FROM INFORMATION_SCHEMA.TABLE_PRIVILEGES WHERE GRANTEE='your_username'")
  

• 尝试执行创建表的操作，比如：

  sqlQuery(conn, "CREATE TABLE test_readonly (id INT)")
  

  如果返回权限错误，说明配置生效了。

总结一下：数据库端的权限配置是必须的，客户端的设置只是辅助，两者结合才能确保用户完全无法修改数据库。

内容的提问来源于stack exchange，提问作者Badger