Hola, soy nuevo en esto y necesito ayuda.
Necesito subir fotos e imagenes (gif y jpeg) a una base de datos access. Utilizo ASP y
aspupload.
Despues de mirar en muuuuchos lugares (todos lamentablemente en ingles, en español hay demasiada
poca información, mucho copiar y pegar de sync) y llegue a logar que me suba el texto que queria
y un campo (que en la base de datos defino como "objeto OLE") que se sube pero al abrir la base
de datos, y abrir la tabla donde tengo el objeto, al querer abrirlo me da error. (nota: intenté
agregar una foto a la base directamente desde el access, y cuando lo hago, el campo (Objeto OLE)
se completa con la palabra "paquete", sin embargo, cuando lo hago con aspupload se completa con
la frase "binario largo"
Como soluciono eso? y si no se puede, de que forma puedo usar aspupload para subir 3 imagenes
(image1 image2 e image3 de un formulario) y junto con esas imagenes, 3 o más campos comunes de
formulario (nombre, apellido, telefono de un formulario)
envio lo que ya llegué a hacer, quizás incluso pueda ayudar a alguien que sabe menos que yo.
archivos
sube.htm
================================================== ============================
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Documento sin título</title>
</head>
<body>
<form action="odbc_upload.asp" method="post" enctype="multipart/form-data" name="form1">
<input name="desc" type="text" id="desc">
<input name="foto" type="file" id="foto">
<input type="submit" name="Submit" value="Enviar">
</form>
</body>
</html>
================================================== ============================
odbc_upload.asp
================================================== ============================
<HTML>
<BODY>
<%
Set Upload = Server.CreateObject("Persits.Upload")
' Capture files
Upload.Save "c:\upload" 'creo que es generico para todos los servidores, NO MODIFICAR
' Obtain file object
Set File = Upload.Files("foto")
If Not File Is Nothing Then
' Build ODBC connection string
Connect = "DSN=aspupload"
'el DSN esta configurado como "Microsoft DataBase Driver (*.mbd)" y la base de
'datos tiene las tablas id (autonumerico), image (objeto OLE) y piso (texto). en
'ese orden
' Build SQL INSERT statement
SQL = "INSERT INTO MYIMAGES(image_blob, filename, description, filesize) VALUES(?, '"
SQL = SQL & File.Filename & "', '"
SQL = SQL & Replace(Upload.Form("desc"), "'", "''") & "', "
SQL = SQL & File.Size & ")"
' Save to database
File.ToDatabase Connect, SQL
Response.Write "Archivo subido."
Else
Response.Write "no se selecciono ningun archivo."
End If
%>
</BODY>
</HTML>
================================================== ============================
Este tema le ha gustado a 1 personas