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()
(编辑:焦作站长网)
【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!
|