Ver Mensaje Individual
  #15 (permalink)  
Antiguo 14/07/2008, 07:38
Sonda
 
Fecha de Ingreso: marzo-2008
Mensajes: 82
Antigüedad: 17 años, 1 mes
Puntos: 0
Respuesta: Adjuntar Imagen y enviar por mail con Cdo

Este el código de consulta a la base que hago

dim s
ruta="./images.mdb"


Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(ruta)
Set rs= Server.CreateObject("ADODB.Recordset")

s = "SELECT Images from Pro"

rs.Open s, oConn