nao estou conseguindo =/

[FoX Borland 0]

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

[Mário Monteiro 179]

Dim MesaMesa = "1"If (Request.QueryString("id") <> "") Then   Mesa = (Request.QueryString("id")End IfMesa = Replace(Mesa,"'","''")Mesa = formata(Mesa,3)%>........................"SELECT *  FROM reservas  WHERE mesa = '" + Mesa + "'"

Testa

[FoX Borland 0]

deu certo sim mário!só um parenteses ali q tava errado, mais ja ta belezamuito obrigado mesmo!abraços!

[Mário Monteiro 179]

firmesa então tiozinho