diff --git a/src/monkey/mssql.lisp b/src/monkey/mssql.lisp
index ce2abf6..5790b17 100644
--- a/src/monkey/mssql.lisp
+++ b/src/monkey/mssql.lisp
@@ -95,7 +95,7 @@
              (:syb-int8 (mem-ref data :int8))
              (:syb-real (mem-ref data :float))
              (:syb-flt8 (mem-ref data :double))
-             ((:syb-datetime :syb-datetime4 :syb-msdate)
+             ((:syb-datetime :syb-datetime4 :syb-msdate :syb-mstime)
               (with-foreign-pointer (%buf +numeric-buf-sz+)
                 (let ((count
                        (%dbconvert %dbproc
diff --git a/src/sources/mssql/mssql-schema.lisp b/src/sources/mssql/mssql-schema.lisp
index 89be6ff..c743647 100644
--- a/src/sources/mssql/mssql-schema.lisp
+++ b/src/sources/mssql/mssql-schema.lisp
@@ -201,6 +201,7 @@
 
    Mostly we just use the name, and make try to avoid parsing dates."
   (case (intern (string-upcase type) "KEYWORD")
+    (:time           (format nil "convert(varchar, [~a], 114)" name))
     (:datetime       (format nil "convert(varchar, [~a], 126)" name))
     (:smalldatetime  (format nil "convert(varchar, [~a], 126)" name))
     (:date           (format nil "convert(varchar, [~a], 126)" name))