Shopping Hospedagem Fórum Contato
     
   O portal do desenvolvedor ASP Florianópolis-SC, Quarta-feira - 20 de Junho de 2018  
Busca

Menu do site
Efetuar Login
Usuário:

Senha:

 Esqueceu a senha?
Login automático

 Cadastre-se
ASP + FLASH - Capturando o conteúdo de um banco de dados
Avaliações: 43   -   Minha nota: Média Geral: 3  
Vamos neste artigo aprender a exibir o conteúdo de um banco de dados no Flash utilizando o ASP.

Os métodos utilizados no Flash para este exemplo são basicamente os mesmos do artigo anterior:
Relógio em ASP e Flash

O que muda neste exemplo é apenas o arquivo em Asp.
1º Passo

Abra o Macromedia Flash e clique em "File/New", como mostra a figura abaixo, para abrir um novo documento em branco.

2º Passo

Clique na ferramenta de Texto "A", em seguida clique no documento e digite a palavra texto, como mostra a figura abaixo.

3º Passo

Deixe o texto selecionado e, na barra de propriedades defina como "Dynamic Text" e nomeie a variavel para texto, como na figura abaixo.

4º Passo

Clique na área em branco do documento. Na barra "Actions" mude a janela para "Expert Mode", como mostra na figura abaixo.


5º Passo

Na janela do "Actions" digite o comando abaixo, como motra na figura.

loadVariables("Exemplo.asp?id=3", "", "POST");

6º Passo

Na linha de tempo, clique no Frame 5 e Pressione a tecla F5 para criar um Loop no documento.



Clique no menu em "File/Save As..." e salve o documento como "Exemplo.fla".

Para criar a animação em Flash, clique no menu em "File/Export Movie..." e salve como "Exemplo.swf" na mesma pasta em que o documento foi salvo.

7º passo

Abra seu editor de páginas ASP preferido, crie um novo arquivo ASP com o código abaixo e salve como "Exemplo.asp" na mesma pasta do arquivo "Exemplo.swf"

<%
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Data Source=c:\database.mdb;Provider=Microsoft.Jet.OLEDB.4.0;"

strQ = "SELECT * FROM cadastro"
Set objRS = objCon.Execute(strQ)
texto = objRS("nome")

objCon.Close
Set objCon = Nothing
Set objRS = Nothing

Response.Write "texto=" & texto
%>


Veja abaixo este exemplo com um layout diferente, editado no próprio Flash:

Capturando um determinado registro

No exemplo acima será capturado o primeiro registro encontrado na tabela, como podemos ver na imagem abaixo:




Mas eu posso informar através do Flash qual regitro eu quero exibir.

Vamos lembrar da intrução em Flash:

loadVariables("Exemplo.asp?id=3", "", "POST");

Veja que estou enviando uma variável (em negrito) chamada "id" junto com a chamado do arquivo Asp.

No exemplo em ASP acima não fazemos nenhuma referência a esta variável, mas poderiamos, para exibir neste caso o registro cujo id (no banco de dados) seja igual á 3.

Para tanto, bastariamos adicionar o conteúdo em negrito no exemplo em ASP:

<%
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Data Source=c:\database.mdb;Provider=Microsoft.Jet.OLEDB.4.0;"

strQ = "SELECT * FROM cadastro WHERE id=" & Request("id")
Set objRS = objCon.Execute(strQ)
texto = objRS("nome")

objCon.Close
Set objCon = Nothing
Set objRS = Nothing

Response.Write "texto=" & texto
%>

Neste caso o valor a ser exibido seria Rodrigo Mota



Espero que este exemplo lhe seja útil.

Fabiano Dias
fabiano@superasp.com.br

www.superasp.com.br
O portal do desenvolvedor ASP




SuperASP do Brasil Ltda

03.066.522/0001-84
Av. Rio Branco 433 - Centro - Florianopolis - SC
Contato

© 2001/2008 - Superasp do Brasil Ltda. Todos os direitos reservados