Asp.net com VB

Ola pessoal,

primeiramente kero dizer q estou iniciando em asp.net, e keria uma ajudinha de vcs pode ser??

• e o seguinte, fiz um exemplo bem simples para estudar a plataforma, e n conseguir ainda resolver esse erro! aparentemente simples! vejam!

Mostrando.aspx

<%@Page Language="VB" Debug="True" Explicit="True" %>

<%@Import NameSpace="System.Data" %>

<%@Import NameSpace="System.Data.ODBC" %>

<!--#Include File="MovMostrando.aspx"-->

<form runat="server">

<%

Dim DtReader As OdbcDataReader

Dim Comando1 As New OdbcCommand("Select * From Cadastro",Conexao)

Conexao.Open

DtReader=Comando1.ExecuteReader

While DtReader.Read

CodigoCliente.Text = DtReader.Item("CodCli")

NomeCliente.Text = DtReader.Item("NomeCli")

TelCliente.Text = DtReader.Item("TelCli")

EmailCliente.Text = DtReader.Item("EmailCli")

%>

<br>

<asp:Label id="LbMensagem" Text="" runat="server"/>

<br>

<asp:textbox Id="CodigoCliente" runat="server"/>

<br>

<asp:textbox Id="NomeCliente" runat="server"/>

<br>

<asp:textbox Id="TelCliente" runat="server"/>

<br>

<asp:textbox Id="EmailCliente" runat="server"/>

<br>

<asp:button Id="BtAtualizar" Text="Atualizar" OnClick="Atualizar" runat="server"/>

<asp:button Id="BtLimpar" Text="Limpar" OnClick="Limpar" runat="server"/>

<br>

<%

End While

DtReader.Close()

Conexao.Close()

%>

</form>

MovMostrando.aspx

<!--#Include File="Conexao.aspx"-->

<script runat="server">

Dim vCodigoCliente, vNomeCliente, vTelCliente, vEmailCliente As String

Sub Atualizar(Sender As Object, e As EventArgs)

vCodigoCliente = CodigoCliente.Text

vNomeCliente = NomeCliente.Text

vTelCliente = TelCliente.Text

vEmailCliente = EmailCliente.Text

Try

Dim Comando2 As New OdbcCommand("UPdate Cadastro Set NomeCli='"+vNomeCliente+"', TelCli='"+vTelCliente+"', EmailCli='"+vEmailCliente+"' Where CodCli="+vCodigoCliente,Conexao)

Conexao.Open

Comando2.ExecuteNonQuery

LbMensagem.Text = "Dados Atualizados com Sucesso!"

Conexao.Close

Catch

LbMensagem.Text = "Operação Cancelada"

End Try

End Sub

Sub Limpar(Sender As Object, e As Eventargs)

LbMensagem.Text = ""

End Sub

</script>

Conexao.aspx

<script runat="server">

Dim Conexao As New OdbcConnection("Driver=MySql;Server=LocalHost;uid=;pwd=;DataBase=JeanCarlos")

</script>

o erro q esta dando e na conexao.Open da pagina Mostrando.aspx somente qndo eu clico em Atulizar

o que estou fazendo errado??

Obrigado a todos!