use_emailjsr_server {emailjsr}

use_emailjsr_server

Description

emailjs.com R support with preset modal

Usage

use_emailjsr_server(
  id,
  service_id,
  user_id,
  template_id,
  access_token,
  language = "en"
)

Arguments

id

Should be same to id of use_emailjsr_ui

service_id

emailjs.com Service Id

user_id

emailjs.com User Id

template_id

emailjs.com Template Id

access_token

emailjs.com Access Token

language

Language of modal. "en" for English, and "ko" for Korean.

Value

No return value, for shiny support

Examples

library(shiny)
library(emailjsr)
ui <- fluidPage(
  use_emailjsr_ui("id")
)

server <- function(input, output, session) {
  emailjsr::use_emailjsr_server("id",
    service_id = "Your_service_id",
    template_id = "Your_template_id",
    user_id = "Your_user_id",
    access_token = "Your_Access_Token",
    language = "en"
  )
}