diff --git a/NAMESPACE b/NAMESPACE
index 8bcfdaed..3b816d37 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -44,6 +44,7 @@ exportClasses(PostgreSQL)
 exportClasses(Redshift)
 exportClasses(SQLite)
 exportClasses(Snowflake)
+exportClasses(SnowflakeOdbcDriver)
 exportClasses(Teradata)
 exportMethods(dbAppendTable)
 exportMethods(dbBegin)
diff --git a/R/driver-snowflake.R b/R/driver-snowflake.R
index a74c8440..07a2108a 100644
--- a/R/driver-snowflake.R
+++ b/R/driver-snowflake.R
@@ -152,13 +152,17 @@ setMethod("odbcDataType", "Snowflake",
 #' }
 #' @export
 snowflake <- function() {
-  new("Snowflake")
+  new("SnowflakeOdbcDriver")
 }
 
+#' @rdname snowflake
+#' @export
+setClass("SnowflakeOdbcDriver", contains = "OdbcDriver")
+
 #' @rdname snowflake
 #' @export
 setMethod(
-  "dbConnect", "Snowflake",
+  "dbConnect", "SnowflakeOdbcDriver",
   function(drv,
            account = Sys.getenv("SNOWFLAKE_ACCOUNT"),
            driver = NULL,
diff --git a/man/snowflake.Rd b/man/snowflake.Rd
index 0549804f..571d2258 100644
--- a/man/snowflake.Rd
+++ b/man/snowflake.Rd
@@ -1,13 +1,15 @@
 % Generated by roxygen2: do not edit by hand
 % Please edit documentation in R/driver-snowflake.R
+\docType{class}
 \name{snowflake}
 \alias{snowflake}
-\alias{dbConnect,Snowflake-method}
+\alias{SnowflakeOdbcDriver-class}
+\alias{dbConnect,SnowflakeOdbcDriver-method}
 \title{Helper for connecting to Snowflake via ODBC}
 \usage{
 snowflake()
 
-\S4method{dbConnect}{Snowflake}(
+\S4method{dbConnect}{SnowflakeOdbcDriver}(
   drv,
   account = Sys.getenv("SNOWFLAKE_ACCOUNT"),
   driver = NULL,