rstudioapi askForPassword 不屏蔽用户名输入

Question

有没有办法在 rstudioapi::askForPassword 弹出窗口中禁用屏蔽，以便用户可以输入他们的用户名？

我正在构建一个可以与我的团队共享的函数，用于使用 ROracle pacakge 连接到我们的 Oracle 数据库实例

目前的解决方案，

  connection <- dbConnect(
    driver
    , username = rstudioapi::askForPassword(prompt = 'Please enter username: ')
    , password = rstudioapi::askForPassword(prompt = 'Password: ')
    , dbname = 'my.connection.string'
  )

这会弹出以下提示:
(image in link)

这是 RStudio database docs that uses the Rstudio api 中描述的解决方案

想要资助一个不屏蔽密码但弹出相同提示的解决方案(如果可能，一行不错的代码......)

Answer 1

如果您使用的是 RStudio (1.1.67+) 的预览版，在 rstudioapi 中可以使用更新的功能。包裹，showPrompt似乎完成了你所追求的。

connection <- dbConnect(
    driver,
    username = rstudioapi::showPrompt(
      title = "Username", message = "Username", default = ""
    ),
    password = rstudioapi::askForPassword(prompt = "Password"),
    dbname = "my.connection.string"
)