R - dbGetQuery 并保留注释

问：

似乎当我向它传递评论时，它不会将评论发送到我们的数据库。有没有办法保留评论？ 我正在尝试跟踪 Posit Connect 上的哪些应用程序正在发送哪些查询并尝试执行以下操作：dbGetQuery()

library(odbc)
library(glue)

glue_guid <- function(x) {
  glue(
    "/*platform: rsc, id: {guid}*/ {x}",
    guid = Sys.getenv('CONNECT_CONTENT_GUID') # exists on RStudio/Posit Connect
  )
}

conn <- dbConnect(...)
sql <- glue_guid("select * from my_table")
# /*platform: rsc, id: */ select * from my_table

dbGetQuery(conn, sql)

所以问题是：

• 有没有更好的方法来跟踪从连接到我们的数据库到应用程序的 SQL 查询？
• 如果不是，这种方法^^^是否可行？
• 如果没有，我可以/应该提出问题，如果是这样，哪个包？ 或？我认为是在这里做的DBIodbcDBI