
Hola a todos, en esta ocasión vamos a aprender cómo crear clases en ASP.
Este ejemplo se basa en una clase que tiene
algunas de las sentencias comunes de SQL para conexión a base de datos, esta clase es de mucha utilidad ya que te ahorra código fuente y optimiza tu
aplicación.
Creación de una clase en ASP
Las clases en ASP se declaran de la siguiente
forma:
<%
Class nombre_de_tu_clase
End Class
%>
Como se mostro anteriormente pudimos ver que consta de dos sentencias principales la de Class y End Class, esta ultima delimita el fin de la clase, ya que tenemos este primer código procederemos a guardarla con cualquier nombre ejemplo recordset.asp
Incluyendo una clase en ASP
Ahora tenemos que incluir este código en el archivo donde la queremos utilizar para esto se requiere una sentencia que se describe a continuación.
<html>
<head>
<title> Titulo de tu pagina</title>
</head>
<!--#include file="recordset.asp"-->
<body>
<%
'Asigancion de clases
set Record = new Activerecord
%>
</body>
</html>
La línea de en negritas muestra como se incluye un archivo en este caso es el nombre de nuestro archivo donde se encuentra la clase que creamos, para asignar la clase se hace con set nombre = new nombre_de_tu_clase, ahora guardaremos este archivo con el nombre que deseen ejemplo: prueba.asp
Trabajando en la clase
Ahora si teniendo estos dos archivos podremos trabajar en la clase, en este ejemplo primero aremos la conexión a la base de datos mediante un método de la siguiente manera:
'Conectar a Base de datos
Public sub DB_Conect()
conn_string = "Driver={MySQL ODBC 5.1 Driver};Server="&DB_Server&";Port=3306;Database="&DB_Name&";Uid="&DB_User&";Pwd="&DB_Pass
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open (conn_string)
end sub
Este código es solo para la conexión a la base de datos las variables que se utilizan son: DB_Server = servidor donde se encuentra la base de datos, DB_Name = nombre de la base de datos, DB_User = nombre del usuario en la base de datos, DB_Pass = password de la base de datos. Este código se incluye en la clase y lo podemos mandar a llamar en nuestro archivo donde incluimos la clase como call nombre.DB_Conect en este caso será call Record.DB_Conect.
Nota: la base de datos de este ejemplo de conexión, tendrá que ser de MySQL, si hay problemas con la conexión ver el tutorial para conexión con MySQL y ASP.
Así tendremos que ir agregando los métodos que necesitaremos, ahora veremos el código de seleccionar registros con diferentes opciones.
'Selecccionar por tabla
Public sub
FindBy(table)
strSQL = "SELECT * FROM "&table
set objRS = conn.execute (strSQL)
end
sub
'Por ID y tabla
Public sub
FindID(table,ID)
strSQL= "SELECT ID FROM "&table&" Where ID = "&ID
set objRS = conn.execute(strSQL)
end sub
'Buscar el ultimo
Public sub FindLast(table)
strSQL= "SELECT * FROM "&table&" ORDER BY ID DESC LIMIT 1"
set objRS = conn.execute(strSQL)
end sub
En estos métodos el primero es para seleccionar todos los registros de una tabla, cuya tabla es un parámetro que lo mandamos desde
nuestra página donde está incluida la clase ejemplo: call Record.FindBy(MilkZoft_Usuarios), “MilkZoft_Usuarios” es el nombre de la tabla donde se
quiere hacer la consulta.
El siguiente método es para hacer una consulta por ID, donde los parámetros a pasar son la tabla y el ID que queremos buscar, se manda a llamar de la siguiente manera: call Record.FindID(MilkZoft_Usuarios,5), donde igualmente “MilkZoft_Usuarios” es el nombre de la tablay “5” es el ID que se desea buscar.
El siguiente método es para hacer una consultad de el último registro insertado, donde los parámetros a pasar son la tabla donde queremos buscar ese último registro, se manda a llamar de la siguiente manera: call Record.FindLast(MilkZoft_Usuarios), donde igualmente “MilkZoft_Usuarios” es el nombre de la tabla.
Este pequeño ejemplo es una forma de implementar clases, si requieren ser una
clase más compleja solo se necesita analizar adecuadamente los datos a manejar para poder ser eficaz y que nos ahorre tiempo y líneas de código.
Pues hasta aquí llega este tutorial de clases en ASP, para cualquier duda o pregunta nos pueden visitar en la página http://www.milkzoft.com o en los correos carlos.hugo@milkzoft.com o contacto@milkzoft.com, espero y les haya sido de gran utilidad este tutorial.

Atentamente

NOTA: Este tutorial fue creado por Carlos Hugo González Castell para MilkZoft, si deseas tomar total o parcialmente el contenido publicado te pedimos nos envíes un mensaje utilizando el formulario de contacto y agregando un enlace a MilkZoft como fuente de los datos (puedes insertar el siguiente código en tu blog o página web).
Fuente: MilkZoft
Descarga el tutorial en formato PDF
Comentarios

Hola biorens
Muchas gracias por tu comentario y sin duda tienes razon creo que el titulo del tutorial deberia de ser deiferente, pero en el siguiente tutorial tratare de explicarlo
Encuesta de la semana:
¿Prestas atención a la publicidad en Internet?