Only First Shopping Cart Item Displays

[Sparky Arbuckle]

Dim MyCookie as new httpCookie(myCookieName)

FOR EACH myItem as DictionaryEntry in htCart
myCookie.Values(myItem.Key) = myItem.Value

Dim objConn as new
OLEDBConnection(ConfigurationSettings.AppSettings("NEWConnection"))
Dim strSQL as string = "SELECT ITEMID, itNAME, itPRICE, itIMAGE " &
_
"FROM tblITEMS WHERE ITEMID = '" & myItem.Key &
"';"
Dim objDataReader as OLEDBDataReader

objConn.Open()

Dim objCommand as new OLEDBCommand(strSQL,objConn)
dl.DataSource =
objCommand.ExecuteReader(CommandBehavior.CloseConnection)
dl.DataBind()
dl.RepeatColumns = 1
NEXT