Probelma besta que ta me deixando LOUCO

[Ambrosio 0]

Galera... Olha que loucura

 

To fazendo uma paginacao apropriada pro meu programa

 

Ele pega os querystring no endereço e transforma numa variavel

 

Ae esse tanto de if eh somente pra marcar em negrito qual mes ta selecionado!!!

 

Nomeu bd e pus os meses todos como LEN = 2

 

Ta funcionando direitim de Jan ate Set que sao de 01 a 09.

 

Quando chega no mes 10, 11 e 12 nao marca em negrito!!!!! PQ?

 

<%if CStr(Request.QueryString("pagm")) = "" then	pagm = FormatoData("mm")else 	pagm = CStr(Request.QueryString("pagm"))end ifif CStr(Request.QueryString("paga")) = "" then	paga = FormatoData("aaaa")else 	paga = CStr(Request.QueryString("paga"))end iffor i=1 to 12IF Len(i) = 1 THEN i = 0&i END IFif i = 01 AND i = pagm then im = "<b>Jan/"&paga&"</b> - " else if i = 01 then im = "Jan/"&paga&" - " end if end ifif i = 02 AND i = pagm then im = "<b>Fev/"&paga&"</b> - " else if i = 02 then im = "Fev/"&paga&" - " end if end ifif i = 03 AND i = pagm then im = "<b>Mar/"&paga&"</b> - " else if i = 03 then im = "Mar/"&paga&" - " end if end ifif i = 04 AND i = pagm then im = "<b>Abr/"&paga&"</b> - " else if i = 04 then im = "Abr/"&paga&" - " end if end ifif i = 05 AND i = pagm then im = "<b>Mai/"&paga&"</b> - " else if i = 05 then im = "Mai/"&paga&" - " end if end ifif i = 06 AND i = pagm then im = "<b>Jun/"&paga&"</b> - " else if i = 06 then im = "Jun/"&paga&" - " end if end ifif i = 07 AND i = pagm then im = "<b>Jul/"&paga&"</b> - " else if i = 07 then im = "Jul/"&paga&" - " end if end ifif i = 08 AND i = pagm then im = "<b>Ago/"&paga&"</b> - " else if i = 08 then im = "Ago/"&paga&" - " end if end ifif i = 09 AND i = pagm then im = "<b>Set/"&paga&"</b> - " else if i = 09 then im = "Set/"&paga&" - " end if end ifif i = 10 AND i = pagm then im = "<b>Out/"&paga&"</b> - " else if i = 10 then im = "Out/"&paga&" - " end if end ifif i = 11 AND i = pagm then im = "<b>Nov/"&paga&"</b> - " else if i = 11 then im = "Nov/"&paga&" - " end if end ifif i = 12 AND i = pagm then im = "<b>Dez/"&paga&"</b>" else if i = 12 then im = "Dez/"&paga&"" end if end if%><a href="<%=Request.ServerVariables("SCRIPT_NAME")%>?action=admoee&cod=<%=Cmaq%>&pagm=<%=i%>&paga=<%=paga%>" style="text-decoration: none"><font face="Verdana" size="1" color="#336699"><%=im%></a></font><%next%>

[Salgado 4]

Esse trechinho em seus IFs: i = pagm troque por i = CInt(pagm)

[Ambrosio 0]

dÃ!!!tem hora que agente deixa de pensar nos detalhes mais bestas por conta de uma raiva que esses programas fazem agente passar...Realmente so esse CInt funcionou... so que se deixar so i = CInt(pagm) não da também... Resolvi com CInt(i) = CInt(pagm)[;)]Abrços ae.. e mto obrigado mais um vez