nao estou conseguindo =/

olá pessoal, estou com problemas e acho q vcs podem me ajudar!

esse código adiciona um zero no valor q recebo....

<%function formata(numero,qtd_zero)dim tamtam = qtd_zero - len(numero)if tam < 0 then tam = 0formata = string(tam,"0") & numeroend function%>
dai eu uso esta linha para chamar a função em cima do meu valor

<%=response.write(formata(Request.QueryString("id"),3))%>

e não estou conseguindo colocar isso no select where...

acho que vcs vendo irão me entender

<%Dim reservas__MMColParamreservas__MMColParam = "1"If (Request.QueryString("id") <> "") Then reservas__MMColParam = (Request.QueryString("id")End If%>........................"SELECT * FROM reservas WHERE mesa = '" + Replace(reservas__MMColParam, "'", "''") + "'"l

bom... no mais é isso, espero contar com vcs!!!

muito obrigado pela atenção