Thiago Top Postado Setembro 11, 2008 Denunciar Share Postado Setembro 11, 2008 Bom dia a todos,pessoal estou com o seguinte problema:Erro de tempo de execução erro '800a003e' Final do arquivo ultrapassado /mc.gb, line 5 <% set file = Server.CreateObject("Scripting.FileSystemObject") path = Server.MapPath("hitcount.txt") set infile = file.OpenTextFile(path) visitor = infile.ReadLine 'LINHA 5 visitor = visitor + 1 infile.close set outfile = file.CreateTextFile( path, True ) outfile.WriteLine( visitor ) outfile.Close %> <%Response.Write(" ")%> <b><% =visitor %></b> <%Response.Write(" ")%>Desde já, obrigado.[]s, Thiago Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Rafael Spilki Postado Setembro 11, 2008 Denunciar Share Postado Setembro 11, 2008 Thago, da uma olhadinha nese link e veja se da uma luz, ok?https://www.scriptbrasil.com.br/forum/lofiv...php/t28074.html[]'s Rafael Spilki Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Thiago Top
Bom dia a todos,
pessoal estou com o seguinte problema:
<% set file = Server.CreateObject("Scripting.FileSystemObject") path = Server.MapPath("hitcount.txt") set infile = file.OpenTextFile(path) visitor = infile.ReadLine 'LINHA 5 visitor = visitor + 1 infile.close set outfile = file.CreateTextFile( path, True ) outfile.WriteLine( visitor ) outfile.Close %> <%Response.Write(" ")%> <b><% =visitor %></b> <%Response.Write(" ")%>Desde já, obrigado.
[]s, Thiago
Link para o comentário
Compartilhar em outros sites
1 resposta 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.