Visualizzazione dei risultati da 1 a 6 su 6
  1. #1

    asp e flash: problema ricezione

    questo è l'asp
    codice:
    <%
    username = request("username")
    nome = request("nome")
    cognome = request("cognome")
    cognome = Replace(cognome,"'","'")
    email = request("email")
    password = request("password")
    amico = request("amico")
    amico = Replace(amico,"'","'")
    
    
    set conn= Server.CreateObject("ADODB.Connection") 
    strConn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source=" &_ 
    Server.MapPath("../mdb-database/pb.mdb") 
    conn.Open strConn 
    set rs = Server.CreateObject("ADODB.Recordset") 
    
    Sql = "SELECT * FROM Utenti WHERE username = '" & Username & "' " 
    rs.Open Sql, conn,3,3 
    
    'verifico che non vi sia lo stesso nome&password 
    If rs.eof then 
     
    sql1 = "INSERT INTO utenti ([Username], [Nome], [Cognome], [email], [password],[autenticato] )  VALUES('" & username & "', '" & nome & "', '" & cognome & "', '" & email & "', '" & password & "', False)"
    Conn.Execute(sql1)
    conn.close
    set conn = nothing
    
    msg = "Nome: " & nome & vbCrLf & "Cognome: " & cognome & vbCrLf & "Username: " & username & vbCrLf & "Amico: " & amico
    
    
    Set link = CreateObject("CDONTS.Newmail")
    link.From = email
    link.To = "davide@piccolobill.com"
    link.Subject = "Nuova iscrizione da autenticare su piccolobill.amico"
    link.Body = msg
    link.Send
    Set link = Nothing
    
    response.Write "&out=Iscrizione avvenuta con successo. Grazie. Ora dovai aspettare l'attivazione del tuo account da parte di piccolobill, entro 24/48 ore. Grazie."
    
    else
    response.Write "&out=Nome utente già esistente"
    end if
    %>

    le variabili le invia. infatti lo script funge. ma in flash non mi carica il response.write. so che devo mettere un gotoandplay hce mi rimanda al frame precedente.

    io ho un tasto

    è nel release oltre al loadvariablenum ho qusto

    _this.parent.gotoAndPlay(39); ma credo che sia errato. il frame in cui si trova il tasto è il 40.

    come devo impostare il tutto?

    grazie

  2. #2
    Utente di HTML.it
    Registrato dal
    Sep 2003
    Messaggi
    454
    per caricare variabili non usare loadVariables ma loadVars

    a = new LoadVars();
    a.load("pagina.asp");
    a.onLoad = function () {
    trace(a.out);
    }

  3. #3
    così i dati non me li invia proprio.
    il problema è solo nel ricever i dati dall'asp, dopo l'invio. cioè il response.write dell'asp. in un altro filmato avevo fatto il gotoandplay. ma qui non funge. forse sono io che sbaglio ad impostarlo. AIUTATEMI!!!! VI PREGO!!!!!!!

  4. #4
    Utente di HTML.it
    Registrato dal
    Jan 2003
    Messaggi
    2,008
    <%
    username = request.form("username")
    username = Replace(username,"'","''")
    nome = request.form("nome")
    nome = Replace(nome,"'","''")
    cognome = request.form("cognome")
    cognome = Replace(cognome,"'","''")
    email = request("email")
    email = Replace(email,"'","''")
    password = request.form("password")
    password = Replace(password,"'","''")
    amico = request.form("amico")
    amico = Replace(amico,"'","''")


    set conn= Server.CreateObject("ADODB.Connection")
    strConn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source=" &_
    Server.MapPath("../mdb-database/pb.mdb")
    conn.Open strConn
    set rs = Server.CreateObject("ADODB.Recordset")

    Sql = "SELECT * FROM Utenti WHERE username LIKE '" & username & "' "
    rs.Open Sql, conn,3,3

    'verifico che non vi sia lo stesso nome&password
    If rs.eof then

    sql1 = "INSERT INTO utenti (username, nome, cognome, email, password,autenticato ) VALUES('" & username & "', '" & nome & "', '" & cognome & "', '" & email & "', '" & password & "', False)"
    Conn.Execute(sql1)
    conn.close
    set conn = nothing

    msg = "Nome: " & nome & vbCrLf & "Cognome: " & cognome & vbCrLf & "Username: " & username & vbCrLf & "Amico: " & amico


    Set link = CreateObject("CDONTS.Newmail")
    link.From = email
    link.To = "davide@piccolobill.com"
    link.Subject = "Nuova iscrizione da autenticare su piccolobill.amico"
    link.Body = msg
    link.Send
    Set link = Nothing

    response.Write "&out=Iscrizione avvenuta con successo. Grazie. Ora dovai aspettare l'attivazione del tuo account da parte di piccolobill, entro 24/48 ore. Grazie."

    else
    response.Write "&out=Nome utente già esistente"
    end if
    %>

    La correzione supone l' utilizzo del metodo POST per l' invio delle variabili se invece utilizzi il metotdo GET devi sostituire request.form con request.QueryString.

  5. #5
    ma i dati flash me li invia. infatti funziona lo script. è solo che non mi da in uscita il response.write che poi lo deve leggere da flash. ora provo comunque a sostituire lo script con questo di sotto. ciao

  6. #6
    niente con quello non mi esegue neanche l'insert. il problema è in flash, credo

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 © 2025 vBulletin Solutions, Inc. All rights reserved.