Hjælp med SELECT sætning!

Hvordan får jeg denne her til at virke??

Mennigen er at den kun skal vise de poster, hvor der står ON i kollonnen "SHOW"



<%Dim ADO_Connection
Dim rsMenu
Dim SQL_STRING

set ADO_Connection = server.Createobject("ADODB.Connection")
ADO_Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../cgi-data/db.mdb")

set rsMenu = server.Createobject("ADODB.Recordset")
SQL_String = "Select * from page WHERE SHOW = ("ON") order by rank ASC"
rsMenu.open SQL_String, ADO_Connection%>