Na Internet, contadores escritos em ASP estão por toda parte. Acho que não faz sentido falar aqui sobre contadores escritos em ASP. Posteriormente, achei necessário falar sobre isso, pois não se trata apenas de escrever contadores, mas também de apresentar a todos os conhecimentos e habilidades de aplicação do ASP.
O código original do programa é o seguinte:
$#@60 ;%countlong=8
'countlong define o número de dígitos de exibição do contadorOn Error Resume Next
′ Ignorar todos os erros count=server.mappath(″count.txt″)
definir cou = server.createobject(″scripting.filesystemobject″)
definir=cou.opentextfile(contagem,1,falso,falso)
contador=out.readline
sair.fechar
′O código acima é para abrir o arquivo count.txt e ler uma linha para ler o valor atual do contador if session(″in″)$#@60;$#@62;″in″ then
'Determine se o usuário entrou na página inicial para garantir que o contador não aumentará em 1 quando ele pressionar atualizar ou voltar a esta página.
sessão(″em″)=″em″
definir = cou.createtextfile(contagem,verdadeiro,falso)
aplicativo.lock
contador=contador+1
'Contador mais 1
out.writeline(contador)
aplicativo.unlock
sair.fechar
'O código acima é para criar um novo arquivo count.txt e escrever uma linha, escrever o valor do contador após adicionar 1 final se
co=cstr(contador)
A função 'cstr é usada para converter variáveis numéricas em tipos de caracteres para i = 1 para countlong-len(co)
resposta.write ″″
próximo
'A instrução de loop acima é para completar a adição de 0 imagens na frente do contador'A função len(co) é obter o comprimento da variável co, countlong-len(co) obtém o número das 0 imagens anteriores para i= 1 para len(co)
resposta.write ″″
próximo
A função ′mid(co,i,1) é usada para ler um caracter % começando na i-ésima posição da variável co $#@62 ;
A parte mais bem-sucedida desse contador é usar a sessão para evitar que os usuários atualizem o contador várias vezes. Um arquivo de texto é usado para registrar o valor do contador. Embora o código seja mais longo para escrever, é muito melhor do que usar o aplicativo. objeto, porque quando o servidor for reinicializado ou quando global.asa for alterado, o valor do objeto do aplicativo será apagado e imagens serão usadas em vez de caracteres, o que fica mais bonito!
Você mesmo pode criar a imagem do contador. Use o nome de arquivo 0.gif para 0, 1.gif para 1 e assim por diante.