Errors

Hi Expert! I have a code below, but have errros in the page, please advise! Thank you in advance!
 
<%@ Page Language="VB" %>
<!--#include VIRTUAL="Function_Con.aspx"--> 
<% @Import Namespace="System.Data" %>
<script language="vb" runat="server">
 Sub Page_Load(sender as Object, e as EventArgs)
  If Not Page.IsPostBack then
   
   BindData()
  End If 
 End Sub
 
 
 Sub BindData()
  
  
  Dim strSQL
  
   strSQL = "SELECT * from  products" 

  
  Dim myDA as New  OdbcDataAdapter
  'myDA.SelectCommand = myCommand
   myDA= New OdbcDataAdapter(strSQL, connTemp ...