/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
At finde ud af hvor mange rows der er i en~
Fra : Fætter Guf


Dato : 13-10-03 08:33

Er der en der har et helt lille eksempel på hvordan man tæller rows. Jeg har
prøvet med SELECT COUNT og det burde også virke men kan ikke få det til at
virke. Det jeg gerne vil se et lille ex. på er hvordan men henter antallet
på alle ud fra en access database der hedder "Hans" og er "31" år.
(Bruger vb.net)
Håber ikke det er for meget med et helt eksempel.



 
 
Fætter Guf (13-10-2003)
Kommentar
Fra : Fætter Guf


Dato : 13-10-03 17:05

Den kommer med denne fejl

"ExecuteScalar: Connection property has not been initialized."


Sub Test()

Dim connectionStr as string ' Forbindelses-streng til databasen
Dim strSQL As String = "SELECT Count(*) as Antal FROM Brugere WHERE
Navn='Hans' AND Alder=31"
Dim con as OledbConnection ' Forbindelse-objekt til databasen
Dim objCommand As OleDbCommand = New OleDbCommand(strSQL, con)
Dim Resultat as Integer = 0

' Opbyg connectionStr
connectionStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="
connectionStr += Request.PhysicalApplicationPath + "Kunder.mdb"

' Skab forbindelses-objekt udfra connectionStr
con = New OledbConnection(connectionStr)




' Opbyg SQL-kommando

Try
con.Open() ' Åben forbindelsen til databasen
Resultat = objCommand.ExecuteScalar()
Catch Ex as Exception
System.Web.HttpContext.Current.Response.Write(Ex.Message)
Finally
con.Close() ' Luk forbindelsen
con.Dispose()
End Try


End Sub




Sub Button1_Click(sender As Object, e As EventArgs)
Test()
End Sub




Tomas Christiansen (13-10-2003)
Kommentar
Fra : Tomas Christiansen


Dato : 13-10-03 23:02

Fætter Guf skrev:
> Dim connectionStr as string ' Forbindelses-streng til databasen
> Dim strSQL As String = "SELECT Count(*) as Antal FROM Brugere WHERE
> Navn='Hans' AND Alder=31"
> Dim con as OledbConnection ' Forbindelse-objekt til databasen
> Dim objCommand As OleDbCommand = New OleDbCommand(strSQL, con)
> Dim Resultat as Integer = 0
>
> ' Opbyg connectionStr
> connectionStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="
> connectionStr += Request.PhysicalApplicationPath + "Kunder.mdb"
>
> ' Skab forbindelses-objekt udfra connectionStr
> con = New OledbConnection(connectionStr)

Jeg kan ihvertfald se én ting, som ikke hænger sammen (øøøh, kan én ting
"hænge sammen"?):

Du erklærer en variabel objCommand, og instantierer et objekt i samme linie.
Til brug for dette bruger du variablen con, som IKKE er instantieret. Det
gør du først længere nede i koden.

-------
Tomas


Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408924
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste