Saludos,
Lo primero es que tienes que tener las dos imágenes. Ej.
flecha_roja.gif
flecha_verde.gif
Creamos una variable que contendrá el nombre de una u otra imagen.
dim imagen_a_mostrar
En el IF asiganamos el valor dependiendo del caso.
If (mtmp < 0) Then
Response.Write(" style=""color: red""")
imagen_a_mostrar = "flecha_roja.gif"
ElseIf (mtmp > 0) Then
Response.Write(" style=""color: green""")
imagen_a_mostrar = "flecha_verde.gif"
End If
Por último cuando escribres la celda, pues poner tambien la imagen
Response.Write(">" & mtmp & "<img src="/ruta_donde_tengas_las_imagenes/" & imagen_a_mostrar & "></td>" & vbCRLF)
Y ya está....
Bueno sería que tuvieses una tercera imagen para que si en el caso de que no se cumplieran ningunas de las condiciones del IF no te saliese error. Por ejemplo si mtmp = 0