Select enkel værdi fra DB

Et eksempel:

Dim myConn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\my.mdb")
Dim myQuery As String = "Select Top1 Name From MyTable"
Dim myOleDbCommand As New OleDbCommand(myQuery,myConn)
myConn.Open()
Dim myReader As OleDbDataReader = myOleDbCommand.ExecuteReader()
Try
    While myReader.Read()
          LeftMenuTitles.Text = myReader.GetValue("Name")
          Exit While
    End While
Finally
    myReader.Close()
    myConn.Close()
End Try

Du kan bare ændre OleDb* typerne til Sql*, hvis du hellere vil benytte disse.

Hvis du bruger SQL Server er det mest effektive at benytte en OUTPUT parameter fra en Stored procedure.

odegaard>Det er ikke et spørgsmål om at man "hellere" vil benytte Sql* fremfor OleDb*, SqlClient namespacet giver meget bedre performance ved brug med SQL Server

Nej, men det er vel et spørgsmål om hvilket database man vil benytte.
Jeg havde noget kode liggende, som jeg ikke gad skrive mere om end nødvendigt.

Det lød bare på dig som om at "der var frit valg"

Har du egentlig set nogle test af performance mellem OleDB og SQLClient ?

Sorry, det var et dårligt eksempel jeg gav jer.
Det jeg faktisk mener er hvordan laver man en simpel select ala dette som  er i klassisk asp:

Set rsSubPage = Conn.Execute("SELECT * FROM tblText WHERE Activated=True AND ID=" & intID)

ja og selvfølgelig skal SQLClient  bruges i mit tilfælde hvor jeg har en SQL server til rådighed.

Et recordset i ASP er vel hvad der svarer til en datareader eller et dataset i ASP.NET.

ja det har vusit ret i , men hvordan fanden laver man et i .Net

Dim objConn As New SqlConnection("DIN CONNECTION STRING HER")
Dim objCmd As New SqlCommand(SELECT * FROM tblText WHERE Activated=True AND ID=" & intID, objConn )
objConn.Open()
Dim objReader As SqlDataReader = objCmd.ExecuteReader( CommandBehaviour.CloseConnection)

Så har du et "recordset" i form af din datareader som du kan binde til datagrids eller loope igennem sådan her:

While objReader.Read()
          'Do your stuff
End While

Ja i havde tildels ret begge to.
>odegaard: dit eks. virkede hvis man fjernede ".GetValue"
Jeg synes bare det er vildt at man skal bruge et loop for at hente en værdi.

I mit tilfælde har jeg selvfølgelig brugt en output parameter som moonduck foreslog. Her er den endelige kode, hvis i skulle være interesserede.

Dim objConnect as New SqlConnection(objConnection)
       
Dim strCommandTextCatTitle As String = "pclSelectCategoriesTitles"
       
Dim objCommandCatTitle As New SqlCommand(strCommandTextCatTitle,objConnect)
       
objCommandCatTitle.CommandType = CommandType.StoredProcedure
       
Dim objParam AS SqlParameter
       
objParam = objCommandCatTitle.Parameters.Add("@intLang", SqlDBType.Int)
objParam.Direction = ParameterDirection.Input
objParam.Value = intLang
       
objParam = objCommandCatTitle.Parameters.Add("@intCat", SqlDBType.Int)
objParam.Direction = ParameterDirection.Input
objParam.Value = pCat
       
objParam = objCommandCatTitle.Parameters.Add("@Title", SqlDBType.nvarchar, 100)
objParam.Direction = ParameterDirection.Output

objConnect.Open()
objCommandCatTitle.ExecuteNonQuery()
   
LeftMenuTitles.Text = "&nbsp;&nbsp;&nbsp;&nbsp;" & objCommandCatTitle.Parameters("@Title").Value.ToString() & "<br/>"
objConnect.Close()

Tak for hjælpen i får lov at dele pointene, ok?

og min stored proc hvis der er nogen der skulle være interesseret:

CREATE PROCEDURE pclSelectCategoriesTitles
@Title nvarchar(100) OUTPUT, @intLang int, @intCat int

AS

BEGIN
SELECT @Title  = Title FROM pclCATEGORIES_TITLES WHERE Lang = @intLang And CatID = @intCat
END
GO