Anteprima documento

[ISE]

Ragazzi ho realizzato una sezione tutta in asp dove l'amministratore del sito inserisce manualmete news ed altro ed inoltre upload i file.
Vorrie fare in modo che vicino alla news si veda l'anteprima in miniatura del file caricato.

Io ho inserito:

 
<td width="100" rowspan="3">" target="_blank">[img]<%=rs([/img]" border="0" width="100" height="100"></td>

Ma mi fa vedere solo le immagini, se io volessi far vedere per esempio le miniature di pdf o doc?
Come posso fare?

[Mems]

La miniatura del file DOC caricato via upload?

[Gioba66]

al massimo puoi vedere una icona, non certo l'anteprima del doc o del pdf

[ISE]

Come faccio?
Anche perchè non so se caricano pdf, doc o jpg...dovrei inserir eun controllo?

[Mems]

Ti prepari delle immagini rappresentanti i file doc, pdf, etc.
Ad esempio: doc.gif, pdf..gif, etc.
Poi leggi l'estenzione del file e lo metti come nome del file immagine da caricare.

<%
file = "pippo.doc"
ext = right(file,3)
%>
[img]<%=ext%>.gif[/img]

[ISE]

Scusa ma non ho capito...

Il mio codice dice che:

<td width="100" rowspan="3">" target="_blank">[img]<%=rs([/img]" border="0" width="100" height="100"></td>

Dove BLOB è il nome del campo che mi permette di fare lo sfoglia e uplodare il file...

Al posto di:

[img]<%=rs([/img]" border="0" width="100" height="100">

inserisco:

[img]<%=ext[/img].gif" border="0">

[ISE]

Please...aiuto!!!

[Gioba66]

nel db, oltre al campo "blob" metti un campo "nomefile" nel quale, doipo upload, ci metti il nomefile.

poi usi il codice di mems per visualizzare una immagine con il tipo di doc.

[ISE]

Originariamente inviato da Gioba66
nel db, oltre al campo "blob" metti un campo "nomefile" nel quale, doipo upload, ci metti il nomefile.

poi usi il codice di mems per visualizzare una immagine con il tipo di doc.

COme faccio a recuperare solo il nome del file?

Nella pagina io ho questo:

<% 
Dim oUpload 
Set oUpload = new cUpload
oUpload.SetPath "/public/" 
oUpload.Load
oUpload.Save

Set Con = Server.CreateObject( "ADODB.Connection" )
Con.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&SERVER.MAPPATH("/mdb-database/gruppiSicilia.mdb")

Set objrs = Server.CreateObject("ADODB.Recordset") 
objrs.open "SELECT * FROM TabellaGruppi",Con,3,3

objrs.addnew

objrs("titoloGruppi") = oUpload.Form("titoloGruppi")
objrs("descrizioneGruppi") = oUpload.Form("descrizioneGruppi")
objrs("blob") = oUpload.GetHTTPPathFile()

objRS.Update 

Set oUpload=Nothing 
objRS.Close 
Set objRS = Nothing 
Con.Close 
Set Con = Nothing 

Response.Redirect "home_gruppi.asp"

%>

[ISE]

Originariamente inviato da Mems
Ti prepari delle immagini rappresentanti i file doc, pdf, etc.
Ad esempio: doc.gif, pdf..gif, etc.
Poi leggi l'estenzione del file e lo metti come nome del file immagine da caricare.

<%
file = "pippo.doc"
ext = right(file,3)
%>
[img]<%=ext%>.gif[/img]

Il campo BLOB già salva il nome del file...
Quindi se io mettessi

<%
Set Con = Server.CreateObject( "ADODB.Connection" )
Con.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&SERVER.MAPPATH("/mdb-database/gruppiSicilia.mdb")

sql = "SELECT * FROM TabellaGruppi"
set rs = con.execute(sql)

estensione = "=rs('blob')"
ext = right(estensione,3)

%>

E poi inserissi:

<%
   if not rs.eof then
   do until rs.eof
%>   

<%
   if estensione = "pdf" then%>
   [img]gfx/pdf.gif[/img]
   <%elseif estensione = "jpg" then%>
   [img]gfx/jpg.gif[/img] 
   <%elseif estensione = "doc" then%>
   [img]gfx/doc.gif[/img]
%>
<tr>
<td width="100" rowspan="3">" target="_blank">[img]<%=rs([/img].gif" border="0"></td>
<%
   end if
 %>
<td width="50" rowspan="3">[img]../gfx/trasp1px.gif[/img]</td>
<td class="ContenutiROSSO"><div align="center"><%=rs("titoloGruppi")%></div></td>
</tr>
<tr>
<td>[img]../gfx/trasp1px.gif[/img]</td>
</tr>
<tr>
<td class="ContenutiBLU"><div align="left"><%=rs("descrizioneGruppi")%></div></td>
</tr>
<tr>
<td colspan="3">[img]../gfx/trasp1px.gif[/img]</td>
</tr>
<%
   rs.moveNext
   loop
   end if
   rs.close
   set rs = nothing
   con.close
   set con = nothing
%>

Potrebbe andare?