sig
exception SQL_Error of string
type sql_column_type =
SQL_unknown
| SQL_char
| SQL_numeric
| SQL_decimal
| SQL_integer
| SQL_smallint
| SQL_float
| SQL_real
| SQL_double
| SQL_varchar
| SQL_date
| SQL_time
| SQL_timestamp
| SQL_longvarchar
| SQL_binary
| SQL_varbinary
| SQL_longvarbinary
| SQL_bigint
| SQL_tinyint
| SQL_bit
module SQL_column :
sig
type t = Ocamlodbc.sql_column_type
val string : Ocamlodbc.sql_column_type -> string
end
type connection
val connect : string -> string -> string -> Ocamlodbc.connection
val disconnect : Ocamlodbc.connection -> unit
val execute : Ocamlodbc.connection -> string -> int * string list list
val execute_with_info :
Ocamlodbc.connection ->
string ->
int * (string * Ocamlodbc.sql_column_type) list * string list list
class data_base :
string ->
string ->
string ->
object
method connect : unit -> unit
method disconnect : unit -> unit
method execute : string -> int * string list list
method execute_with_info :
string ->
int * (string * Ocamlodbc.sql_column_type) list * string list list
end
end