Tjekke om tal er i streng

Jeg bruger følgende til at tjekke om et eller flere tal er i streng, for så kune at udskrive poster fra en tabel der matcher talene i strengen?


userSQL = "SELECT * FROM TeventUser WHERE ID = " & request("ID")
Set RS = myConn.Execute(userSQL)
VarAreaID=RS("AreaID")
'f.eks 2, 5, 6, 14, 23

strSQL = "SELECT * FROM TeventArea ORDER BY AreaName"
Set eRS = myConn.Execute(strSQL)
WHILE NOT eRS.EOF
if instr(1, VarAreaID, CStr(eRS("AreaID"))) then %>
<option value="<%=eRS("AreaID")%>" selected><%=eRS("AreaName")%></option>
<%end if
end if
eRS.MoveNext
WEND

Den skal så kun udskrive poster fra TeventArea som matcher VarAreaID strengen..... det går også indtil 9 så søger den jo kun efter 1 tal....hvordan sikre jeg at hvis 14 er i strengen, så vælges 1 og 4 ikke?


ferdinan