Recomendado: Use ASP para analisar automaticamente o endereço da imagem na página da web Agora, o editor HTML baseado em páginas da web está sendo usado cada vez mais amplamente no sistema de notícias e no sistema de artigos. Uma página da web pode manter seu estilo original assim que permanecer, e as imagens também podem ser mantidas nesta página. No entanto, durante o uso, se a imagem na página colada for excluída, ela irá
ASP é uma tecnologia lançada pela Microsoft para substituir a interface do Gateway Universal. Seu nome completo são páginas de servidor ativo. É um ambiente de execução do lado do servidor da Web. O próprio ASP contém motores VBScript e JavaScript, permitindo que os scripts sejam incorporados diretamente no HTML. Agora vou compartilhar com você algumas dicas sobre como usamos ASP.
1. Coluna de notícias
A maioria das páginas da web tem barras de notícias para exibir o tópico das notícias recentes. Clique neste tópico para visualizar relatórios detalhados. Se você escrever um por um na página da web todos os dias, seria muito problemático criar links por sua vez. Como fazê -lo atualizar automaticamente com base no arquivo?
1. Preparação:
1) Crie uma pasta e nomeie as notícias, assumindo que ela seja armazenada em d:/ asp/ diretório;
2) Escreva o conteúdo detalhado de cada notícia em um arquivo e a forma de nomenclatura deste arquivo é: x (newstime) .htm. Onde X é o tema desta notícia, e o NewStime é o momento em que as notícias são lançadas (escritas na ordem do ano do ano). Por que você escreve assim? Você saberá depois de ler as idéias do algoritmo e os programas de origem abaixo.
2. Idéia do algoritmo: Para arquivos na pasta de notícias, classifique de grande a pequeno de acordo com o momento do comunicado de imprensa em seus nomes de arquivos (ou seja, o conteúdo entre colchetes). Dessa forma, as últimas notícias estão no topo. Enquanto os principais nomes de arquivos da pasta de notícias forem exibidos na posição correspondente da página da web, as últimas notícias poderão ser exibidas na coluna de notícias, conforme descrito em 1.
3. Bloco de origem (escrito em VBScript)
| A seguir, o conteúdo citado: <% Dim FS, F, F1, FC, FILENUM contagem obscura dim i, j, t1, t2 Arquivo Dim (100) Dim Mystr (100) 'padrão de data no arquivo contagem = 0 Set fs = createObject (script.filesystemoBject) Set f = fs.getFolder (d:/asp/notícias) Definir FC = F.Files Para cada F1 no FC contagem = contagem 1 'contagem o número de arquivos arquivo (contagem) = fs.getBasename (f1) 'Nome da base do arquivo de tags MyPos = Instr (1, Arquivo (contagem), () ') posição no nome da base do arquivo 'String de data em nome de arquivo base mystr (contagem) = mid (arquivo (contagem), mypos 1, len (arquivo (contagem)) - (mypos 1)) próximo para i = 1 para contar Para J = 1 para a Count-i Se mystr (j) <mystr (j 1) então t1 = arquivo (j) arquivo (j) = arquivo (j 1 arquivo (j 1) = t1 T2 = mystr (j) mystr (j) = mystr (j 1) mystr (j 1) = t2 final se próximo próximo j = 1 Se contar <10, então 'a coluna de notícias mostra 10 notícias TEMCOUNT = contagem outro TEMCOUNT = 10 final se Faça enquanto J <= Temcount%> <a href = arquivo: /// d:/asp/news/<%= arquivo (j)%> .htm Target = new_window> <%= arquivo (j)%> </a> <% j = j 1 laço %> |
4. Conteúdo da coluna de notícias atualizada:
Enquanto você desenvolver bons hábitos de escrita, faça com que o nome das notícias siga os requisitos de 1 e salve os arquivos escritos na pasta de notícias, as 10 últimas notícias serão exibidas automaticamente.
2. Placa de aviso
Além da coluna de notícias, a mais usada é a placa de aviso, que é usada principalmente para exibir algumas notificações importantes. Obviamente, essas notificações precisam ser alteradas com frequência. Você permitirá que os usuários vão ao programa de origem para modificar toda vez que alterarem o conteúdo do anúncio? Claro que não. Devemos fornecer uma interface de manutenção para o usuário, para que, desde que o usuário insira uma notificação, o conteúdo de notificação seja naturalmente exibido na placa de aviso na página da web.
1. A chave para resolver esse problema está na aplicação flexível de objetos FileSystemObject e Objetos Textstream. Em aplicativos reais, você não precisa criar um objeto Textstream sozinho, porque, desde que você abra o arquivo com o objeto FileSystemObject, o sistema criará automaticamente um objeto Textstream. Ou seja, uma vez que o método OpenTextFile ou CreateTextFile for chamado, o objeto Textstream será transmitido de volta.
2. Existem três arquivos relevantes necessários: update.asp, anúncio.asp, manutenção text.txt e salve -os no diretório d:/asp/manutenção.
3. As principais funções e blocos de origem dos três arquivos:
1) Update.asp
A principal função é permitir que o usuário insira o anúncio para exibir, verifique se o conteúdo de entrada está vazio. Se não estiver vazio, será enviado ao programa do anúncio.asp para processamento.
| A seguir, o conteúdo citado: <html> <head> <meta http-equiv = content-type content = text/html; charset = gb2312> <meta nome = conteúdo do gerador = Microsoft FrontPage 4.0> <meta name = progid Content = FrontPage.editor.document> <title> Atualizar conteúdo do quadro de avisos </ititle> </head> <Body> <idioma de script = vBScript> função datacheck () Dim Msg, Errflag errflag = true Se Len (TRIM (mantenha.t1.value)) = 0 então Focusto (0) errflag = false msg = Por favor, insira o conteúdo do anúncio a ser enviado final se if (errflag = false) então msgbox msg, 64, oh não! função de saída final se DataCheck = Errflag mantenha.submit Função final sub focusto (x) Document.Maintain.Elements (X) .Focus () final sub </script> ① <Método de formulário = pós -ação = anúncio.asp nome = manutenção> <p> <tipo de entrada = nome do texto = tamanho t1 = 84> <Tipo de entrada = Valor de redefinição = Nome de reescrita = B2> <Tipo de entrada = Valor do botão = Nome do envio = B1 OnClick = DATACHECK ()> </p> <hr color =#ff99ff size = 1> </morm> </body> </html> |
A seção Action = anúncio.asp na declaração ① ressalta que o programa a ser iniciado após o envio do formulário é o anúncio.
2) anúncio.asp
O arquivo .txt Text .txt é lido e gravado através do objeto FileSystemObject e pelo objeto TextScream, para que o conteúdo das 5 principais linhas deste arquivo seja o anúncio a ser exibido na placa de aviso.
| A seguir, o conteúdo citado: <% dim str str = request.form (t1) Dim S (5) const forreading = 1, forwriting = 2 Dim FSO, MyFile set fso = server.createObject (script.filesystemoBject) Definir myfile = fso.opentExtFile (Mantenha text.txt, forreading) 'arquivo aberto no modo de leitura Para i = 1 a 5 ', o quadro de avisos exibe 5 anúncios no total s (i) = myfile.readline' Leia o conteúdo do arquivo próximo myfile.close Definir myfile = fso.opentExtFile (mantenha text.txt, forwriting, true) 'arquivo aberto no modo de escrita MyFile.WriteLine str para i = 1 a 4 MyFile.WriteLine S (i) 'Escreva dados de volta ao arquivo próximo myfile.close %> |
3) Mantenha o texto.txt
Esse arquivo começa vazio e, depois de inserir um anúncio da interface exibida na atualização .asp, o conteúdo desse arquivo é gravado automaticamente.
4. Adicione o código a seguir ao segmento de código em que o local do anúncio é exibir o anúncio de atualização no arquivo da página inicial (geralmente padrão.asp) para exibir o anúncio atualizado.
| A seguir, o conteúdo citado: <marquee scrollLlamount = 2 scrollDelay = 50 direção = largura para cima = 223 altura = 133 id = a onMouseOver = a.stop () onmouseout = a.start ()> 'role para cima e para baixo na placa de aviso <% Dim S (20) Dim FSO, MyFile Set fso = createObject (script.filesystemObject) Definir myFile = fso.opentExtFile (d:/asp/mantenha/mantenha text.txt, 1, true) para i = 1 a 5 ReAltlineTextFile = myfile.readline s (i) = readLineTextFile Response.write ★ & s (i) Response.write <br> próximo %> </marquee> |
As duas dicas acima podem resolver muitos desses problemas, aprendendo com um exemplo. Os entusiastas da web podem muito bem tentar.
Compartilhar: o entendimento mais profundo de sessão e cookies Vamos falar sobre o debate da sessão sobre sessão, mas deve haver mais de 90 pessoas que podem entender a sessão. Mas deixe -me dizer -lhe, não pense que você é velho ~ algumas pessoas concordam com a sessão, enquanto outras discordam. Mas o que exatamente devo dizer sobre essa pergunta? Por que não ouvir