Inserimento immagine dal database

**tres-joli** · 14-03-2006, 18:06

ehm....non so dove metterlo! sorry

**maximum** · 14-03-2006, 18:21

Nota la modifica in grassetto:

codice:

<% 

%> 
<html> 
<head> 
<title>LISTA NEWS</title> 
<link rel="stylesheet" href="setting.css" type="text/css"> 
</head> 
<body> 
<p align="center"><font face="Verdana" color="#0000FF">LISTA DELLE NEWS</font></p> 
<p align="center"> 
<% 
dim cns 
set cns = server.createobject("ADODB.Connection") 
cns.open "DRIVER={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/mdb-database/prova.mdb") 

dim rsnews, sqlnewws 
set rsnews = server.createobject("ADODB.RecordSet") 
sqlnewws = "SELECT * FROM news ORDER BY data2 DESC" 
rsnews.open sqlnewws, cns, 3, 3 

if rsnews.eof then 
%> 


</p> 
<p align="center"><font size="2" face="Verdana">SPIACENTE, Nessuna News per il Momento!!!</font> 
<% 
else 

do while not rsnews.eof 
%> 

 
<table width="600" border="0" align="center" cellpadding="0" cellspacing="0"> 
<tr> 
<td> </td> 
<td> </td> 
</tr> 
<tr> 
<td>Rilasciata il:</td> 
<td> </td> 
</tr> 
<tr> 
<td><font size="2"> 
<% = rsnews("data") %> 
</font></td> 
<td> </td> 
</tr> 
<tr> 
<td><font face="verdana" size="2"> 
<% = rsnews("titolo") %> 
</font></td> 
<td> </td> 
</tr> 
<tr> 
<td><font face="verdana" size="2"> 
<% = rsnews("testo") %> 
</font></td> 
<td> </td> 
</tr> 
<tr> 
<td><font face="verdana" size="2">
  
  <% if rsnews("foto1") <> "" and Not IsNull(rsnews("foto1")) then %>
    [img]<%=rsnews([/img]"> 
  <% else %>
    [img]no_foto.jpg[/img]     
  <% end if %>
  
</font></td>
</tr> 
</table> 

</center> 
</div> 

<% 
if session("login") = "Admin" then 
%> 
<font face="verdana" size="1"> 
[/i]</font></td> 
<td> </td> 
</tr> 
<tr> 
<td> </td> 
<td> </td> 
</tr> 
<tr> 
<td>">CANCELLA              ">MODIFICA </td> 
<td> </td> 
</tr> 
</table> 
<tr> 
<td rowspan="3" width="28%" valign="top"> 

<font size="1" face="Verdana">
<font size="2"> </font> 
</td> 
<td width="72%"> 
<font face="verdana" size="2">  
</font> 
</td> 
</tr> 
<tr> 
<td style="padding-bottom: 6"><font face="verdana" size="2"> 
</font></td> 
</tr> 
<tr> 
<td width="72%" style="padding-bottom: 6">
 
[/b]</font> 
<% 
end if 
%><% 
rsnews.movenext 
loop 

end if 
%> 
</body> 
</html>

**tres-joli** · 14-03-2006, 19:01

esce fuori la no_foto.jpg enorme senza cliccare nulla!
ti ho evidenziato in grassetto le modifiche che ho apportato per le foto.

</head>
<body>
<p align="center">
<%
dim cns
set cns = server.createobject("ADODB.Connection")
cns.open "DRIVER={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/mdb-database/vendita_trilocali.mdb")

dim rsnews, sqlnewws
set rsnews = server.createobject("ADODB.RecordSet")
sqlnewws = "SELECT * FROM news ORDER BY data2 DESC"
rsnews.open sqlnewws, cns, 3, 3

if rsnews.eof then
%>

</p>
<p align="center"><font size="2" face="Verdana"> Nessun immobile al momento</font>
<%
else

do while not rsnews.eof
%>

