Der er ikke angivet nogen værdi for en eller flere parametre
Programmet kobler op til en lille access base, sproget et VB.net.Alle poster syntes at være rigtige og selvom jeg har prøvet lidt af hvert griner systemet bare af mig.
Dette er koden, der giver fejlmeddelelsen:
Module Module1
Sub CheckDatabase()
Dim MinForbindelse As OleDbConnection
Dim DbLaeser As OleDbDataReader
Dim nummerplade As String = "YL49449"
Dim DbKommando As OleDbCommand = New OleDbCommand("SELECT * FROM Car_tag_acces WHERE reg = nummerplade ")
'Dim DbKommando As OleDbCommand = New OleDbCommand("SELECT reg, model, kaldenavn, konto, gul, fuel FROM Car_tag_acces WHERE reg = nummerplade ")
Try
MinForbindelse = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source = C:\drcarbase\car_tag.mdb")
MinForbindelse.Open()
DbKommando.Connection = MinForbindelse
DbLaeser = DbKommando.ExecuteReader(CommandBehavior.SingleResult)
Do While DbLaeser.Read()
Console.WriteLine(DbLaeser.GetString(0) & " " & DbLaeser.GetString(1) & " " & DbLaeser.GetString(2) & " " & DbLaeser.GetString(3) & " " & DbLaeser.GetBoolean(4) & " " & DbLaeser.GetString(5))
Loop
Console.ReadLine()
Catch e As Exception
MsgBox(e.Message)
End Try
MinForbindelse.Close()
End Sub
End Module
Hvad kan der dog være galt?