SELECT COUNT bei Access07Db

[Alfred_]

Hi, beim nachfolgendem Code erhalte ich die Fehlermeldung: für mindestens einen erforderlichen Parameter wurde kein Wert angegeben.
An den Spaltennamen kann es nicht liegen. Vermutlich an der WHERE-Klausel, aber was?
Ich habe diesen Schnipsel aus einem funktionierendem MySQL-Code. So weit kann ich doch nicht daneben liegen?

	Try
	  conn.Open()
	  Dim com As New OleDbCommand("SELECT * FROM Total ORDER BY lID ASC", conn)
	  Dim da As New OleDbDataAdapter(com)
	  Dim ds As New DataSet()
	  da.Fill(ds, "total")
	  Dim dt As DataTable = ds.Tables("total")
	  Dim cb As New OleDbCommandBuilder(da)
	  Dim row As DataRow
	  i = 1
	  For Each row In dt.Rows
		Dim com2 As New OleDbCommand("SELECT COUNT(*) FROM treffer WHERE ID=i", conn)
		tot = CInt(Format(CType(com2.ExecuteScalar, Integer), "##,##0"))

		Dim com3 As New OleDbCommand("SELECT COUNT(*) FROM Lotto06treffer WHERE ID=i  AND Hit=3", conn)
		h_3 = CInt(Format(CType(com3.ExecuteScalar, Integer), "##,##0"))
etc., etc....
		row("lHit") = Format(tot, "##,##0")
		row("H3") = Format(h_3, "##,##0")
		i += 1
		tot = 0 : h_3 = 0		
                                           ProgressBar1.PerformStep()
		Application.DoEvents()
	  Next
	  da.Update(ds, "total")
	Catch ex As Exception
	  MessageBox.Show(ex.Message, "Fehler! Datenspeicherung 'total' ist fehlgeschlagen!")
	Finally
	  conn.Close()
	End Try

Vielen Dank!