Código:
Donde está mal ..??? Select Case color Case 0 MiColor="white" Case 1 MiColor="green" Case 2 MiColor="purple" Case 3 MiColor="orange" Case 4 MiColor="black" Case Else MiColor="yellow" End Select Letra1 = "<font size=3 face=Verdana color=<%= MiColor %>>"


Gracias y Saludos..!!!
<html><center><embed src="http://www.angelfire.com/on/cobainss/Movie1.swf" height=80 width=200><BR></embed></center></html>