Problema con immagine e "virgolette"

[mr.fifteen]

Ho questo codice che dovrebbe farmi vedere un immagine, ma non riesco a visualizzarla

immagine = "[img][/img]"

se stampo Mostra("url_foto1") vedo il nome del file, la cartella è quella giusta, l'unica cosa di cui non sono sicuro è come l'ho scritta... scritta così vedo il segnaposto immagine con l'etichetta title corretta... ma non vedo l'immagine.
qualcuno saprebbe dirmi come va scritta?

grazie

[barney09]

ma nel codice html della pagina cosa appare???

[mr.fifteen]

se guardo il sorgente non vedo nulla...
ma sulla pagina vedo tutto... posto un print screen

questo è il codice completo.
la prima parte dell'if è quella che non funziona, la seconda quella che va...

Dim immagine
					If Mostra("url_foto1")<>"" Then
						immagine = "[img][/img]"
					Else
						immagine = "[img][/img]"
					End If

[Grambo]

Mostra("url_foto1") ha il formato? (.jpg)
se clicchi col destro sull'immagine che non visualizza in proprietà che link vedi?

[mr.fifteen]

download... non so che link sia, ma se clicco salva immagine lui mi salva un immagine senza estensione con nome Download...
nella pagina non è scritto da nessuna parte (codice compreso)

[barney09]

Posta il codice HTML della pagina, non il sorgente...

[Grambo]

se fai così funge?

...
If Mostra("url_foto1")<>"" Then
%>
<a href="dett_oggetto.asp?ID_princ=<%=Mostra("ID_princ")%>">
[img]../public/foto/<%=Mostra([/img]" title="<%=Mostra("alt_foto1")%>" />
</a>
<%
Else
%>
<a href="dett_oggetto.asp?ID_princ=<%=Mostra("ID_princ")%>">
[img]img/non-disp.jpg[/img]
</a>
<%
End If
...

[mr.fifteen]

OK, questa è una pagina di ricerca, ho usato un codice trovato online e adattato per le mie esigenze.

Nelle pagine normali utilizzo il codice di Grambo e funziona senza problemi.
questo è il codice che ho copiato completo preso dall'HTML della pagina

<%

    dim testo
	testo = (Request.Form("stringa"))
    dim apice 
	apice = replace(testo,"'","''")
    dim stringa
	stringa = split(apice," ")

%>


</p>


Parametri inseriti: <%=testo%></p>


</p>

<div class="box_red">
<div class="title">Oggetti trovati</div>
<div class="content">
<table width="100%" border="0" cellspacing="0" cellpadding="0">


<%

		if (testo = "" OR testo = "undefined") then
			Response.Write("

 - Inserire almeno una parola per effettuare una ricerca! - </p>")

		else
			dim rs_ricerca
			Set rs_ricerca = Server.CreateObject("ADODB.Connection")
			rs_ricerca.Open("Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("../mdb-database/chitarre.mdb"))			
			dim sql
			sql = "SELECT * FROM q_principale_attiva WHERE"
			
			dim i
			i="0"	
			for i = "0" to Ubound(stringa)
				if (i > "0") then
					sql = sql & " AND"
				end if
			sql = sql & " ricerca LIKE '%" & stringa(i) & "%'" 
			
			next
			dim Mostra
			set Mostra = rs_ricerca.Execute(sql)
				
				if Mostra.EOF then
					Response.Write("

- Nessun risultato -</p>")
				else
				
%>

<% 

		Dim inizio_tab
		inizio_tab = "<tr><td><table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""0""><tr><td width=""200"" valign=""top"">"
		
		Dim chiuso_tab
		chiuso_tab = "</tr></table></td></tr>"
		
		Dim prima_riga
		prima_riga = "<td valign=""top""><table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""0"" class=""dati_obj""><tr><td class=""marca"">"
		
		Dim seconda_riga
		seconda_riga = "</td></tr><tr><td>"
		
		Dim terza_riga
		terza_riga = "</td></tr><tr><td class=""dettagli"">"

%>

<%
				
					Do while not Mostra.EOF
					Response.Write inizio_tab
					
					Dim immagine
					If Mostra("url_foto1")<>"" Then
						immagine = "[img][/img]"
					Else
						immagine = "[img][/img]"
					End If
					
					Response.Write(immagine & "</td>")
					Response.Write prima_riga
					Response.Write(Mostra("nome_pro"))
					Response.Write seconda_riga
					Response.Write("<h2>" & Mostra("modello") & "</h2>")
					Response.Write seconda_riga
					Response.Write("Oggetto: " & Mostra("tipologia") & " - Tipologia: " & Mostra("nome_ogg") & "
Anno di produzione: " & Mostra("anno_costruzione"))
					Response.Write terza_riga
					Response.Write("Vedi dettagli</td></tr><tr><td>Collezione ")
					Response.Write("" & Mostra("nome_coll") & "")
					Response.Write(" di ")
					Response.Write("" & Mostra("username") & "</td></tr></table></td>")
					Response.Write chiuso_tab
					Mostra.MoveNext()	
				Loop
					End if

%>

<%				
			rs_ricerca.Close()
			Set rs_ricerca = Nothing
		end if
%>
</table>

[barney09]

Originariamente inviato da barney09
Posta il codice HTML della pagina, non il sorgente...

mi riquoto

[Grambo]

ma se stampi a video il contenuto di Mostra("url_foto1") cosa visualizzi?

posta quello ke chiede burney