◀ Previous Next ▶ Up ▲


witpoko.com


Convert CSV

ถ้าเรา ต้องการ ดึงข้อมูลจาก Gridview ให้แปลงเป็น .CSV ต้องทำอย่างไรบ้างค่ะ
และถ้า Code เราเป็นแบบนี้ต้องขียนCode อย่างไรคะ
Protected Sub find_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles finds.Click
If wh.Text.Trim() <> "" Then

Dim Conn As New SqlConnection(strConn)
Conn.Open()
Dim sqlsel As String
sqlsel = "SELECT MBITNO,MBUNMU,MBBANO,MBCAMU FROM BARCODE.BOXLIN "
sqlsel &= " WHERE MBWHLO = '" & wh.Text & "'AND MBRGDT = '" & TextBox2.Text & "'AND MBITNO = '" & TextBox1.Text & "'"
Dim com As New SqlCommand()
Dim dr As SqlDataReader
Dim dt As DataTable

With com
.Connection = Conn
.CommandType = CommandType.Text
.CommandText = sqlsel
dr = .ExecuteReader()
If dr.HasRows Then
dt = New DataTable()
dt.Load(dr)
GridView1.DataSource = dt
GridView1.DataBind()
Else
Dim myscript As String = "alert('ไม่พบข้อมูลที่ต้องการค้นหา');"
Page.ClientScript.RegisterClientScriptBlock(Me.GetType(), "myscript", myscript, True)
End If
End With

dr.Close()
Conn.Close()
End If
'showcompany()
End Sub

รบกวนด้วยนะคะ


จากคุณ : Pun_Pun -[ 1 มิ.ย. 55 - 10:39:58 A:192.168.0.82 X:202.149.101.146 ]



Share/Save/Bookmark





กระทู้ยอดนิยม