WebRessurs.no - Webprogrammering og ressurs innen ASP, ASP.NET, PHP, SQL, HTML, CSS, Javascript, XML, C#, VB, Flash mm.

KODE EKSEMPLER

ASP.net (199)

ASP 3.0 (111)

PHP (30)

HTML (66)

SQL (89)

CSS (46)

XML (7)

JavaScript (78)

Diverse kode (13)

ARTIKLER / RESSURSER

Programmering (22)

System og drift (15)

Trafikk og inntekt (11)

Guider og tips (22)

Nyttig lesestoff (23)

Web forum (604)

Link galleri (565)

KURS / TUTORIALS

ASP.NET kurs(5)

CSS kurs (2)

JQuery kurs (2)

FILM / MEDIA

Øk trafikken (8)

Facebook App. (4)

Microsoft CEO (6)

GRATIS SOFTWARE

Server & web

Internett & epost

Systemverktøy

Sikkerhet

Fildeling

Lyd & media

Diverse software

TJENESTER

Domenesalg

Metagenerator

Websikre farger

WebMail

ANNET

Bli medlem!

Siste innlegg

Gjestebok

Tips en venn

Kontakt oss

Forsiden

INTERNETT HASTIGHET

Forskjellen på DataSet og DataReader, kodeeksempel

av Øyvind A. Isaksen

Dette kodeeksempelet viser programmeringsmessig forskjellem på et DataSet og en DataReader. Begge kodene gjør det samme, tar ut data fra en database og binder det til en servercontrol (Repeater).

---------------------------------------
DataSet-Eksempel:
---------------------------------------

Private Sub HentArtikkel(ByVal inputCatID)

Dim SQL As String = "select title,ingress,body, " & _
"(select path from tblImage where tblImage.artID = tblArticle.artID) as image, " & _
"(select text from tblImage where tblImage.artID = tblArticle.artID) as imagetext " & _
"from tblArticle where active='1' and catID=@catID and custID=@custID"

Dim conn As New SqlConnection(variables.ConnString)
Dim cmd As New SqlCommand(SQL, conn)

Dim parameter1 As New SqlParameter("@catID", inputCatID)
Dim parameter2 As New SqlParameter("@custID", variables.custID)
cmd.Parameters.Add(parameter1)
cmd.Parameters.Add(parameter2)

cmd.Connection.Open()

Dim DS As New DataSet()
Dim DA As New SqlDataAdapter(cmd)
DA.Fill(DS, "virInnhold")
Me.rptArtikkel.DataSource = DS
Me.rptArtikkel.DataBind()

cmd.Connection.Close()

cmd.Dispose()
conn.Dispose()

End Sub

---------------------------------------
DataReader-Eksempel:
---------------------------------------

Private Sub HentArtikkel(ByVal inputCatID)

Dim SQL As String = "select title,ingress,body, " & _
"(select path from tblImage where tblImage.artID = tblArticle.artID) as image, " & _
"(select text from tblImage where tblImage.artID = tblArticle.artID) as imagetext " & _
"from tblArticle where active='1' and catID=@catID and custID=@custID"

Dim conn As New SqlConnection(variables.ConnString)
Dim cmd As New SqlCommand(SQL, conn)

Dim parameter1 As New SqlParameter("@catID", inputCatID)
Dim parameter2 As New SqlParameter("@custID", variables.custID)
cmd.Parameters.Add(parameter1)
cmd.Parameters.Add(parameter2)

cmd.Connection.Open()

Dim dr As SqlDataReader = cmd.ExecuteReader
Me.rptArtikkel.DataSource = dr
Me.rptArtikkel.DataBind()

cmd.Connection.Close()

cmd.Dispose()
conn.Dispose()

End Sub

---------------------------------------
Konklusjon, Dette er forskjellen:
---------------------------------------

cmd.Connection.Open()


Dim DS As New DataSet()
Dim DA As New SqlDataAdapter(cmd)
DA.Fill(DS, "virInnhold")
Me.rptArtikkel.DataSource = DS
Me.rptArtikkel.DataBind()



Dim dr As SqlDataReader = cmd.ExecuteReader
Me.rptArtikkel.DataSource = dr
Me.rptArtikkel.DataBind()


cmd.Connection.Close()

WebRessurs.no er utviklet og drives av SoftMaker
Sett som startside: [ ]. Bokmerk denne siden: [ klikk ]. Sitemap. http://twitter.com/webressurs_no/. Antall brukersesjoner: 14838715.
Copyright WebRessurs.no © 2003 - 2018