+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic .NET (https://accesstr.net/forum-visual-basic-net.html)
+--- Forum: Visual Basic .NET Cevaplanmış Soruları (https://accesstr.net/forum-visual-basic-net-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Veri aktarımında hata (/konu-veri-aktariminda-hata.html)
Veri aktarımında hata - drummers - 29/11/2011
Projemde Access veritabanından verilerimi textboxlara, gatagride aktarıyorum. Kayıt ekleme silme işlemi yapıyorum. Buraya kadar sorun yok. Fakat iş textboxlara gelen verileri bir Excel dosyasındaki hücrelere aktarmaya geldiğinde burda işin içinden çıkamadım.
Referanslarım bunlar
Imports System.Data.OleDb
Imports System.Data.OleDb.OleDbCommand
Imports System.Data
Üstteki referanslara ilaveten
Imports Microsoft.Office.Interop
Imports Microsoft.Office.Interop.Excel
Bunlarıda aynı anda nasıl kullanırım. Projem VB 2010. Teşekürler
Cvp: Veri aktarımında hata - alpeki99 - 29/11/2011
Alıntı: public void gridden_excele(Control grid_adi, string excel_cikti_adi, string sayfa_mesaji)
{
//Dil Farkını Önlemek İçin
System.Threading.Thread.CurrentThread.CurrentCulture = new System.Globalization.CultureInfo("en-us");
Microsoft.Office.Interop.Excel._Application app = new Microsoft.Office.Interop.Excel.Application();
Microsoft.Office.Interop.Excel._Workbook workbook = app.Workbooks.Add(Type.Missing);
Microsoft.Office.Interop.Excel._Worksheet worksheet = null;
app.Visible = false;
worksheet = (Microsoft.Office.Interop.Excel.Worksheet)workbook.Sheets["Sayfa1"];
worksheet = (Microsoft.Office.Interop.Excel.Worksheet)workbook.ActiveSheet;
worksheet.Name = sayfa_mesaji;
for (int i = 1; i < (grid_adi as DataGridView).Columns.Count + 1; i++)
{
worksheet.Cells[1, i] = (grid_adi as DataGridView).Columns[i - 1].HeaderText;
}
for (int i = 0; i < (grid_adi as DataGridView).Rows.Count - 1; i++)
{
for (int j = 0; j < (grid_adi as DataGridView).Columns.Count; j++)
{
worksheet.Cells[i + 2, j + 1] = (grid_adi as DataGridView).Rows.Cells[j].Value.ToString();
}
}
string masaustu = Environment.GetFolderPath(Environment.SpecialFolder.Desktop);
workbook.SaveAs(masaustu + "\\" + excel_cikti_adi + ".xls", Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlExclusive, Type.Missing, Type.Missing, Type.Missing, Type.Missing);
app.Quit();
MessageBox.Show("Masaüstünde istemiş olduğunuz Excel dosyası oluşturuldu.", "İşlem Tamam", MessageBoxButtons.OK,MessageBoxIcon.Information);
} // gridden excele bitti
Ben c# ile gridten excele bu şekilde veriyorum. İsterseniz bir inceleyin fikir verir. Diğer yandan Vb.Net için aşağıdaki kaynağı bir inceleyin isterseniz:
Kod:
http://www.codeproject.com/KB/vb/Senthil_S__Software_Eng_.aspxCvp: Veri aktarımında hata - drummers - 29/11/2011
(29/11/2011, 23:25)alpeki99 yazdı:Alıntı: public void gridden_excele(Control grid_adi, string excel_cikti_adi, string sayfa_mesaji)
{
//Dil Farkını Önlemek İçin
System.Threading.Thread.CurrentThread.CurrentCulture = new System.Globalization.CultureInfo("en-us");
Microsoft.Office.Interop.Excel._Application app = new Microsoft.Office.Interop.Excel.Application();
Microsoft.Office.Interop.Excel._Workbook workbook = app.Workbooks.Add(Type.Missing);
Microsoft.Office.Interop.Excel._Worksheet worksheet = null;
app.Visible = false;
worksheet = (Microsoft.Office.Interop.Excel.Worksheet)workbook.Sheets["Sayfa1"];
worksheet = (Microsoft.Office.Interop.Excel.Worksheet)workbook.ActiveSheet;
worksheet.Name = sayfa_mesaji;
for (int i = 1; i < (grid_adi as DataGridView).Columns.Count + 1; i++)
{
worksheet.Cells[1, i] = (grid_adi as DataGridView).Columns[i - 1].HeaderText;
}
for (int i = 0; i < (grid_adi as DataGridView).Rows.Count - 1; i++)
{
for (int j = 0; j < (grid_adi as DataGridView).Columns.Count; j++)
{
worksheet.Cells[i + 2, j + 1] = (grid_adi as DataGridView).Rows.Cells[j].Value.ToString();
}
}
string masaustu = Environment.GetFolderPath(Environment.SpecialFolder.Desktop);
workbook.SaveAs(masaustu + "\\" + excel_cikti_adi + ".xls", Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlExclusive, Type.Missing, Type.Missing, Type.Missing, Type.Missing);
app.Quit();
MessageBox.Show("Masaüstünde istemiş olduğunuz Excel dosyası oluşturuldu.", "İşlem Tamam", MessageBoxButtons.OK,MessageBoxIcon.Information);
} // gridden excele bitti
Ben c# ile gridten excele bu şekilde veriyorum. İsterseniz bir inceleyin fikir verir. Diğer yandan Vb.Net için aşağıdaki kaynağı bir inceleyin isterseniz:
Kod:http://www.codeproject.com/KB/vb/Senthil_S__Software_Eng_.aspx
Güzel. Teşekürler