FILTROS BASES DE DATOS VISUAL BASIC MOBILE

UNIDAD 5: VISUAL BASIC INTRODUCION A LAS BASES DE DATOS

TEMA 10: FILTROS POCKET PDA

Otro problema similar al anterior es el de filtros es decir en muchas ocasiones es necesario obtener informacion acerca de un subconjunto de renglones de la tabla.

Por ejemplo todos los estudiantes que sean mayores de 17 anos, todos los clientes que sean de Tijuana, etc., a esto le llamamos filtros o condiciones.

Tambien se resuelve de manera similar al anterior, es decir usando la instruccion select etc, from tabla, where CONDICION;

Codigo prog21.aspx


' inicializando objetos mobiles

' y definiendo lenguaje a usar por servidor

<%@ Page Inherits="System.Web.UI.MobileControls.MobilePage"

Language=VB%>

<%@ Register TagPrefix="mobile"

Namespace="System.Web.UI.MobileControls"

Assembly="System.Web.Mobile"%>

<%@ Import Namespace="System" %>

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

<%@ Import Namespace="System.Data.OleDb" %>

' todos los controles ponerlos dentro de una forma

<mobile:Form runat=server Paginate=true>

EDAD MAYOR QUE<mobile:TEXTBOX ID=EDAD runat=server />

<mobile:Command runat=server OnClick=BUSCAR Text=OK />

<mobile:OBJECTLIST ID=GRID RUNAT=SERVER

AUTOGENERATEFIELDS=TRUE></mobile:OBJECTLIST>

</mobile:Form>

<SCRIPT RUNAT=SERVER>

' creando y cargando coneccion, adapater, dataset como variables globales

DIM coneccion AS OLEDBCONNECTION

DIM canal AS OLEDBDATAADAPTER

DIM tabla AS DATASET

DIM q AS STRING

SUB BUSCAR(Sender As Object, E As EventArgs)

' enlazando coneccion a la base de datos

coneccion = NEW OLEDBCONNECTION("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\progfacil\lauro\mibase.mdb")

' creando instruccion sql de busqueda

q = "select * from mitabla where edad >= @EDAD"

canal=new OleDbDataAdapter(q, coneccion)

canal.SelectCommand.Parameters.Add(new OleDbParameter("@EDAD", OleDbType.Integer))

canal.SelectCommand.Parameters("@EDAD").Value = EDAD.Text

' cargando el dataset

tabla = NEW DATASET()

canal.FILL(tabla, "mitabla")

'cargando el grid

GRID.DATASOURCE = tabla

GRID.DATAMEMBER = "mitabla"

GRID.DATABIND()

' cerrando conneccion

coneccion.CLOSE()

END SUB

</SCRIPT>

Nota: siguen siendo combinaciones de los programas anteriores pero seria prudente mejor usar dos combobox uno para la variable, otro para el operador relacional y un text para el dato y mandar estos tres datos al prog21.aspx (se ocupan varios command.parameters()), pero eso queda de tarea.

Recordar tambien que bases de datos en microsoft.net es solamente SQL, SQL, SQL, y se han usado tres versiones de select, por ejemplo si se usa en un programa:

SELECT column1, SUM(column2)
FROM “list-of-tables”
ORDER BY “column-list” [ASC | DESC];

[ ] = optional

adivina IVAN que se obtiene como resultado.

ESTUDIEN BIEN SU TUTORIAL DE SQL.

Corrida prog21.aspx

TAREAS PROGRAMACION visual basic mobile

1.- preparar programas de filtrado para sus bases de datos, recordar que sus formas aspx deben construirlas con 2 combos y un text, suerte