href che apre un'img da un database

**Salunasy** · 03-07-2007, 21:28

Salve a tutti
Spero qualcuno possa aitarmi.
Questo, il codice che ho modificato per far inserire un'immagine :

codice:

<%

Dim iPageSize       

Dim iPageCount      

Dim iPageCurrent   

Dim strOrderBy      

Dim strSQL          

Dim RS     

Dim iRecordsShown   

Dim miastringa 

Dim nuovastringa 

iPageSize = 10

If Request.QueryString("page") = "" Then 

                iPageCurrent = 1 

Else 

                iPageCurrent = CInt(Request.QueryString("page")) 

End If 

If Request.QueryString("order") = "" Then 

                strOrderBy = "id" 

Else 

                strOrderBy = Request.QueryString("order") 

End If 

Dim Conn 

Set Conn = Server.CreateObject("ADODB.Connection") 

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("/mdb-database/news.mdb") 

Set rs = Server.CreateObject("ADODB.Recordset") 

sql = "SELECT * FROM news ORDER BY " & strOrderBy & " DESC;" 



RS.Open sql, conn, adOpenKeyset 

RS.PageSize = iPageSize 

RS.CacheSize = iPageSize 

iPageCount = RS.PageCount 
Dim totale
totale = rs.recordcount
If iPageCurrent > iPageCount Then iPageCurrent = iPageCount 

If iPageCurrent < 1 Then iPageCurrent = 1 
If iPageCount = 0 Then %>
<body bgcolor="#FFFFFF" link="#000000">
<p align=center> <font size="5"> <font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#000000">

  

  *<font color="#FF0000"><font color="#003366">NON CI SONO AUTOVETTURE USATE</font></font>* </font></font></p>


<% Else 

                RS.AbsolutePage = iPageCurrent 
%>
<p align=center> <font size="5"> <font size="3" face="Verdana, Arial, Helvetica, sans-serif" color="#000000">USATO AUTOVETTURE</font></font>

  

</p>
<% 

iRecordsShown = 0 

Do While iRecordsShown < iPageSize And Not RS.EOF 

%>
<table border="1" width="600" cellspacing="0" cellpadding="0" align="center">
  <tr align="left" valign="middle"> 
    <td width="11%" height="10"> 
      <div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#FF0000"><%= rs("data")%></font></div></td>
    <td width="89%" colspan="1" height="10"> 
    <div align="left"><font face="Verdana, Arial, Helvetica, sans-serif" size="3" color="#000000"><%= rs("titolo")%></font></div>    </td>
