27/01/2009, 09:51
|
| | | Fecha de Ingreso: noviembre-2008
Mensajes: 20
Antigüedad: 16 años, 4 meses Puntos: 0 | |
| Respuesta: Insertar Imagen en DB
Ok.
He probado con:
Set Upload = Server.CreateObject("Persits.Upload")
' Limitar tamaño
Upload.SetMaxSize 52428800, True
' Protección por si no envía nada
Upload.IgnoreNoPost=True
set fichero = Upload.form("upfichero")
codprod = Upload.form("producto")
' Obtener el objeto
Set File = Upload.Files(fichero)
Set rs = Server.CreateObject("adodb.recordset")
sql = "select * from articulos where codarticulo='"& codprod &"'"
rs.Open sql, conn, 2, 3
rs.Close
response.Write(sql)
' Reabrimos recordset para subir archivo
rs.Open "articulos", conn, 2, 3
rs.AddNew
rs("foto") = File.Binary
rs.Update
Pero tengo que poner enctype="multipart/form-data" en el form y ahora no me recoge los valores que rescato del formulario mediante:
set fichero = Upload.form("upfichero")
codprod = Upload.form("producto")
Por favor que hago mal? |