<table width="550" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="110" height="20" valign="top"><span class="Stile4"><font face="verdana">Località:</font></span></td>
<td width="490" valign="top" class="Stile2"><font face="verdana" size="2">
<% = rsnews("titolo") %>
</font></td>
</tr>
<tr>
<td height="20" valign="top" class="Stile5">Descrizione:</td>
<td valign="top" class="Stile2"><font face="verdana" size="2">
<% = rsnews("testo") %>
</font></td>
</tr>
<tr>
<td colspan="2"></td>
</tr>
<tr>
<td valign="top">
<span class="Stile5"><font face="verdana">Immagini:</font></span></td>
<td><font face="verdana" size="2">[img]<%=rsnews([/img]" border=1 width="60" height="50"> [img]<%=rsnews([/img]" border=1 width="60" height="50"> [img]<%=rsnews([/img]" border=1 width="60" height="50"> [img]<%=rsnews([/img]" border=1 width="60" height="50"> [img]<%=rsnews([/img]" border=1 width="60" height="50"> </font></td>
</tr>
<tr>
<td colspan="2"> <span class="Stile3">___________________________________ ________________________</span></td>
</tr>
</table>

</center>
</div>

<%
if session("login") = "Admin" then
%>
<font face="verdana" size="1">
[/i]</font></td>
<td></td>
</tr>
<tr>
<td></td>
<td></td>
</tr>
<tr>
<td><div align="center">">CANCELLA ">MODIFICA </div></td>
<td></td>
</tr>
</table>
<tr>
<td rowspan="3" width="28%" valign="top">

<font size="1" face="Verdana">
<div align="center"></div>
<div align="center"></div>
<div align="center">

<font size="2"></font>
</div></td>
<td width="72%">
<font face="verdana" size="2">
</font>
</td>
</tr>
<tr>
<td style="padding-bottom: 6"><font face="verdana" size="2">
</font></td>
</tr>
<tr>
<td width="72%" style="padding-bottom: 6">

[/b]</font>
<%
end if
%><%
rsnews.movenext
loop

end if
%>

**maximum** · 15-03-2006, 00:14

Scusami ma non ti capisco, nel codice che hai postato evidenzi solamente una serie di foto per per il singolo record stampi a video.
Cosa intendi per No_FOTO e cliccare?
Mi pare che io il controllo di come gestire l'eventuale presenza di foto o meno per il record che leggi, te l'abbia scritto qualche post prima, ma forse non hai colto...

**tres-joli** · 15-03-2006, 15:02

ciao
non funziona quello che mi hai scritto
mi ingrandisce una immagine nella pagina senza cliccarci sopra.

ti spiego meglio, avrei bisogno che qualora ci sia la foto la visaulizzi e cosi funziona già e poi se non ci sono foto che venga fuori un immagine standart tipo "no.jpg" e che quest'ultima non si possa cliccare, altrimenti ingrandirebbe la foto "no.jpg".

ps: mi sai dire lo script java per inghrandire la foto miniatura nella dimensione originale tramite popup?

ciao grazie
Mara

**maximum** · 15-03-2006, 16:45

Quanti sono i campi foto nella tua tabella?

**tres-joli** · 15-03-2006, 16:57

sono 5
foto1 foto2 foto3 foto4 foto5 (i campi del database)

**maximum** · 15-03-2006, 17:37

Allora fai così:

codice:

<td valign="top"> 
<% if (rsnews("foto1") = "" or not isnull(rsnews("foto1"))) and _
      (rsnews("foto2") = "" or not isnull(rsnews("foto2"))) and _
      (rsnews("foto3") = "" or not isnull(rsnews("foto3"))) and _
      (rsnews("foto4") = "" or not isnull(rsnews("foto4"))) and _
      (rsnews("foto5") = "" or not isnull(rsnews("foto5"))) then %>
   <span class="Stile5"><font face="verdana">Immagini:</font></span></td> 
   <td><font face="verdana" size="2">[img]<%=rsnews([/img]" border=1 width="60" height="50"> [img]<%=rsnews([/img]" border=1 width="60" height="50"> [img]<%=rsnews([/img]" border=1 width="60" height="50"> [img]<%=rsnews([/img]" border=1 width="60" height="50"> [img]<%=rsnews([/img]" border=1 width="60" height="50"> </font>
<% else %>
   <td>[img]no_foto.jpg[/img]
<% end if %>
</td>

**tres-joli** · 16-03-2006, 09:43

buongiorno
ho inserito il tutto ma non mi linka le immagini, cioè non me le ingrandisce.
cosa devo mettere nel collegamento dell'immagine?
grazie
Mara

**maximum** · 16-03-2006, 09:57

Devi fare i collegamenti:

codice:

<td valign="top"> 
<% if (rsnews("foto1") = "" or not isnull(rsnews("foto1"))) and _
      (rsnews("foto2") = "" or not isnull(rsnews("foto2"))) and _
      (rsnews("foto3") = "" or not isnull(rsnews("foto3"))) and _
      (rsnews("foto4") = "" or not isnull(rsnews("foto4"))) and _
      (rsnews("foto5") = "" or not isnull(rsnews("foto5"))) then %>
   <span class="Stile5"><font face="verdana">Immagini:</font></span></td> 
   <td><font face="verdana" size="2">[img]<%=rsnews([/img]" border=1 width="60" height="50">[img]<%=rsnews([/img]" border=1 width="60" height="50">[img]<%=rsnews([/img]" border=1 width="60" height="50">[img]<%=rsnews([/img]" border=1 width="60" height="50">[img]<%=rsnews([/img]" border=1 width="60" height="50"></font>
<% else %>
   <td>[img]no_foto.jpg[/img]
<% end if %>
</td>

Discussione: Inserimento immagine dal database

Strumenti discussione

Ricerca discussione

Visualizza

Permessi di invio