mdl_sql_conn: 撰写数据库连接组件

View source: R/mdl_rdbms.R

mdl_sql_connR Documentation

撰写数据库连接组件

Description

撰写数据库连接组件

Usage

mdl_sql_conn(
  id,
  label = "SQL Server配置信息",
  ip = "115.159.201.178",
  port = "1433",
  user_name = "sa",
  password = "88888888",
  db_name = "demo"
)

Arguments

id

内码

label

标签

ip

地址

port

端口

user_name

用户名

password

密码

db_name

数据库名称

Value

返回值

Examples

library(shiny)
library(tsui);


ui <- fluidPage(
   
   
   titlePanel("SQL SERVER 数据库连接信息测试"),
   
   
   sidebarLayout(
      sidebarPanel(
         
         mdl_sql_conn('sql')
         
      ),
      
      mainPanel(
         mdl_dataTable('select')
      )
   )
)


server <- function(input, output) {
   
   con <- run_sql_common('sql');
   
   data <- reactive(
      {
         res  <- RJDBC::dbGetQuery(con(),'select top 100 * from T_GL_VOUCHER;')
         return(res)
      }
      
   )
   run_dataTable(proc_dataTable,id = 'select',data=data())
   
   
}

# Run the application 
shinyApp(ui = ui, server = server)

takewiki/tsui documentation built on July 5, 2023, 10:59 p.m.