Questa è la parte iniziale della pagina.
Lo spazio dei nomi lo avevo importato...

codice:
<@ Page Language="VB" %>
<@ Import Namespace="System.Data" %>
<@ Import Namespace="System.Data.OleDb" %>

<script runat="server">
  Sub Page_Load(obj as Object, e as EventArgs)
    dim objConn as New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=../mdb-database/e-commerce.mdb")
    dim objCmd as new OleDbDataAdapter("SELECT * FROM carrello WHERE ID_cliente="& Request.Cookies("riservato_xxx.it")("ID_cliente"),objConn)

    dim ds as DataSet=new DataSet()
    objCmd.Fill(ds, "carrello")

    MyRepeater.DataSource=ds.Tables("carrello").DefaultView
    DataBind()

    if not Page.IsPostBack then
      lblMessage.Text=<%# prezzo %>
    end if
  end sub

  Sub tbMessage_Change(Sender As Object, E As EventArgs)
    lblMessage.Text=<%# prezzo %>*tbQta.Text
  end sub
</script>