Hola,
te dejo este c�digo que he hecho para guardar una
info de un formulario en una bbdd .mdb a ver si te sirve:
Parte de Asp:
==============
<%
'
option explicit
dim nombre 'nombre
dim apellidos 'apellidos
dim direccion 'direccion
dim emilio 'e-milio
dim telefono 'fono
dim poblacion 'poblacion
dim cp 'codigo postal
dim contador
dim sql
dim oConn
dim rs
dim oConn2
dim rs2
dim krak
nombre = Request.Form("nombre")
apellidos = Request.Form("apellidos")
direccion = Request.Form("direccion")
emilio = Request.Form("emilio")
poblacion = Request.Form("poblacion")
cp = Request.Form("cp")
telefono = Request.Form("telefono")
' filtras comillas simples
nombre = replace (nombre,"'"," ")
apellidos = replace (apellidos,"'"," ")
direccion = replace (direccion,"'"," ")
emilio = replace (emilio,"'"," ")
poblacion = replace (poblacion,"'"," ")
cp = replace (cp,"'"," ")
telefono = replace (telefono,"'"," ")
if emilio<>"" then
' check if email es repetido, and if es repetido entonces a tomar..
Set oConn2 = Server.CreateObject("ADODB.Connection")
oConn2.Open("tu_bbdd")
SET rs2 = server.CreateObject ("ADODB.recordset")
sql = "SELECT COUNT(id) FROM emails where emilio='" & emilio & "'"
rs2.Open sql,oConn2
' �cuantos registros tenemos?
contador=rs2(0)
if contador>0 then
Response.Write "hecho=Dupli"
Response.end
end if
end if
' formar sql
sql = "INSERT INTO emails (nombre,apellidos,direccion,emilio,poblacion,cp,telefono)"
sql = sql & " VALUES ('" & nombre & "','" & apellidos & "','"& direccion & "','" & emilio & "','" & poblacion & "','" & cp & "','" & telefono & "')"
' check
krak = false ' fallo gordo
if nombre = "" OR apellidos="" or direccion="" or emilio="" or poblacion="" or cp="" or telefono="" then
Response.Write "hecho=No"
Response.End
end if
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("tu_bbdd")
set rs = oConn.Execute(sql)
Response.Write "hecho=Si"
%>
============================================================
sobre todo presta la atenci�n a la parte donde >Asp comunica con Flash.
Response.Write "hecho=Dupli"
Response.Write "hecho=No"
Response.Write "hecho=Si"
Con eso paso las variables a swf.
Parte de Flash
===============
frame1://llamada al script asp
------------------------------
loadVariablesNum ("scripts/insert.asp", 1, "POST");
frame2://comprobaci�n
------------------------------
if(hecho != "")
{
if (hecho == "Si")
{
this.gotoAndPlay ("inicio");
}
if (hecho == "Dupli")
{
this.gotoAndStop ("dupli");
}
if (hecho == "No")
{
this.gotoAndStop ("error");
}
}
Seg�n la variable que recibo despues de procesar el asp, mando
la pel�cula al rotulo correspodiente (inicio, dupli y error).
frame3:loop
-----------
gotoAndPlay ("comprueba");
hago un loop al r�tulo load que en este caso ser�a el frame 2.
Bueno, espero que lo vas a solucionar con eso.
salu2
