UNIDAD 5: VISUAL BASIC NET BASES DE DATOS

TEMA 14: GRAFICOS SQL SELECT

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 en microsoft access 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 imageurl(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 fotourl o foto a la tabla en microsoft access 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 net imageurl 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.

Prog32.aspx

<%@ PAGE LANGUAGE=VB %>
<%@ Import Namespace="System" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<FORM RUNAT=SERVER>
CLAVE A BUSCAR<ASP:TEXTBOX ID=CLAVE SIZE=3 RUNAT=SERVER/>
<ASP:BUTTON ONCLICK=BUSCAR TEXT=BUSCAR RUNAT=SERVER /><BR>
<ASP:IMAGE ID=FOTO IMAGEURL=" " RUNAT=SERVER/>
<ASP:DATAGRID ID=TABLAGRID RUNAT=SERVER
Width=400
BackColor=#ccccff
BorderColor=black
ShowFooter=false
CellPadding=3
CellSpacing=0
Font-Name=Verdana
Font-Size=8pt
HeaderStyle-BackColor=#aaaadd
EnableViewState=false
/>
</FORM>
<html>
<script runat=server>
'creando y cargando la coneccion a la base de datos variable global
DIM coneccion AS OleDbConnection=new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\progfacil\tusitio\mibase.mdb")
SUB BUSCAR (Sender As Object,E as EventArgs)
DIM q AS String
q = "select * from mitabla where clave = @CLAVE"
DIM canal as OleDbDataAdapter = new OleDbDataAdapter(q, coneccion)
canal.SelectCommand.Parameters.Add(new OleDbParameter("@CLAVE", OleDbType.Integer))
canal.SelectCommand.Parameters("@CLAVE").Value = CLAVE.Text
DIM tabla as DataSet = new DataSet()
canal.Fill(tabla, "mitabla")
TABLAGRID.DataSource=tabla
TABLAGRID.DataMember="mitabla"
TABLAGRID.DataBind()
'cargando el objeto imageurl
FOTO.ImageUrl=tabla.Tables("mitabla").Rows(0)(3).ToString()
END SUB
</script>

corrida: prog32.aspx

image361.jpg

Recordar que para que no salga el campo fotourl en el datagrid el select de sql puede pedirse como select campo1, campo2, campo.. from mitabla etcetera.

Y el objeto IMAGE de visual basic net tiene muchas propiedades usenlas.

PROYECTO CONSTRUIR UN SISTEMA INFORMACION CONTABLE ADMINISTRATIVO O FINANCIERO COMPLETO INTEGRADO CON TODAS LAS OPERACIONES SQL USANDO AL MENOS DOS TABLAS USANDO PROGRAMACION VISUAL BASIC NET .

tan tan el curso se acabo y esten pendiente de los proximos de sql mysql perl php perlscript javascript jscript xml c# net et al

Politica de Privacidad