Showing posts with label DataBase Connection. Show all posts
Showing posts with label DataBase Connection. Show all posts

Sunday, June 24, 2012

ASP.Net : SQL Data Connection แบบที่ 3

คล้ายแบบที่ 2 แต่ใช้ DataView
    Dim ds As New DataSet
        Dim dt As New DataTable
        Dim dv As DataView
            DA.Fill(ds, "Table1")
            dt = ds.Tables("Table1")
            dv = dt.DefaultView
            dv.Sort = "Column1 DESC, Column2"
            dv.RowFilter = "Column2 > 800000"
            GridView1.DataSource = dv
            GridView1.DataBind()

ASP.Net : SQL Data Connection แบบที่ 2

คล้ายแบบที่ 1 แต่ใช้ Data Table

        Dim ds As New DataSet
        Dim dt As New DataTable
            DA.Fill(ds, "Table1")
            dt = ds.Tables("Table1")
            GridView1.DataSource = dt

Friday, June 22, 2012

ASP.Net : SQL Data Connection แบบที่ 1

การติดต่อฐานข้อมูลมีหลายวิธี บางครั้งก็นึกคำสั่งไม่ออกก็เลยเอามาบันทึกไว้ใช้ดังนี้

1.สร้าง Class ซึ่งจะถูกเก็บไว้ที่ โพลเดอร์ App_Code สมมุติชื่อ DBConnection ดังนี้

Imports Microsoft.VisualBasic
Public NotInheritable Class DBConnection
    Public Shared DB1ConString As String = "Data Source=x.x.x.x;Initial Catalog=DB1;Persist Security Info=True;User ID=x;Pwd=x"
    Public Shared DB2ConString As String = "Data Source=x.x.x.x;Initial Catalog=DB2;Persist Security Info=True;User ID=x;Pwd=x"
End Class

2.นำไปใช้ใน Page ที่ต้องการ

Imports System.Data.SqlClient
Partial Class TestPage
    Inherits System.Web.UI.Page
    Dim Conn As SqlConnection
    Dim cmd As String
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Conn = New SqlConnection(DBConnection.DB1ConString)
        cmd = "SELECT * from Table1 "
        Dim DA As New SqlDataAdapter(cmd, Conn)
        Dim ds As New DataSet
        DA.Fill(ds)
        GridView1.DataSource = ds
        GridView1.DataBind()
        Catch ex As Exception
    End Sub
End Class