diff --git a/R/Connection.R b/R/Connection.R
index 1e00ad6..4478c19 100644
--- a/R/Connection.R
+++ b/R/Connection.R
@@ -12,7 +12,7 @@ make_connection_class <- function(base_class) {
 
   template_name <- "dblogConnection"
   class_name <- paste0(template_name, "-", base_class)
-  all_base_classes <- c(template_name, base_class)
+  all_base_classes <- c(template_name, base_class, "DBIConnection")
 
   if (isClass(class_name)) {
     return(class_name)
diff --git a/R/Driver.R b/R/Driver.R
index b43f1eb..4897c23 100644
--- a/R/Driver.R
+++ b/R/Driver.R
@@ -28,7 +28,7 @@ make_driver_class <- function(base_class) {
 
   template_name <- "dblogDriver"
   class_name <- paste0(template_name, "-", base_class)
-  all_base_classes <- c(template_name, base_class)
+  all_base_classes <- c(template_name, base_class, "DBIDriver")
 
   if (isClass(class_name)) {
     return(class_name)
diff --git a/R/Result.R b/R/Result.R
index 11d4a6d..1be57bf 100644
--- a/R/Result.R
+++ b/R/Result.R
@@ -7,7 +7,7 @@ make_result_class <- function(base_class) {
 
   template_name <- "dblogResult"
   class_name <- paste0(template_name, "-", base_class)
-  all_base_classes <- c(template_name, base_class)
+  all_base_classes <- c(template_name, base_class, "DBIResult")
 
   if (isClass(class_name)) {
     return(class_name)