library("RODBC") conn <- odbcConnect("192.168.0.1") data <- sqlQuery(conn, "select * from tableA") glm.rs1<-glm(a~b+c+d,data=data,family=binomial); summary(glm.rs1)