Ho il seguente problema :
faccio upload di una foto e vorrei utilizzarla come sfondo di una pagina .
carico la pagina ma devo aver scritto male qualcosa perchè non funziona .
codice:
<% CNN=Application("CNN")
	set conn=Server.CreateObject("ADODB.Connection")
	conn.open CNN
set rs1=Server.CreateObject("ADODB.RecordSet")
qry1="SELECT * FROM prima where num='98';"
rs1.Open qry1,conn
if rs1.eof then
%>
Nessun dato disponibile. 
<%
else
%>
<%while not rs1.eof%>
<%set fso = Server.CreateObject("Scripting.FileSystemObject")
strImmagine = "./area_protetta/foto/" & rs1.fields("filename")
if fso.FileExists(Server.MapPath(strImmagine)) then
  %>
<body background="[img]<%=strImmagine%>[/img]">  
<%        
else
  %>
          Foto <%=rs1.fields("filename")%> non presente 
          <%
end if 
rs1.MoveNext
wend%>