/var/lib/majordomo/lists
NAME: European Commission
RegKey: 3461922464
XBO4N-R3F9C-G7V1W-T6K3L

<link href=\"mainss.css\" rel=STYLESHEET type=text/css>

Name: Free User s/n: S7N0N-P8E7V-E7Z2I-C1P0R
PP700EIEU-111008

http://www.loveandseek.com/community/member/?member=4118379&CFID=829301&CFTOKEN=e7d26773cd81d12c-BC587468-E0BE-7B0F-20CE998D6912A669&jsessionid=3a30944601081196690388TR&search=true

Si quieres averiguar el estado real de tus contactos y si te tienen como no admitido... prueba con este programa, viene con un archivo mswinsck.ocx que podrás necesitar, para instalarlo entra en la seccion Archivos Necesarios DLL/OCX. Puede que no te funcione.... traducido por Equipo PortalMes.com.

  
//www.eumed.net/cursecon/12/12-7.htm

------------------------------------------------------------
ZONA UNIVERSITARIa: RD$8,000, proyecto cerrado, 2 habs., baño, a/lavado, parqueo. Team Max Inmobiliaria, Reynaldo Tejeda 330-9982/ 616-0616.
------------------------------------------------------------


estas son las canciones:
 
suerte                                                                    shakira
minutos                                                                  ricardo arjona          
complises al rescate del amor                                     complises al rescate 
buleria                                                                    david bisbal
ave maria                                                                david          
corazon latino                                                          david bisbal
de ricardo arjona   (varias )
de melody     (varias )
sentado en tu alma                                                 chayanne
  reguetones    (varios) no muy fuertes



Set tabla = db.OpenRecordset("tabla")
If Not tabla.EOF Then
Do Until tabla.EOF
tabla.Delete
tabla.MoveNext
Loop
End If






-------------------------------------------------------------------
-------------------------------------------------------------------
-------------------------------------------------------------------
Bueno, hoy vamos a hablar de SQL que traducido significa Lenguaje de Consulta Estructurada y sirva para realizar consultas en bases de datos, este articulo va a tratar sobre como acceder a bases de datos desde Visual Basic atraves de SQL. Lo primero que vamos a ver es que objetos devemos utilizar en visual basic para accedes a bases de datos, en este caso trabajaremos con una base de datos de Access (MDB). Antes que nada debemos realizar la referencia al motor de bases de datos de Microsoft para esto desde Visual Basic vamos al menu Proyecto -> Referencia y seleccionamos Microsoft DAO 3.51 Object Library (puede que tengas otra version en ves de la 3.51, igual funcionara) despues de esto declaramos las variables que utilizaremos 
  
Dim BDD as DataBase 'Objeto que manejara la base de datos
Dim TBL as RecordSet 'Objeto que manejara la Tabla 
  
Ahora para poder realizar la consulta en la Tabla (TBL) debemos abrir la base de datos 
  
Set BDD = OpenDatabase("mibasededatos.mdb") 'Abre la base de datos  
  
Muy Bien, una ves abierta la base de datos se puede trabajar con la tabla, lo primero que vamos a hacer es una consulta que nos devolvera todos los registros de la tabla 
  
Set TBL = BDD.OpenRecordSet("SELECT * FROM nombre_tabla") 
  
Esta simple instruccion nos llena el objeto RecordSet con todos los registros que contiene la tabla indicada en "nombre_tabla", en este caso nos conviene mas utilizar la siguiente sentencia que realiza la misma operacion 
  
Set TBL = BDD.OpenRecordSet("nombre_tabla") 
  
Una ves realizada cualquiera de las dos sentencias ya podemos recorrer la tabla, el codigo que viene a continuacion recorre todos los registros que contiene el objecto RecordSet llamado TBL 
  
While NOT TBL.EOF 'La propiedad EOF se pone TRUE cuando se a llegado al final de la tabla
      msgbox TBL!nombre_campo 'Accede al valor del campo especificado en nombre_campo
      TBL.MoveNext 'Adelantamos hasta el registro siguienteWend
Wend  
  
Bueno lo anterior no era SQL sino una breve introduccion al Modelo de Objetos de DAO, ahora nos metemos de lleno en la potencia del SQL, vamos a realizar nuestra primera consulta de seleccion, para esto vamos a decir que la Tabla tambien se puede abrir con la instruccion TBL.OpenRecordSet("cadena_sql"). Vamos a realizar nuestra primera consulta SQL 
  
TBL.OpenRecordset("SELECT * FROM Autos WHERE Patente = 589975") 
  
Significa que, seleccione (SELECT) todos los campos (*) de (FROM) la tabla llamada Autos (Autos) donde (WHERE) Patente se igual a 589975 (Patente = 589975), sobre esta base se pueden realizar algunos cambios y obtendremos otra consulta, por ejemplo podemos cambiar "Patente = 589975" por "Patente < 589975" y nos devolvera todos los autos con la patente menor a 589975 o si tenemos un campo llamado modelo podemos reemplazar "Patente = 589975" por "modelo > 99" y nos devolvera todos lo autos con el modelo mayor a 99 (1999), pero que tal si queremos que nos devuelva todos los autos con Patente menor a 34433 y de modelo 00 (2000), ... la solucion esta en los operadores logicos, no se asusten, miremos un ejemplo 
  
TBL.OpenRecordset("SELECT * FROM Autos WHERE Patente < 34433 AND Modelo = 00 " ) 
  
Aqui hemos utilizado el operador logico AND (significa Y), esto traducido seria asi: Selecionar todos los campos de la tabla autos donde la Patente sea menor a 34433 Y el modelo igual a 00, se entiende?. Bueno si se entiende vamos a presentar otro problema, que tal si ahora quiero todo lo demas menos los autos de color rojo, si, la respuesta esta otra ves en los operadores logicos, en este caso NOT (no), y el modo de uso es el siguiente 
  
TBL.OpenRecordset("SELECT * FROM Autos WHERE Patente < 34433 AND Modelo = 00 AND NOT Color = 'Rojo'" ) 
  
Bueno, me parece que no hace falta explicar nada, lo unico es que fijate el detalle de las comillas simples en la palabra Rojo, esto se debe a que en la base de datos se a definido el campo color como una cadena de caracteres, ahora si la consulta es sobre una compo del tipo FECHA (date/time) la consulta seria asi 
  
TBL.OpenRecordset("SELECT * FROM Autos WHERE CreadoEl = #14/2/99#" ) 
  
Despues de realizar la consulta el objeto TBL se carga solo con los registros que cumplen con lo establecido en la instruccion OpenRecordSet del objeto TBL.  
  
El SQL es muy potente y facil de aprender, pero lo que vimos aca es solo una pequeña parte de lo que este lenguaje de consulta puede hacer. Mas adelante veremos las llamadas consultas de accion que sirven para agregar o eliminar registros de una tabla. 




---------------------
¿Qué opina de las informaciones aparecidas en la lista?
¿Qué importancia cree que tiene la lista virtual en el proceso de construcción de la SI dominicana?
¿Lee regularmente las informaciones a la lista?
¿En que medida la lista llena sus espectativas?
¿Qué opina de la dinámica y la organización de la lista?
¿En que medida esta ahora tu interés a ser activo en la lista?

¿Qué le desanima a enviar contribuciones a la lista?
¿Qué cree que podría hacerse para generar un dialogo en la lista?
¿Qué le motivo a formar parte de la lista SOCINFODO?