Me quedo asi y da error aver si ves que es:
Response.Write("<td")
If (mtmp < 0) Then
Response.Write(" style=""color: red""")
imagen_a_mostrar = "downarrow.png"
ElseIf (mtmp > 0) Then
Response.Write(" style=""color: green""")
imagen_a_mostrar = "uparrow.png"
End If
Response.Write("><img src=""../images/""& imagen_a_mostrar & ">" & mtmp & "</td>" & vbCRLF)