Upload immagini su db

[dany144]

Salve a tutti sto realizzando una paginetta per inserire dati in un db, ora fino a quando si tratta ti testo è tutto ok, ma quando devo inserire una immagini non sò come fare, come devo modificare il mio codice?

questa è la parte che aggiunge un nuovo record:

<%
titolo=request.form("titolo")
descrizione=request.form("descrizione")
Set OBJdbConnection = Server.CreateObject("ADODB.Connection")
OBJdbConnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&server.mappath("db.mdb")
Set rs=Server.CreateObject("ADODB.Recordset")
rs.Open "macchine",OBJdbConnection,3,3
rs.AddNew
rs("titolo")=titolo
rs("descrizione")=descrizione
rs.update
rs.Close
OBJdbConnection.Close
%>

e questa è la form:

<form method=post action="add.asp">
<table border=1>
<tr><td align=center>TITOLO</td>
</tr>
<tr>
<td><textarea name="titolo" cols="80" rows="3"></textarea></td>
</tr
<tr><td align=center>DESCRIZIONE</td>
</tr>
<tr>
<td><textarea name="descrizione" cols="80" rows="10"></textarea></td>
</tr>
</tr>
<tr>
<td>
<center>
FOTO: <input type="file" name="blob">
</center>
</td>
</tr>
</table>

<input type=hidden name="pass" value="ok">
<input type=submit name="ok" value="Aggiungi">
</form>

[robbe2000]

inanzi tutto nel form devi scrivere questa dicitura <form ENCTYPE="multipart/form-data" method=post action="add.asp">

poi per quanto riguarda la pagina seguente devi usare un programma di upload :

io solitamente uso dundas però puoi usare benissimo quello che si trova già nel server. La sintassi cambia ma di poco

Dim ObjUpload
Set ObjUpload = Server.CreateObject("Dundas.Upload.2")
ObjUpload.save percorso dove devi inserire momentaneamente l'immagine
Dim ObjUploadFile

Poi modificando il form l'oggetto request non funziona più quindi devi usare l'oggetto dell'upload :


titolo=ObjUpload.form("titolo")
descrizione=ObjUpload.form("descrizione")
Set OBJdbConnection = Server.CreateObject("ADODB.Connection")
OBJdbConnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&server.mappath("db.mdb")
Set rs=Server.CreateObject("ADODB.Recordset")
rs.Open "macchine",OBJdbConnection,3,3
rs.AddNew
rs("titolo")=titolo
rs("descrizione")=descrizione
rs.update
rs.Close
OBJdbConnection.Close


e per finire cosa vuoi farne dell'immagine? scrivere solo il link nel db oppure salvarla direttamente? :

[dany144]

ma così facendo posso anche salvarla sul database?

[robbe2000]

sinceramente non lo so io solitamente per non appensantire troppo il db la metto in una cartella apposita e nella tabella scrivo solo il percorso che mi interessa. Comunque so che c'è un modo per inserire immagini nel db prova ad aiutarti con l'help di access.