DetailPage-MSS-KB

Base de Dados de Conhecimento

Artigo: 157906 - Última revisão: quinta-feira, 11 de Maio de 2006 - Revisão: 3.0

 
1,00 1,10 2 WINDOWS kbprg kbhowto

Nesta página

Sumário

Este artigo mostra as três formas que pode manter o estado em páginas Web utilizando o Visual Basic Scripting Edition.

Seguem-se três métodos:
  • Atribua um cookie para um HREF alternativo.
  • Utilize um cookie e alterar o conteúdo da página.
  • Utilize frames e guarde um valor na moldura de nível superior.

Mais Informação

Os três métodos são descritos mais detalhadamente abaixo. Para ver um exemplo que demonstra os três métodos, crie os ficheiros HTML que são descritos em cada secção. Pode utilizar o bloco de notas ou outro editor de texto para criar os ficheiros.

Método 1 - a atribuição de um cookie para um HREF alternativo

Para utilizar o método 1, terá de ler os ficheiros a partir de um servidor HTTP.
   ******** Begin Page1-1.htm **********
   <HTML>

    <SCRIPT LANGUAGE="VBSCRIPT">
      Sub SetCookie
        document.cookie = "MyVar='101'; path='page1-2.htm'"
      End Sub
    </SCRIPT>
    <BODY>
      <H2>Page 1 - Method 1</H2><HR>
      <INPUT TYPE=BUTTON VALUE="Set Cookie" onClick="SetCookie">
      <A HREF="page1-2.htm">Go to Page 2</A>
    </BODY>

   </HTML>
   ******** End Page1-1.htm **********

   ******** Begin Page1-2.htm **********
   <HTML>

    <SCRIPT LANGUAGE="VBSCRIPT">
      Sub GetCookie
        MsgBox document.cookie
      End Sub
    </SCRIPT>
    <BODY>
      <H2>Page 2 - Method 1</H2><HR>
      <INPUT TYPE=BUTTON VALUE="Get Cookie" onClick="GetCookie">
    </BODY>

   </HTML>
   ******** End Page1-2.htm   **********
				
Página1 - 1.htm:
  • O evento AoFazerClique do botão chama a subrotina SetCookie definido na parte superior da página.
  • A subrotina define o valor do cookie e PATH do cookie. O PATH é o nome da página que o valor é definido para.
  • A âncora "Ir para página 2" navega para a página 2 utilizando HTML padrão sintaxe.
Página1 - 2.htm:

  • O evento AoFazerClique do botão chama a subrotina GetCookie definido na parte superior da página.
  • A subrotina lê o valor do cookie para demonstrar que a variável tenha sido definida.

Método 2 - utilizando um cookie e alterar o conteúdo da página

Para utilizar o método 2 que necessitar de ler os ficheiros de um servidor HTTP.
   ******** Begin Page2-1.htm **********
   <HTML>

    <SCRIPT LANGUAGE="VBSCRIPT">
      Sub SetCookie
        document.cookie = "MyVar=101"
      End Sub

      Sub GotoNextPage
        location.href = "page2-2.htm"
      End Sub
    </SCRIPT>
    <BODY>
      <H2>Page 1 - Method 2</H2><HR>
      <INPUT TYPE=BUTTON VALUE="Set Cookie" onClick="SetCookie">
      <A HREF="" onClick="GotoNextPage">Go to Page 2</A>
    </BODY>

   </HTML>
   ******** End Page2-1.htm **********

   ******** Begin Page2-2.htm **********
   <HTML>

    <SCRIPT LANGUAGE="VBSCRIPT">
      Sub GetCookie
        MsgBox document.cookie
      End Sub
    </SCRIPT>
    <BODY>
      <H2>Page 2 - Method 2</H2><HR>
      <INPUT TYPE=BUTTON VALUE="Get Cookie" onClick="GetCookie">
    </BODY>

   </HTML>
   ******** End Page2-2.htm **********
				
