Jump to content


Photo

Flash & Asp


  • Faça o login para participar
1 reply to this topic

#1 carlosleitao

carlosleitao

    Novato no fórum

  • Usuários
  • 18 posts
  • Sexo:Não informado

Posted 20/11/2003, 13:33

Olá, galera...

Trabalho com ASP já faz algum tempo... comecei a estudar um pouco sobre a interação entre o Flash e o ASP, já consegui fazer coisas básicas como digitar uma palavra em um Forumulário no Flash e fazer uma busca no banco de dados Access e exibir no Flash, se a palavra pesquisada foi encontrada ou não...

O que eu estou querendo saber, é como fazer um loop dentro do flash, pra quando por exemplo eu fizer uma busca q me traga 10 registros do banco, exibir uma embaixo da outra, como se fosse uma tabela HTML, entendem ???

Se alguém souber, por favor ajude...

#2 Thyago Mendes

Thyago Mendes

    ActionScript

  • Usuários
  • 161 posts
  • Sexo:Não informado
  • Localidade:Recife - PE

Posted 22/11/2003, 13:45

Fiz um exemplo simples, primeiro crie um campo de texto dinâmico e outro imput, coloque as instâncias deles de "resultado_txt" e "busca_txt", crie um botão e instâncie de ok_btn, coloque as ações abaixo no frame correspondente:
resultado_txt.html=true
var obj_lv = new LoadVars()
ok_btn.onRelease=function(){
  obj_lv.nome = resultado_txt.text
  obj_lv.onLoad = function() {
	var dados = this.nomes.split(";"), string = ""
	for (var i = 0; i<dados.length-1; i++) string += dados[i]+"<br>"
	resultado_txt.htmlText = string
  }
  obj_lv.sendAndLoad("http://localhost/busca.asp", obj_lv)	
}

e no asp:
<%
Set Banco=Server.CreateObject("Adodb.Connection")
Banco.Open("Driver={Microsoft Access Driver (*.mdb)};DBQ="& Server.mapPath("banco.mdb"))
set sql = Banco.execute("select nomes from tb_nomes where nomes like '"&"%"&trim(Request.Form("nome"))&"%"&"' order by nomes")
nomes=""
while not sql.eof
  nomes = nomes&sql("nomes")&";"
  sql.movenext
wend
Banco.close()
set Banco=Nothing
response.Write("nomes="&nomes)
%>

Vou deixar o anexo usado para exemplo

Qualquer dúvida poste novamente

Attached Files






1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq