Microsoft's Active Server Pages language (called VBScript), meant to be embedded in HTML documents.
99 Bottles of Beer
<%
n = 99
do
str = n & " bottle"
if n <> 1 then str = str & "s"
str = str & " of beer"
Response.Write str & " on the wall...
"
Response.Write str & "!
"
Response.Write "Take one down, pass it around...
"
n = n - 1
if n > 0 then
str = n
else
str = "No "
end if
str = str & " bottle"
if n <> 1 then str = str & "s"
str = str & " of beer on the wall!
"
Response.Write str
Response.Write "
"
loop while n > 0
Response.Write "Buy more
beer!"
%>