1

我使用gmailr成功配置了我的oauth，以下代码有效

require(gmailr)

gm_auth_configure(path="E:/SOME_NAME.json")

test_email <- mime(
To = "someone@something.com",
From = "someone@gmail.com",
Subject = "this is just a gmailr test",
body = "Can you hear me now?")
gm_send_message(test_email)

然后我安装了blastula并再次配置了我的gmail oauth：

create_email_creds_file(
user = "someone@gmail.com",
password = "************",
provider = "gmail")

现在当我运行时：

require(gmailr)
gm_auth_configure(path="E:/SOME_NAME.json")
test_email <- mime(
To = "someone@somewhere.com",
From = "someone@gmail.com",
Subject = "this is just a gmailr test",
body = "Can you hear me now?")
gm_send_message(test_email)

我得到错误：

自动刷新陈旧的 OAuth 令牌。gzfile（文件，模式）中的错误：无法打开连接另外：警告消息：1：无法刷新令牌：invalid_grant 令牌已过期或撤销。2：在gzfile（文件，模式）中：无法打开文件'C：/Users/.R/gargle/gargle-oauth'：它是一个目录

如何撤消blastula oauth 并返回到我最初工作的gmailr oauth 文件/即如何重新开始并让gm_auth_configure 指向我的oauth 文件的位置？

4

1 回答 1

2

我找到了如何重置回原始誓言文件，gm_auth(cache=".secret") 可以解决问题。现在，这会将您带回 google 页面以链接回您的原始 oauth 文件，之后一切正常。所以完整的代码是：

gm_auth_configure(path="E:/SOME_NAME.json")
gm_auth(cache=".secret")

test_email <- mime(
To = "someone@something.com",
From = "someone@gmail.com",
Subject = "this is just a gmailr test",
body = "Can you hear me now?")
gm_send_message(test_email)

这现在恢复到原始的誓言文件，一切都再次完美。

于 2019-10-09T16:45:15.330 回答