Antalet i en QueryString?

Jag loopar ut dom senaste nyhetsrubrikerna från Expressen och vill att den ska loopa fram antalet som jag får från en QueryString men får detta felmeddelande:

Kompileringsfel i Microsoft VBScript fel '800a0415'

Teckensträngskonstant förväntas.

/geek/nyheter.asp, rad 26

Const TOP = antal
-----------------^

antal=Request.QueryString("antal")
If antal="" Then
	antal="5"
End If

Const TOP = antal

Set XMLDoc = CreateObject("MSXML2.DOMDocument.4.0")
XMLDoc.setProperty "ServerHTTPRequest", true
XMLDoc.async=false
XMLDoc.Load "http://expressen.se/expressen/jsp/xml.jsp?page=10"

Om jag använder Const TOP = 8 så funkar det men vill som sagt loopa ut antalet som jag får från QueryStringen.
Att jag alltid ska krångla till det. ;)

En konstant har ett konstant, dvs känt värde. Antingen bestämmer du dig för vilket värde din konstant ska ha, eller så droppar du const.