第 4 章 app

4.0.1 用户表

Code 
# knitr::include_app(" https://chz111.shinyapps.io/shiny_2sql/",
#   height = "600px")
user_base=dbReadTable(conn, "Users")
user_base |> knitr::kable()
id name password Lv Description deps
100001 caohuazhang Cao123456 999 我无语了，哈哈哈 NA
292096 indie 123456 100 我无语了，哈哈哈,是你家啊身上看到你撒 NA
521639 曹华彰 xampU0-tukwax-bymkyn 12 niahsandcas NA
204941 sis xampU0-tukwax-bymkyn 1 sahsdasjdbaswdadxas NA
809583 纯原创网站 qysciw-gihhuz-4syHda 100 你在哪睡觉啊 NA
631580 chz Cao123456 999 ss 2

octopus::view_database(conn)

4.1 更新 ———————————————————————-

dbSendQuery(conn,“UPDATE Users SET deps = 2, Description = ‘ss’ WHERE id=631580”)

4.2 增加 ———————————————————————-

dbSendQuery(conn,“INSERT INTO Users VALUES(631580,‘chz’,‘Cao123456’,999,‘new data’,2)”)

4.3 删除 ———————————————————————-

dbSendQuery(conn,“DELETE FROM Users WHERE id=631580”)

4.4 表结构 ———————————————————————

  • dbSendQuery(conn,“alter table Users add column dep varchar(32) default NULL after Description”)

  • dbSendQuery(conn,“alter table Users change dep deps integer”)

  • dbSendQuery(conn,“alter table Users drop column dep”)

4.5 重命名表

alter table t1 rename t2