En validar.asp :
<%
select case error
case 1
mensaje_error = "Error 1"
case 2
mensaje_error = "Error 2"
case else
mensaje_error = "Error ?"
end select
%>
en la misma pagina...
<SCRIPT LANGUAGE=VBSCRIPT>
Sub window_onload()
window.showModalDialog("error.html?'" & <%=mensaje_error%> & "')"
End Sub
</SCRIPT>
en error.html, mostrar mediante Msgbox(window.dialogArguments)
saludos