You can use VBScript to do this. Below is an example from one of my pages.
If Request("status") = "NoData" then
NewStatus = "OK"
Response.Write "<SCRIPT LANGUAGE=" & chr(34) & "VBScript" & chr(34) &">"
Response.Write "Dim Answer" & vbCrLf
Response.Write "Answer = msgbox(" & chr(34) & "No current patient data for physician." & _
chr(34) & ",0," & chr(34) & "No Patients Found" & chr(34) & ")" & vbcrlf
Response.Write "Navigate " & chr(34) & "main.asp?status=" & NewStatus & _
"&SearchedDocNum=" & Request("SearchedDocNum") & Chr(34)
Response.Write "</SCRIPT>"
End If
