do until ISayStop (Or for x = 1 to 100, etc.)

    x = x + 1
    xVar = getSrc("http://myspace.com/page?page="

<%

cPage = request.servervariables("script_name")

%>
<option value='/mypage.asp'<%
  if cPage = "/mypage.asp" then
    response.write " selected"
  end if %>>Take me to My Page</option>

AVG(CASE WHEN [Item Number] = 'A' THEN [Price] END) AS A,
AVG(CASE WHEN [Item Number] = 'B' THEN [Price] END) AS B,
AVG(CASE WHEN [Item Number] = 'C' THEN [Price] END) AS C

SELECT
 CASE
  WHEN len(FLD) = 6 THEN '84'+FLD
  WHEN len(FLD) = 5 THEN '840'+FLD
  WHEN len(FLD) = 4 THEN '8400'+FLD
  WHEN len(FLD) = 3 THEN '84000'+FLD
  WHEN len(FLD) = 2 THEN '840000'+FLD
  WHEN len(FLD) = 1 THEN '8400000'+FLD
 END

FROM TABLE

SELECT
	i.[invoice number] AS [Invoice Number],
	[i].[Paid] as [Paid],

	SUM([li1].[quantity]

SELECT
  DIR_NAME,
  SUM(CASE WHEN [T1].[GENRE] = 'Thriller' THEN 1 ELSE 0) AS THRILLERS,
  SUM(CASE WHEN [T1].[GENRE] = 'Drama' THEN 1 ELSE 0) AS DRAMAS

CREATE PROCEDURE spTEST @includepaid bit AS

SELECT FIELD FROM TABLE
WHERE
  SOLD = 1
  AND CUSTOMER = 2

  CASE
    WHEN @includepaid = 1 THEN AND [Paid] = 1
  END

CREATE stored procedure sp_MySP
  @name varchar,
  @id int
AS

UPDATE MyTable
SET [Name] = @name
WHERE ID = @id

response.write server.mappath("/") & "/whatever/mydb.mdb"
response.end