</tr></table>
<table width="600" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <% If rs("titolo") <> "" Then 
       If rs("immagine") <> "" Then %>
    <td width="255" height="0" valign="top">

      

      

      <table width="255" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="70"><div align="right"><font color="#003366" size="1" face="Verdana, Arial, Helvetica, sans-serif">MODELLO : </font></div></td>
          <td width="185"><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#000000"><%= rs("modello")%></font></td>
        </tr>
      </table>
      <table width="255" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="70"><div align="right"><font color="#FF0000" size="1"><font color="#003366" face="Verdana, Arial, Helvetica, sans-serif">ANNO</font></font><font color="#003366" size="1" face="Verdana, Arial, Helvetica, sans-serif">:</font></div></td>
          <td width="185"><font color="#000000"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><%= rs("anno")%></font></font></td>
        </tr>
      </table>
      <table width="255" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="70"><div align="right"><font color="#003366" size="1" face="Verdana, Arial, Helvetica, sans-serif">KM :</font> </div></td>
          <td width="185"><font color="#000000"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><%= rs("km")%></font></font></td>
        </tr>
      </table>
      <table width="255" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="70"><div align="right"><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#003366">COLORE :</font></div></td>
          <td width="185"><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#000000"><%= rs("colore")%></font></td>
        </tr>
      </table>
      <table width="255" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="70"><div align="right"><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#000000"><font color="#003366" size="1">OPTIONAL :</font></font></div></td>
          <td width="185"><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#000000"><%= rs("opzioni")%></font></td>
        </tr>
      </table>
      <table width="255" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="70"><div align="right"><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#000000"><font color="#003366" size="1">PREZZO:</font></font></div></td>
          <td width="185"><font face="Verdana, Arial, Helvetica, sans-serif" size="2" color="#000000"><%= rs("prezzo")%></font></td>
        </tr>
      </table>
    </td>
    <td width="345" height="30"> 
    <p align="right">

    [img]public/immagini/<%= rs([/img]" width="200" border=0 usemap="#Map">    </p></td>
    <%else%>
    <%end if%>
<%end if%>
</tr>  
</table>
 <div align="center">

   

   <% 

iRecordsShown = iRecordsShown + 1 

RS.MoveNext 

Loop 

End If 
RS.Close 

Set RS = Nothing 

Conn.Close 

Set Conn= Nothing 

%>
     <font face="Verdana, Arial, Helvetica, sans-serif" size="1">Pagina</font><font face="Verdana, Arial, Helvetica, sans-serif" size="1"> <%= iPageCurrent%> 
     <font size="1">di</font> <%= iPageCount%></font> 
   <% 

If iPageCurrent <> 1 Then 

%>
     <font color="#00FFFF"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">indietro</font></font>
   <% end if %>
   <%If iPageCurrent < iPageCount Then 

%>
     <a href="eventi.asp?page=<%= iPageCurrent + 1 %>&order=<%= Server.URLEncode(strOrderBy) %>&form_chiave=<% = prechiave %>&tipo=<% = tipo %>"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">avanti 
  &gt;</font></a> 
   <% end if %>
</div>

il problema che non riesco a risolvere ( dato che ci potranno essere infinite immagini )
como posso far cliccare sull'imagine e mandarla ad un'altro link per farla vedere ingrandita

Spero qualcuno mi aiuti.

**ricman** · 04-07-2007, 09:14

Originariamente inviato da Salunasy
Questo, il codice che ho modificato per far inserire un'immagine :

<%

Dim iPageSize
... ... ...

il problema che non riesco a risolvere ( dato che ci potranno essere infinite immagini )
como posso far cliccare sull'imagine e mandarla ad un'altro link per farla vedere ingrandita

Scusa ma hai postato milioni di righe in un linguaggio che non è legato a questo furum "HTML.it forum > Lato client > XHTML e HTML".
Posta il pezzetto di codice html in uscita dove riscontri il problema delle foto.
Probabilmente si tratta di di assegnare qualcosa all'href...

**Salunasy** · 04-07-2007, 09:41

il bottone lo creato semplicemente con una mappa

<map name="Map"><area shape="rect" coords="2,0,200,198" href="#"></map>

**Salunasy** · 04-07-2007, 09:59

questo è il riquadro dove appare l'immagine, una volta caricata dall'utente

<td width="345" height="30">
<p align="right">

[img]public/immagini/<%= rs([/img]" width="200" border=0> </p></td>
<%else%>
<%end if%>
<%end if%>

sopra o creato la mappa del bottone per aprire la stessa immagine ma di dimensioni reali, che sono più grandi.

<map name="Map"><area shape="rect" coords="2,2,200,197" href="#"></map>

il problema, che non riesco a risolvere.

l'utente inserirà imagini con nome del file sicuramente tutti diversi.

**ricman** · 04-07-2007, 11:02

Originariamente inviato da Salunasy
il problema, che non riesco a risolvere.
l'utente inserirà imagini con nome del file sicuramente tutti diversi.

Qual'è il problema? Potresti spiegare un po meglio?

**Salunasy** · 04-07-2007, 12:19

Non so come assegnare all'immagine inserita dell'utente, un link che apre la stessa immagine ma di dimensioni reali .
Quando l'utente inserisce l'immagine :

[img]public/immagini/<%= rs([/img]" width="200">

viene sempre inserita rimpicciolita, per una visualizzazione tutta uguale delle immagini.

Dato che è una pagina dell'usato, l'utente inserirà diverse immagini, sicuramente con nome dei file tutti diversi... per questo non so come lanciare il link dell'imagine A, B, C, D, E, ecc...

**ricman** · 04-07-2007, 14:54

Originariamente inviato da Salunasy
Non so come assegnare all'immagine inserita dell'utente, un link che apre la stessa immagine ma di dimensioni reali .
Quando l'utente inserisce l'immagine :

[img]public/immagini/<%= rs([/img]" width="200">

viene sempre inserita rimpicciolita, per una visualizzazione tutta uguale delle immagini.

Dato che è una pagina dell'usato, l'utente inserirà diverse immagini, sicuramente con nome dei file tutti diversi... per questo non so come lanciare il link dell'imagine A, B, C, D, E, ecc...

Per una cosa del genere, tramite script, quando l'utente butta l'img sul server, faccio creare al server stesso sia una miniatura che un'ingrandimento. Così non ho neanche la lentezza di caricamento. Nel frattempo registro il nome dell'immagine sul Db.
Poi con delle query estraggo tutti i dati che voglio, compreso il nome della foto e con un "while" le mostro tutte (o le filtro etc...).

Non conosco per nulla Asp. Ti suggerisco di rivolgere la domanda sul forum apposito. Sicuramente trovi qualcuno che ti sa aiutare di più...

**webdemo** · 04-07-2007, 15:10

sposto in ASP

ciak

Discussione: href che apre un'img da un database

Strumenti discussione

Ricerca discussione

Visualizza

href che apre un'img da un database

Re: href che apre un'img da un database

Permessi di invio