Página2 - 1.htm:

  • O evento AoFazerClique do botão chama a subrotina SetCookie definido na parte superior do ficheiro.
  • A subrotina define o valor do cookie para a página actual.
  • A âncora "Ir para página 2" chama a subrotina GotoNextPage definido na parte superior da página.
  • A subrotina GotoNextPage navega para a página 2 definindo o HREF propriedade do objecto localização. Isto altera o que a página actual está a apontar para sem repor o cookie.
Página2 - 2.htm:

  • O evento AoFazerClique do botão chama a subrotina GetCookie definido na parte superior da página.
  • A subrotina lê o valor do cookie para demonstrar que a variável tenha sido definida.

Método 3 - utilizar frames e armazenar um valor a frame de nível superior

   ******** Begin Page3-1.htm **********
   <HTML>

    <SCRIPT LANGUAGE="VBSCRIPT">
      Dim MyVar
    </SCRIPT>

    <FRAMESET COLS="50%,50%">
      <FRAME SRC="page3-2.htm">
      <FRAME SRC="page3-3.htm">
    </FRAMESET>

   </HTML>
   ******** End Page3-1.htm **********

   ******** Begin Page3-2.htm **********
   <HTML>

    <SCRIPT LANGUAGE="VBSCRIPT">
      Sub SetVariable
        top.MyVar = 101
      End Sub
    </SCRIPT>
    <BODY>
      <H2>Page 1 - Method 3</H2><HR>
      <INPUT TYPE=BUTTON VALUE="Set Variable" onClick="SetVariable">
    </BODY>
   </HTML>
   ******** End PAGE3-2.HTM **********

   ******** Begin Page3-3.htm **********
   <HTML>

    <SCRIPT LANGUAGE="VBSCRIPT">
      Sub GetVariable
        MsgBox top.MyVar
      End Sub
    </SCRIPT>
    <BODY>
      <H2>Page 2 - Method 3</H2><HR>
      <INPUT TYPE=BUTTON VALUE="Get Variable" onClick="GetVariable">
    </BODY>

   </HTML>
   ******** End Page3-3.htm **********
				
Page3 - 1.htm:

  • Uma variável é definida. Uma vez que a variável é definida fora de qualquer subrotinas, é acessível a todos os pacotes subordinados.
Page3 - 2.htm:

  • O evento AoFazerClique do botão chama a subrotina Funções SetVariable definido na parte superior do ficheiro.
  • A subrotina define o valor da variável na frame mais. Isto é utilizando a variável TOP, que se refere à moldura de nível superior.
Page3 - 3.htm:

  • O evento AoFazerClique do botão chama a subrotina GetVariable definido na parte superior da página.
  • A subrotina lê o valor da variável na frame mais.

Referências

Para obter mais informações sobre como desenvolver soluções baseadas na Web para o Microsoft Internet Explorer, visite os seguintes Web sites da Microsoft:
http://msdn.microsoft.com/ie/ (http://msdn.microsoft.com/ie/)

http://support.microsoft.com/iep (http://support.microsoft.com/iep)

A informação contida neste artigo aplica-se a:
  • Visual Basic, Scripting Edition 2.0
  • Microsoft Visual Basic, Scripting Edition 1.1
Palavras-chave: 
kbmt kbfaq kbhowto kbscript KB157906 KbMtpt
Tradução automáticaTradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine translation ou MT), não tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática… erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 157906  (http://support.microsoft.com/kb/157906/en-us/ )
Artigo KB retiradoExclusão de Responsabilidade para Conteúdo sem Suporte na KB
Este artigo foi escrito sobre produtos para os quais a Microsoft já não fornece suporte. Por conseguinte, este artigo é oferecido "tal como está" e deixará de ser actualizado.
Partilhar
Opções de suporte adicionais
Fóruns de Suporte da Comunidade Microsoft
Contacte-nos directamente
Encontre um parceiro certificado Microsoft
Loja Microsoft