UNIDAD 5: VISUAL BASIC INTRODUCION A LAS BASES DE DATOS

TEMA 12: BAJA ELIMINACION DELETE VISUAL BASIC CGI

La instruccion sql a usar es: DELETE FROM TABLA WHERE CONDICION

Prog23.html

<HTML>
<FORM ACTION=/cgi-bin/tusitio/prog23.exe METHOD=get>
CLAVE ANIMALITO A ELIMINAR:<INPUT TYPE=text NAME=CLAVE><BR>
<INPUT TYPE=submit VALUE=ELIMINAR>
</FORM></HTML>

prog23.vb

Imports System
Imports System.Data
Imports System.Data.OleDb
Imports Microsoft.VisualBasic
PUBLIC CLASS prog23
' creando y cargando coneccion, adpater, dataset como variables globales
SHARED DIM coneccion AS OLEDBCONNECTION
SHARED DIM canal AS OLEDBDATAADAPTER
SHARED DIM tabla AS DATASET
SHARED DIM orden AS OLEDBCOMMAND
PUBLIC SHARED SUB MAIN()
' variables a usar
dim q, clave as string
' enlazando coneccion a la base de datos
coneccion = NEW OLEDBCONNECTION("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\progfacil\tusitio\mibase.mdb")
'capturando clave a buscar
DIM capturar AS lnet = new lnet()
'clave se captura como string porque se usa mas adelante un oledbtype
'para conertirla y mandarla
clave = capturar.getparametro("CLAVE")
' instruccion sql DELETE FROM TABLA WHERE CLAVE=DATO
q = "delete from mitabla where [email protected]"
orden = new OleDbCommand(q, coneccion)
orden.Parameters.Add(new OleDbParameter("@CLAVE", OleDbType.Integer))
orden.Parameters("@CLAVE").Value = clave
orden.Connection.Open()
orden.ExecuteNonQuery()
orden.Connection.Close()
' avisando que ya se termino
System.Console.WriteLine("Content-Type:text/html" & vbCrLf)
System.Console.WriteLine("ANIMALITO ELIMINADO USAR PROG18 PARA DESPLEGAR")
' o mejor aun construir aqui, EN y UNA forma dinamica el prog18.HTML
' cerrando todo
coneccion.Close()
END SUB
END CLASS

OBSERVAR QUE NO SE OCUPO NI ADAPTER NI DATASET, SOLO UN COMMAND DIRECTO A LA CONECCION O BASE DE DATOS, es decir es valido mandar instrucciones sql directo a una base de datos, interesante verdad?

Corridas :

Prog18 ← tabla original

image392.jpg

prog23.html

image393.jpg

prog23.vb o exe

image394.jpg

prog18.exe ← como queda ahora la tabla

image395.jpg

bye, bye pobre burrito

TAREAS PROGRAMACION VISUAL BASIC CGI

1.- construir este proceso para las tablas y bases de datos que tengan construidas.

Politica de Privacidad