Salve Questo è il mio codice:
codice:
<%@ Page Language="VB" Debug="true"%>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %> 

<script runat="server">
	dim Conn as new OleDbConnection("Provider=" & _
		"Microsoft.Jet.OLEDB.4.0;" & _
		"Data Source="&Server.MapPath("\mdb-database\Mio.mdb"))
		
	sub GetData(obj as Object, e as EventArgs)
		dim objCmd as OleDbCommand = new OleDbCommand("SELECT * FROM [MiaTabella] WHERE Nome ='"&@Codice&"'", Conn)
		dim objReader as OleDbDataReader
		dim objParam as OleDbParameter
					
		objParam = objCommand.Parameters.Add("@Codice",OleDbType.char)	
		objParam.Direction = ParameterDirection.Input
		objParam.Value = tbCodice.Text
		
		try
			objCmd.Connection.Open()
			objReader = objCmd.ExecuteReader
		catch ex as OleDbException
			Label1.Text = "Errore dal database."
		end try
		
		DataGrid1.DataSource = objReader
		DataGrid1.DataBind()
		
		objReader.Close
		objCmd.Connection.Close()
	end sub
</script>


<html>
<body>

	<asp:Label ID="Label1" runat="server" />

	Inserisci un Codice: <asp:TextBox ID="tbCodice" runat="server" AutoPostBack="true" OnTextChanged=GetData />
	


	<asp:DataGrid ID="DataGrid1" runat="server"
	BorderColor="black" GridLines="Vertical" Width="100%" Font-Names="Arial" Font-Size="8pt" HeaderStyle-BackColor="#cccc99" ItemStyle-BackColor="#ffffff"
	AlternatingItemStyle-BackColor="#cccccc"
	AutoGenerateColumns="true" />
	</p>
</body>

</html>

Il codice lo preso da un libro ma non riesco a farlo funzionare Vi prego aiutatemi