1、Oracle.ManagedDataAccess.dll 的下载地址。好像如今必需要注冊才干下载。
即使是 64 位系统,也要注冊 32 位版本号;
2、还须要引用 System.Data、System.Transaction、System.Xml。
程序中的数据库是
Oracle Database 11g Express Edition。
#if INTERACTIVE
#r@"C:oracleodp.netmanagedcommonOracle.ManagedDataAccess.dll"
#endif
open Oracle.ManagedDataAccess.Client
open Oracle.ManagedDataAccess.Types
open System.Data
let connStr ="user id=hr;password=hr;data source=xe"
let conn =newOracle.ManagedDataAccess.Client.OracleConnection(connStr)
conn.Open()
printfn"%s" conn.ServerVersion
let cmd =conn.CreateCommand()
cmd.CommandType<- CommandType.Text
cmd.CommandText<- "select* from jobs"
let da =newOracle.ManagedDataAccess.Client.OracleDataAdapter( cmd )
let table =new System.Data.DataTable()
let cnt =da.Fill(table)
table.Columns.[0]
table.Rows.[0]
table.Rows.[0].[0]