cortar texto y comparar con otro en asp

[AlZuwaga]

se me ocurre algo así:

Código:

meses = "|enero|febrero|marzo|...|noviembre|diciembre|"
Do Until rstSchema.EOF
if InStr(meses, "|" & rstSchema("TABLE_NAME") & "|") <> 0 then
Response.write "<option value= " & rstSchema("TABLE_NAME") &">" & rstSchema("TABLE_NAME") &"</option>"
end if
rstSchema.MoveNext
Loop

Saludos y por favor no me contactes por privado para resolver dudas técnicas.