各位大神,我的代码如下:
- library(RODBC)
- channel <- odbcConnect("DSN_QIU",uid="system",pwd="********")
- sqlDrop(channel, 'train_data_1')
- ## 创建数据框(待写入对象)
- train_data <- sqlQuery(channel,'SELECT * FROM TRAIN_2')
- ## 写入数据库表,并读取结果表
- sqlSave(channel,train_data,'train_data_1',append = FALSE)
- odbcClose(channel)
- library(RODBC)
- > channel <- odbcConnect("DSN_QIU",uid="system",pwd="*******")
- > sqlDrop(channel, 'train_data_1')
- > ## 创建数据框(待写入对象)
- > train_data <- sqlQuery(channel,'SELECT * FROM TRAIN_2')
- Warning message:
- closing unused RODBC handle 14
- > #写入数据库表,并读取结果表
- > sqlSave(channel,train_data,'train_data_1',append = FALSE)
- > odbcClose(channel)
- >


雷达卡




京公网安备 11010802022788号







