实现的关键:copy fbembed.dll icudt30.dll icuuc30.dll到system32文件夹下 打包下载这几个文件
代码如下:
Dim
connectionString
=
New
FbConnectionStringBuilder()
connectionString.ClientLibrary = " fbembed.dll "
connectionString.ServerType = FbServerType.Embedded
connectionString.Database = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, " Test.Fdb " )
connectionString.Pooling = True
connectionString.Dialect = 3
Dim conn As New FbConnection(connectionString.ToString)
Dim comm As New FbCommand( " select first 10 * from test " , conn)
conn.Open()
Dim fp As New FbDataAdapter(comm)
Dim ds As New DataSet
fp.Fill(ds)
fp.Dispose()
comm.Dispose()
conn.Close()
Repeater1.DataSource = ds.Tables( 0 )
Repeater1.DataBind()
ds.Dispose()
connectionString.ClientLibrary = " fbembed.dll "
connectionString.ServerType = FbServerType.Embedded
connectionString.Database = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, " Test.Fdb " )
connectionString.Pooling = True
connectionString.Dialect = 3
Dim conn As New FbConnection(connectionString.ToString)
Dim comm As New FbCommand( " select first 10 * from test " , conn)
conn.Open()
Dim fp As New FbDataAdapter(comm)
Dim ds As New DataSet
fp.Fill(ds)
fp.Dispose()
comm.Dispose()
conn.Close()
Repeater1.DataSource = ds.Tables( 0 )
Repeater1.DataBind()
ds.Dispose()