 |
| |
เลือกสั่ง Print จาก DataGridView มีโค๊ด VB แต่อยากแปลงเป็นโค๊ด C# รบกวนแปลงให้ด้วยครับท่านพี่ ..... |
| |
 |
|
|
 |
 |
|
Code (VB.NET)
Imports System.Data
Imports System.Data.SqlClient
Public Class Form1
Dim cn As SqlConnection
Dim da As SqlDataAdapter
Dim ds As New DataSet
Dim dv As New DataView
Dim rpt As rpt1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
cn = New SqlConnection("Data Source=.;Initial Catalog=test;Integrated Security=True")
End Sub
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.KeyCode = Keys.F6 Then
rpt = New rpt1
dgv.CommitEdit(DataGridViewDataErrorContexts.Commit)
ds.AcceptChanges()
ds.Tables("Data").DefaultView.RowFilter = "Column1 = 1"
rpt.SetDataSource(ds.Tables("Data").DefaultView)
crv.ReportSource = rpt
End If
End Sub
Private Sub btn_Show_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Show.Click
da = New SqlDataAdapter("Select * from test", cn)
ds.Reset()
da.Fill(ds, "Data")
If ds.Tables("Data").Columns.Contains("Column1") Then ds.Tables("Data").Columns.Remove("Column1")
ds.Tables("Data").Columns.Add(New DataColumn("Column1", GetType(Boolean)))
dgv.DataSource = ds.Tables("Data")
End Sub
Private Sub btn_Filter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Filter.Click
rpt = New rpt1
ds.Tables("Data").DefaultView.RowFilter = "Column1 = 1"
rpt.SetDataSource(ds.Tables("Data").DefaultView)
crv.ReportSource = rpt
End Sub
Private Sub btn_Clear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Clear.Click
ds.Tables("Data").DefaultView.RowFilter = ""
End Sub
End Class
Tag : .NET, LINQ, VB.NET, C#
|
ประวัติการแก้ไข
2012-09-03 10:50:15
2012-09-03 10:51:35
2012-09-03 10:52:12
|
 |
 |
 |
 |
| Date :
2012-09-03 10:47:33 |
By :
โบโน |
View :
1574 |
Reply :
2 |
|
 |
 |
 |
 |
|
|
|
|
 |
 |
|
 |
 |
| |
|
|
|
| |
|
Code (C#)
using System.Data;
using System.Data.SqlClient;
public class Form1 {
private SqlConnection cn;
private SqlDataAdapter da;
private DataSet ds = new DataSet();
private DataView dv = new DataView();
private rpt1 rpt;
private void Form1_Load(object sender, System.EventArgs e) {
cn = new SqlConnection("Data Source=.;Initial Catalog=test;Integrated Security=True");
}
private void Form1_KeyDown(object sender, System.Windows.Forms.KeyEventArgs e) {
if ((e.KeyCode == Keys.F6)) {
rpt = new rpt1();
dgv.CommitEdit(DataGridViewDataErrorContexts.Commit);
ds.AcceptChanges();
ds.Tables["Data"].DefaultView.RowFilter = "Column1 = 1";
rpt.SetDataSource(ds.Tables["Data"].DefaultView);
crv.ReportSource = rpt;
}
}
private void btn_Show_Click(object sender, System.EventArgs e) {
da = new SqlDataAdapter("Select * from test", cn);
ds.Reset();
da.Fill(ds, "Data");
if (ds.Tables["Data"].Columns.Contains("Column1")) {
ds.Tables["Data"].Columns.Remove("Column1");
}
ds.Tables["Data"].Columns.Add(new DataColumn("Column1", typeof(bool)));
dgv.DataSource = ds.Tables["Data"];
}
private void btn_Filter_Click(object sender, System.EventArgs e) {
rpt = new rpt1();
ds.Tables["Data"].DefaultView.RowFilter = "Column1 = 1";
rpt.SetDataSource(ds.Tables["Data"].DefaultView);
crv.ReportSource = rpt;
}
private void btn_Clear_Click(object sender, System.EventArgs e) {
ds.Tables["Data"].DefaultView.RowFilter = "";
}
}
|
| |
|
|
| |
| Date :
2012-09-03 21:07:31 |
By :
mr.win |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
เมื่อวานลางานครับไม่ค่อยสบาย...
ขอบคุณพี่วินครับ จะลองนำไปปรับแต่งใช้ เพื่อให้เข้ากับงานตัวเองครับ...
ถ้าพี่วินมาอุบล บอกผมล่วงหน้านะครับ จะเลี้ยงก๋วยจั๋บ หมูยอ อุบลครับ อร่อยนะครับ
|
| |
|
|
| |
| Date :
2012-09-05 09:01:51 |
By :
โบโน |
|
|
| |
|
|
|
|
|
| |
|
|
|
|
|
