
 
 代码如下:
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() 
文件下载