Si tienes postales en flash, y otras que no son flash, puedes hacer algo como esto, dentro del bucle
do while:
Código:
<td width="25%" height="112" valign="middle">
<div align="center">
<%
'comprobamos si la extensión de la imagen es swf
'para mostrar el maldito código (la imagen está en la
'BD, con su correspondiente extensión, claro)...
postal = listar("img")
extension = Mid(postal, Len(postal) - 2, Len(postal))
if extension="swf" then
%>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://active.macromedia.com/flash2/cabs/swflash.cab#version=4,0,0,0" id="postal_<%=listar("id_tarjeta")%>" width="100" height="81">
<param name="movie" value="tarjeta/thumbs/<%=listar("img")%>">
<param name="quality" value="high">
<embed src="tarjeta/thumbs/<%=listar("img")%>"
quality="high"
width="100"
height="81"
type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash"></embed></object>
<%
'Si no es una postal en flash...
else
%>
<img src="tarjeta/thumbs/<%=listar("img")%>" width="100" height="81">
<%
'finalizamos la comprobación de
'si es, o no, una imagen en flash
end if
%>
<br>
<input name="img" type="radio" value="<%=listar("img")%>" <%if listar("id_tarjeta") = 1 then response.Write("checked") end if%>>
</div>
</td>
Si solo tienes imágenes en flash, quita el condicional, y deja solo el maldito código.
SalU2