UNIDAD 5: PROGRAMACION VISUAL Visual Basic INTRODUCION A LAS BASES DE DATOS

TEMA 10: VISUAL WEB DEVELOPER 2005 Visual Basic FILTROS SQL SELECT

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; y no olvidar poner el SQLCLIENT arriba

Programa

<%@ Page Language="VB" %>
<%@ Import Namespace="System" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<script runat="server">
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
' creando y cargando objetos
Dim CANAL As SqlConnection
Dim ORDEN As SqlDataAdapter
Dim TABLA As DataSet
Dim q As String
' aqui es donde se usa la string de coneccion
CANAL = New SqlConnection(" Persist Security Info=True;User ID=lsoto;Password=TUPASSWORD;Initial Catalog=lsoto;Data Source=sql13.hostbasket.com")
' creando y mandando dataadpater, recordar que select --> usa dataadapter
q = "select * from mitabla where edad >= @EDAD"
ORDEN = New SqlDataAdapter(q, CANAL)
ORDEN.SelectCommand.Parameters.Add(New SqlParameter("@EDAD", SqlDbType.SmallInt))
ORDEN.SelectCommand.Parameters("@EDAD").Value = EDAD.Text
' creando y cargando dataset
TABLA = New DataSet()
ORDEN.Fill(TABLA, "mitabla")
' pasando el dataset al gridwiew
GRID.DataSource = TABLA
GRID.DataMember = "mitabla"
GRID.DataBind()
End Sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>BASES DE DATOS</title>
</head>
<body>
<form id="form1" runat="server">
&nbsp;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;<asp:Label ID="Label1" runat="server" Text="FILTROS"></asp:Label><br />
<asp:Label ID="Label2" runat="server" Text="EDAD > QUE"></asp:Label>
<asp:TextBox ID="EDAD" runat="server"></asp:TextBox>
<asp:Button ID="Button1" runat="server" OnClick="Button1_Click" Text="FILTRAR" /><br />
<br />
&nbsp;<asp:GridView ID="GRID" runat="server"></asp:GridView>
</form>
</body>
</html>

Nota: Es el programa anterior pero con otra condicion WHERE 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 programa (se ocupan varios command.parameters()) pero eso queda de tarea.

Corrida:

image485.jpg

TAREAS PROGRAMACION VISUAL WEB DEVELOPER 2005 Visual Basic

1.- preparar programas de filtrado para sus bases de datos y su programa de menu (ACUERDENSE O USAR PROCEDIMIENTOS Y USAR LOS OBJETOS COMMAND, ADAPTER, CONECCION, DATASET COMO GLOBALES O TAMBIEN PUEDEN CONSTRUIR EL PROGRAMA DE MENU Y EN LAS OPCIONES DE MENU IR ACTIVANDO UNA PAGINA CORRESPONDIENTE), recordar que sus filtros deben construirlas con 2 combos y un text, suerte

Politica de Privacidad