Visualizzazione dei risultati da 1 a 2 su 2
  1. #1
    Utente di HTML.it
    Registrato dal
    Nov 2003
    Messaggi
    170

    inserimento dati in db access

    ciao ragazzi
    ho questo problema: ho creato un form in flash (visibile a questo indirizzo: ruotadeltempo ) che deve registrare l'utente e inviare i dati ad un db access.
    (per inciso: se lo testate, non c'è attualmente alcun controllo di validità sui dati, tipo l'email)
    questo è lo script:
    /****************/
    function resetData(){
    nome.text="";
    cognome.text="";
    email.text="";
    cbox.selected=false;
    }
    //CREO IL LISTENER PER IL RESET
    var cancObj:Object=new Object();
    cancObj.click=function(evt:Object){
    resetData();
    }
    reset.addEventListener("click", cancObj);

    //CREO IL LISTENER PER INVIARE I DATI
    var submitObj:Object=new Object();
    submitObj.click=function(evt:Object){
    //aggiungere controlli per la validazione dei dati: tutti i campi obbligatori
    if (nome.text.length == 0) {
    Selection.setFocus(nome);
    Alert.show("Immettere un nome valido.", "Errore", Alert.OK);
    return false;
    }

    var dati:LoadVars=new LoadVars();
    dati.nome=nome.text;
    dati.cognome=cognome.text;
    dati.email=email.text;

    dati.onLoad=function(success){
    if(success){
    Alert.show("Dati inviati con successo!", "OK", Alert.OK);
    resetData();
    }
    else{
    trace(dati);
    Alert.show("Impossibile inviare dati.", "ERRORE", Alert.OK);
    }
    }
    dati.sendAndLoad("http://www.ruotadeltempo.com/process.asp", dati, "POST");
    }
    invia.addEventListener("click", submitObj);
    /****************/
    e questo è il codice asp:
    <%
    Dim nome
    Dim cognome
    Dim mail
    nome = Replace(Request.Form("nome"), "'", "''")
    cognome = Replace(Request.Form("cognome"), "'", "''")
    mail = Request.Form("email")

    Set cn = Server.CreateObject("ADODB.Connection")
    cn.Open "driver={Microsoft Access Driver (*.mdb)};" & "dbq="&Server.MapPath("../db/archivio.mdb")
    Dim sql
    sql = "INSERT INTO utenti (Nome,Cognome,Mail) VALUES ('"&nome&"','"&cognome&"','"&mail&"')"
    cn.Execute(sql)
    'response.write(cn.Execute(sql))
    cn.Close
    Set cn = Nothing
    %>

    ora, in locale aggiorna il db ma mi ritorna un errore (il success della funzione onLoad evidentemente e' falso)
    in rete, solo errore...
    dove sbaglio???
    grazie e ciao

  2. #2
    Utente di HTML.it L'avatar di Veronica80
    Registrato dal
    May 2006
    Messaggi
    2,117
    Non vorrei dire scemenze...ma in flash non si usa l'& per le variabili nelle stringhe mail +...

    esempio

    Codice PHP:
    miaVar='Veronica';
    sql="INSERT INTO miaTab (nome) VALUES ('"+miaVar+"')"

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.