Primero, antes de entrar en el tema sustantivo y explicar cómo construir una clase, quiero asegurarme de que conozca el "objeto". Si bien puede usar objetos en su programa sin conocer las reglas correctas, ¡no recomiendo esto! Para los principiantes del objeto, la siguiente sección le dará una idea de su concepto y contenido. Los lectores que ya han aprendido sobre la programación orientada a objetos (OOP) pueden omitir este capítulo.
introducción
l "¿Qué es un objeto?" - Los objetos generalmente representan algún tipo de entidad, principalmente una colección de variables y funciones.
L "¿Qué es una entidad?" - Literalmente, una entidad es una "cosa", y me refiero a un concepto o cualquier objeto. Por ejemplo, un automóvil es una entidad porque es un objeto. Los productos vendidos por el departamento de ventas de su empresa también son una entidad. Por supuesto, también puedes desarmarlos. El personal de ventas, los clientes, los productos, etc. son todas las entidades.
Echemos un vistazo más de cerca a la entidad (objeto) de "venta". Para hacer que tenga una "imagen" de ventas con mayor precisión, debe saber qué compró el cliente, qué cliente es, quién es el vendedor, etc. Este parece ser un evento simple, pero suponiendo que toda la información se almacena en una tabla de base de datos separada, luego, cuando necesita obtener toda la información relevante de un proceso de ventas, debe hacer múltiples preguntas independientes en su base de datos separada y luego reunir todos los datos. ¿Existe una forma más fácil de obtener toda la información sobre la venta a la vez? "Objeto".
En un objeto, puede implantar código para obtener datos de otras tablas, y también puede guardar toda la información sobre las propiedades del objeto, para que pueda administrar fácilmente sus datos de ventas utilizando el código. Por ejemplo:
'' '' '' '' OpentiledAdatabaseconnection
Setobjconn = server.createObject ("ADODB.Connection")
objconn.open "Mydsn"
'' '' '' '' '' '' CreatEterCordSetObject
Setobjrs = server.createObject ("ADODB.Recordset")
'' '' '' '' '' '' Definirse
strComplexSQLQuery = "selectc.name, s.nameFromCustomersc," & _
"Vendedores, salesslwheresl.customerid = C.idand" & _
"Sl.saleSpersonid = s.idandsl.id =" & stridofthissale & ";"
'' '' '' '' 'OpenThereCordSetset
objrs.OpenstrComplexSqlQuery, Objconn, Adopthorwardonly, _
adlockreadonly, adcmdtext
'' '' '' '' '' 'TakethecustomerandsalepersernamesFromThereCordSetset
strcustomername = objrs (0)
strsaleSpersonName = objrs (1)
'' '' '' '' '' 'Ordena los oobjetos
objrs.clar
objconn.close
Setobjrs = nada
Setobjconn = nada
'' '' '' '' '' '' 'Última
Respuesta
"To" & strcustomername
Puede usar "objeto" en su lugar:
'' '' '' '' '' 'Create "Venta" Objeto
Setobjsale = newsale