mharcelinho Postado Maio 16, 2007 Denunciar Share Postado Maio 16, 2007 Estou fazendo a seguinte soma em asp:valor1 = 1valor2 = valor1 +1No final o resultado de valor2 esta sendo 3. O que posso fazer?? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 fantasma Postado Maio 16, 2007 Denunciar Share Postado Maio 16, 2007 Coloque o cod inteiro para que possamos olhar!!!!!!!!!!!!!!! Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 mharcelinho Postado Maio 16, 2007 Autor Denunciar Share Postado Maio 16, 2007 (editado) Coloque o cod inteiro para que possamos olhar!!!!!!!!!!!!!!!<!--#include file="./Idioma/Portugues.asp"--><%Response.Expires = -1Response.Expiresabsolute = now - 1Response.CacheControl = "Private"Response.Buffer = True%><html><head></head><body bgcolor="#ffc866"><%Dim stStringDim loginDim senhaDim cdclienteDim stURLDim nmLoginDim cdConsemp = Request("cbbInst")login = Request("txtLogin")senha = Request("txtSenha")CliArray = Split(emp, "@", -1, 1)cdClie = CliArray(0)Session("cdFili") = CliArray(1)set obj = Server.CreateObject("SNT.rdmSnackTech")stString = obj.ValidaConexao(senha, login, cdClie)If (stString <> "LogInv") then dim XMLString Set xmlDoc = Server.CreateObject("Microsoft.XMLDOM") Set xmlErr = Server.CreateObject("Microsoft.XMLDOM") set obj = Server.CreateObject("SNT_HTML.rdmSnackTech") XmlString = obj.GetCdFuncHtm(login, cdClie) If (mid(XMLString, 1 ,5) = "ERRO_") Then stErros = mid(XMLString, 6, len(XMLString)) idErro = "S"%> <script> alert('<%=HTMLEncode(stErros)%>') </script><% Else xmlDoc.loadXML(XMLString) xmlDoc.async = False If xmlDoc.parseError.errorCode <> 0 Then Response.Write xmlDoc.parseError.reason End If Set xmlLst = xmlDoc.getElementsByTagName("ROW") Dim i numCad = xmlLst.length For i = 0 to numCad -1 Aluno = xmlLst.item(i).getAttribute("NMCONSUMIDOR") Cons = xmlLst.item(i).getAttribute("CDCONSUMIDOR") Sit = xmlLst.item(i).getAttribute("IDSITCONSUMI") Mail = xmlLst.item(i).getAttribute("DSEMAILCONS") Resp = xmlLst.item(i).getAttribute("NMRESPCONS") Insti = xmlLst.item(i).getAttribute("NMFANTCLIE") NmTip = xmlLst.item(i).getAttribute("NMTIPOCONS") CdTip = xmlLst.item(i).getAttribute("CDTIPOCONS") IdCons = xmlLst.item(i).getAttribute("CDIDCONSUMID") NrAcesso = xmlLst.item(i).getAttribute("NRACESSOSITE") Next End If set xmlDoc = Nothing set xmlLst = Nothing set obj = Nothing Session("Aluno") = Aluno Session("Cons") = Cons Session("Sit") = Sit Session("Mail") = Mail Session("Resp") = Resp Session("Cdcli") = cdClie Session("Login") = login Session("Instituicao") = Insti Session("Cliente") = cdClie Session("NmTip") = NmTip Session("CdTip") = CdTip Session("IdCons") = IdCons Session("Seta")= "S" stURL = "menu.asp"----------------------neste ponto a variável "NrAcesso " traz o numero de acessos e acrescenta mais um------------------------------------------so que, por exemplo, se já tiverem 5 acessos ele grava no banco 7 acessos----------------------------- If NrAcesso <> "" then set objSoma = Server.CreateObject("SNT.rdmSnackTech") ResultCont = objSoma.ContAcesso(NrAcesso + 1, Session("Cons"), Session("Cdcli")) ------------------------------------------------------------------------------------------------------------------------------------------- %> <script language="javascript"> location.href = '<%=stURL%>'; </script> <% Else %> <script language="javascript"> alert('<%=st00131%>') location.href = 'AltPriSenha.asp'; </script> <% End ifElse IdErro = "S" stURL = "indice.asp?Erro="&IdErro&"&emp="&emp&"&cdcodcli="&cdClie%> <script language="javascript"> location.href = '<%=stURL%>'; </script><%end if%></body></html> Editado Maio 16, 2007 por mharcelinho Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 .Andreia. Postado Maio 16, 2007 Denunciar Share Postado Maio 16, 2007 no seu codigo nem tem a somatoria, mas tente assim:valor1 = 1 valor2 = Cint(valor1) +1 Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 mharcelinho Postado Maio 16, 2007 Autor Denunciar Share Postado Maio 16, 2007 no seu codigo nem tem a somatoria, mas tente assim:valor1 = 1 valor2 = Cint(valor1) +1ResultCont = objSoma.ContAcesso(NrAcesso + 1, Session("Cons"), Session("Cdcli")) Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 .Andreia. Postado Maio 16, 2007 Denunciar Share Postado Maio 16, 2007 E tentou usar a funcao Cint()? Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
mharcelinho
Estou fazendo a seguinte soma em asp:
valor1 = 1
valor2 = valor1 +1
No final o resultado de valor2 esta sendo 3. O que posso fazer??
Link para o comentário
Compartilhar em outros sites
5 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.