Nede devexpress kullanmiyorsun cok guzel raporlama sistemi var. Tavsiye ederim

ıyı aksamlar murıdler vb. net de olusturulmus bır datagridview var bunun içine access veri tabanındakı kayıtları sıralatıyorum fakat bırde fastreport ıle cıktısını almam lazım fakat alamıyorum. aradakı baglantıyı kuramadım kodlar asagıda ornek dosyası Private FDataSet As DataSet Private Sub CreateDataSet ' create simple dataset with one table Me. FDataSet = New DataSet Dim table As New DataTable table. TableName = "Employees" Me. FDataSet. Tables. Add table. Columns. Add("ID", GetType table. Columns. Add("Name", GetType table. Rows. Add(1, "Andrew Fuller") table. Rows. Add(2, "Nancy Davolio") table. Rows. Add(3, "Margaret Peacock") End Sub Private Sub Form1_Load Handles MyBase. Load CreateDataSet End Sub Private Sub btnExportWithDialog_Click Handles btnExportWithDialog. Click ' create report instance Dim report As New Report ' load the existing report report. Load ' register the dataset report. RegisterData ' run the report report. Prepare ' create export instance Dim export As New PDFExport export. Export ' free resources used by report report. Dispose End Sub Private Sub btnSilentExport_Click Handles btnSilentExport. Click ' create report instance Dim report As New Report ' load the existing report report. Load ' register the dataset report. RegisterData ' run the report report. Prepare ' create export instance Dim export As New PDFExport report. Export ' free resources used by report report. Dispose End Sub End Class buda benım baglantı seklım Dim yol As String = Application. StartupPath. ToString Dim baglan As New OleDbConnection("provider=microsoft. jet. oledb.4.0; Data Source=" & yol & "\sevktarihi. mdb") Dim sql As String Dim Dset As DataSet = New DataSet Private Sub guncelle If TextBox1. Text = String. Empty Then sql = "Select From sevk" ' Eğer Kutudaki bilgileri silerseniz verilerin tamamı listelenecektir. Else sql = "Select From sevk Where sozno Like'" & TextBox1. Text & "%" & "'" ' TextBox1 yerine sizdeki TextBox adını kullanacaksınız ' Like ve "%" sizin Datagridview deki listeyi gireceğiniz karaktere gre değerlendirir. Textbox içersinde tabi siz bunu ComboBox kullanıyorsanız ' sql = "Select From Bilgiler Where Veri1 Like'" & ComboBox1. SelectedItem & "%" & "'" şeklinde de kullanabilirsiniz. End If Dim Ds As OleDbDataAdapter = New OleDbDataAdapter Ds. Fill DataGridView1. DataSource = Dset. Tables(0) DataGridView1. Columns. Item(0). Visible = False DataGridView1. Columns. Item(1). HeaderText = "Szleşme No" DataGridView1. Columns. Item(1). Width = 95 DataGridView1. Columns. Item(2). HeaderText = "Müşteri İsmi" DataGridView1. Columns. Item(2). Width = 160 DataGridView1. Columns. Item(3). HeaderText = "Sevk Tarihi" DataGridView1. Columns. Item(3). Width = 85 DataGridView1. Columns. Item(4). HeaderText = "Notlar" DataGridView1. Columns. Item(4). Width = 175 DataGridView1. Columns. Item(5). HeaderText = "Kullanıcı" DataGridView1. Columns. Item(5). Width = 85 DataGridView1. ScrollBars = ScrollBars. Vertical End Sub benım sımdı bu baglantıyı kurabılmem ıcın nasıl bır yol ızlemem lazım

evet muritler sorunları yavas yavas cozuyorum. bu problem vs express kullanım dıyemıs. şimdi sorunum report viewer da tek butonla pdf export edıp mail olarak gondermeye calısıyorum bunu nasıl yapabılırım lazz tarafından 16/Oca/15 17:18 tarihinde düzenlenmiştir

teskkurler. pekı bı de onu deneyeyım bakalım o nasılmış

up yapayımda gunduz gozuyle goren olur belkı