4 replies to this topic

[eliasdesign]

O código abaixo estou tentanod fazer a soma de um valor ao campo senha que esta armazenado no vetor 1 mas o problema é que não estou conseguindo . . se algum colega puder me dar uma ajuda . . ficarei eternamente grato . . .



desde já agradeço a atenção . .



Elias(DarkWolfBH)



Segue o código que estou utilizando. . . .

<%
set fso= server.createObject("scripting.fileSystemObject")
if not fso.fileExists(server.MapPath("senhas.txt")) then
response.write"arquivo inesistente"
else
 set arq=fso.opentextfile(server.MapPath("senhas.txt"))
do while not arq.atendofstream
  vet=split(arq.readline,"#")
  login = vet ( 0 )
  senha = vet(1)
response.write("<b>Usuário:</b>"&login&"<br>")
response.write("<b>Senha:</b>"&senha&"<br><br>")
Dim segmento, senha_final
segmento= request.querystring("seg")
    if login=segmento then
           senha_final = senha+1
          fso.WriteLine("senha_final")
          fso.Close
          End if
loop
end if
%>

[Ma®©elo]

É só um palpite, mas ...

experimente fazer senha_final = Cint(senha) + 1

[ ]s

[eliasdesign]

Ma®©elo . .

o problema ainda persiste . . no navegador só é retornado
"HTTP500 - Erro Interno no Servidor" . .

e fiz o que vc me recomendou mas continua com o mesmo erro . . .




Elias(DarkWolfBH)

[Agente Linhares]

olha se seu server tem fso, q é o componente responsavel por fazer isso.

de qualquer modo, dá um look:
http://forum.wmonlin...cs&highlite=txt

[abc2]

alem da sugestao dada pelo Agente Linhares procure ver qual erro esta dando

para isso faça o seguinte (Internet Explorer)
Ferramentas > Opções Internet > Avançadas > desmarque a opção "mostrar erros http amigáveis"

agora rode a pagina e nos diga qual erro deu