> Is this possible in VBScript..?



I do it like this for JS challenged browsers (adding bits to your code):



<%

     for j = 1 to objRS.PageCount

       vselected = ""

       if objRS.PageCount = currentPage then

         vSelected = "selected"

       end if

       Response.Write "<option " & vSelected 

& "value="""&j&""">"&j&"</option>"

     next

%>