Para
fazer o acesso ao banco de dados em Flash, é preciso passar o conteúdo
das variáveis do seu movie através de querystring (método GET).
Por exemplo:
Suponha que você tem um formulário que será submetido através de um botão.
A
lógica no botão no flash, então será:
On
(Press)
Load Variables ("variaveis.asp",
"", vars=POST)
End On |
No
variáveis.asp temos:
<%
'declaração das variáveis
Dim PStrSql
Dim PConn
Dim StrCnn
Dim PRecSet
'criação da conexão com a base de dados
Set PConn= Server.CreateObject("ADODB.Connection")
Set PRecSet = Server.CreateObject("ADODB.RecordSet")
PConn.CommandTimeout = 30
PConn.ConnectionTimeout = 15
strCnn = "driver={SQL Server};server=servidor;uid=usuario;pwd=senha"
PConn.Open strCnn
'sql de selecão de registros
PStrSql = "SELECT * FROM CLIENTE "
Set PRecSet = PConn.execute(PStrSql)
If Not PRecSet.EOF Then
Response.Write("Nome=" & PRecSet("NOME"))
End If
%> |
Com
isso, temos a impressão de nome=algum_nome_qualquer. Caso fosse necessário
o resgate de mais variáveis, bastaria concatená-las com o sinal &.
Exemplo:
| Response.Write("Nome="
& PRecSet("NOME")&"Endereco="& PRecSet("Endereco")) |
Com
o Flash, receba as variáveis com o action LoadVariables :
| Load
Variables ("variaveis.asp", "", vars=POST) |
Para escrever o valor das variáveis no movie, basta ter um textfield com
o mesmo nome da variável.
|
