UNIDAD 5: PROGRAMACION VISUAL Visual Basic BASES DE DATOS

TEMA 14: VISUAL WEB DEVELOPER 2005 Visual Basic GRAFICOS

Campos de graficos o de imagenes, se han convertido en elementos importantes de cualquier base de datos.

Para manejar este elemento con ado asp net existen dos maneras:

1.- Agregar un campo BLOB a la tabla y usar componentes asp net especializados en imagenes tanto para subirlas como para desplegar la imagen.

Este metodo provoca que la base de datos crezca mucho recordar que una imagen aun de tipo jpg ocupa mucho espacio.

2.- El segundo metodo es mas sencillo, primero subir las imagenes ( de preferencia jpg ) con un ftp normal a tusitio y despues agregar un objeto asp net IMAGE (recordar que en la primera unidad se indico que estudiaran todos los objetos webcontrol) en el programa y ademas agregar un campo de texto llamado foto a la tabla y grabar la direccion http de la imagen en este campo, por ejemplo http://programacionfacil.com/tusitio/pato.jpg aunque si estan juntos el aspx y el jpg se puede usar solo pato.jpg directamente.

Despues solo cargar este objeto asp IMAGE en la pagina que se construira que no es otra cosa que el programa de busqueda con el despliegue del campo extra, como lo muestra el programa ejemplo.

Por supuesto que tendran que reconstruir las tablas que estan manejando ya sea usando SQL DROP table y CREATE table pero como ya estudiaron mucho el sql les recomiendo ALTER TABLE y UPDATE TABLE

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 clave = @CLAVE"
ORDEN = New SqlDataAdapter(q, CANAL)
ORDEN.SelectCommand.Parameters.Add(New SqlParameter("@CLAVE", SqlDbType.SmallInt))
ORDEN.SelectCommand.Parameters("@CLAVE").Value = CLAVE.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()
' cargando el objeto IMAGE con el valor que se tiene en el campo foto de la tabla
Image1.ImageUrl = TABLA.Tables("mitabla").Rows(0)(4).ToString()
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;<asp:Label ID="Label1" runat="server" Text="CLAVE A BUSCAR"></asp:Label>&nbsp;&nbsp;<asp:TextBox
ID="CLAVE" runat="server" Width="54px"></asp:TextBox>
<asp:Button ID="Button1" runat="server" OnClick="Button1_Click" Text="BUSCAR" /><br />
<br />
<asp:GridView ID="GRID" runat="server">
</asp:GridView>
<asp:Image ID="Image1" runat="server" />&nbsp;<br />
</form>
</body>
</html>

Corrida:

image489.jpg

PROYECTO PROGRAMACION VISUAL WEB DEVELOPER Visual Basic 2005 CONSTRUIR UN SISTEMA COMPLETO INTEGRADO CON TODAS LAS OPERACIONES USANDO AL MENOS UNA TABLA EN MS SQL SERVER 2000.

POR ULTIMO RECORDAR QUE EL COMPONENTE GRIDVIEW ASI COMO VARIOS MAS SON LOS CONTROLES QUE MAS HA SIDO MODIFICADO Y ACTUALIZADO POR MICROSOFT, ENTRE SUS PRINCIPALES CAMBIOS ES LA CANTIDAD INCREIBLE DE EVENTOS QUE PUEDE DETECTAR Y DE HECHO MUCHOS DE LOS PROCESOS QUE SE ESTUDIARON EN ESTA UNIDAD SE PODRIAN FACILITAR MUCHO SI SE USARAN LOS EVENTOS DE VIEWGRID, SIN EMBARGO POR RAZONES PEDAGOGICAS SE SELECCIONO EL MODELO SEGUIDO EN LA UNIDAD, SIN EMBARGO EN LA PROXIMA ACTUALIZACION DE ESTE LIBRO SE ANALIZARAN Y ESTUDIARAN TODOS ESTOS NUEVOS CONCEPTOS.

tan tan el curso se acabo y esten pendiente de los proximos de perl, visual basic 2005, javascript, php, phyton, xml, et al

Politica de Privacidad