mostrar una imagen en asp??

[mary*]

OK u_goldman...solo recuerda que estoy tratando de mostrar una imagen swf, que va a cambiar dependiendo del valor de una variable y que dicho valor a su vez depende de una consulta en mi bd...este es el código que me muestra perfectamente mi swf:


<td align="center" valign="middle">

<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="100" height="100">
<PARAM NAME=movie VALUE="sci.swf"
<param name="quality" value="high">
<param name="wmode" value="transparent">
<embed src="sci.swf" width="100" height="100" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>

<embed src="sci.swf" width="550" height="400">
</embed>
</object>
</td>

pero inicialmente yo tenía un código en asp para lo que menciono arriba, la sugerencia era adaptar el código de arriba con el siguiente:

**Código ASP**

<%

vFecha1= Day(Now) & "/" & Month(Now) & "/" & Year(Now) & " " & "00:00"
vFecha2= Day(Now) & "/" & Month(Now) & "/" & Year(Now) & " " & "23:59"


'*** MONITOREO ***
Set rsMon1 = Server.CreateObject("ADODB.Recordset")
strSQL_Mon1 = "SELECT TOP 1 ID, CODE, NAME, EQUIPMENT, SIDEWALL, WEIGHT, WAREHOUSE, REJECT, ALARM, FECHC FROM ESCANER1 WHERE FECHC >='" & vFecha1 & "' AND FECHC <='" & vFecha2 & "' GROUP BY ID, CODE, NAME, EQUIPMENT, SIDEWALL, WEIGHT, WAREHOUSE, REJECT, ALARM, FECHC HAVING (WAREHOUSE = 0) AND (REJECT = 0) ORDER BY ID DESC"

'Abre tabla temporal
rsMon1.ActiveConnection = objConn
rsMon1.Open strSQL_Mon1, objConn,2,2
rsMon1.Requery

%><table width="143" height="62" border="1" align="center" bordercolor="#333333" bgcolor="#990000">
<tr align="center" bgcolor="#F4F4F4">
<th width="133" height="32" valign="middle" bordercolor="#FFFFFF" bgcolor="#999999" scope="col">BOTON</th>
<% do while not rsMon1.EOF%>
<tr bordercolor="#000000" bgcolor="#F4F4F4">
<td width="133" height="22" bordercolor="#FF0000" bgcolor="#F4F4F4"><%
'Obtener el valor de la consulta y asignarlo a la variable
vCode=rsMon1("CODE")
vAlarm=rsMon1 ("ALARM")

'Hacer comparaci&oacute;n.

<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="453" height="183">
<param name="movie" value="Title.swf">
<param name="quality" value="high">
<param name="wmode" value="transparent">
<embed src="Title.swf" width="453" height="183" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>

If vCode> 1 and vAlarm=0 Then

<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="100" height="100">
response.write ("<PARAM NAME=movie VALUE=""sci.swf"">")
<param name="quality" value="high">
<param name="wmode" value="transparent">
<embed src="sci.swf" width="100" height="100" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>

Else

<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="100" height="100">
response.write ("<PARAM NAME=movie VALUE=""umd.swf"">")
<param name="quality" value="high">
<param name="wmode" value="transparent">
<embed src="umd.swf" width="100" height="100" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>

End If

If vAlarm=1 then

<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="100" height="100">
response.write ("<PARAM NAME=movie VALUE=""umdsci.swf"">")
<param name="quality" value="high">
<param name="wmode" value="transparent">
<embed src="umdsci.swf" width="100" height="100" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>

End If

%>
&nbsp;</td>
</tr>
<% rsMon1.MoveNext
loop%>
</table>

pero me muestra el siguiente error:


Tipo de error:
Error de compilación de Microsoft VBScript (0x800A0400)
Se esperaba una instrucción
/report/P_Imagenes2.asp, línea 121
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="453" height="183">

no sé si la adaptación de los elementos de flash a asp esten bien...sigo agradeciendo la ayuda...ademas de la paciencia!!!