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

    Insert into da Flash/Asp nel Mdb ?[Flash/Asp]

    Buona sera,ho questo problemino,devo fare una Insert into da flash,aiutandomi con ASP,
    inserendo due valori dentro il DB DBUtente.mdb.
    Mi sto scervellando ma non ci riesco.
    Quello che ho è questo:
    Sulla Home page .swf ho due input text chiamate login e password, e un pulsante Invia.
    Nel pulsante invia ho questo script:
    on (release) {
    if(login==undefined & password==undefined or login=="" & password==""){
    login="Devi riempire i campi";
    password="Devi riempire i campi";
    }
    else{
    loadVariablesNum("LogPsw.asp",0,"POST");
    controllo.gotoAndStop(2);
    }
    }
    ______________________________
    Questa è la pagina ASP:

    <%
    'Variabili passate dal filmato Flash
    'Utilizzando il Replace facciamo in modo di sostituire il singolo apice
    'con il doppio apice per evitare che la stringa di inserimento dati_
    'nel Data Base generi un'errore

    login = Replace(request("login"),"'", "''")
    password = Replace(request("password"),"'", "''")

    ' Elimino gli spazi bianchi all'inizio e alla fine della stringa

    login=Trim(login)
    password=Trim(password)
    ' Verifico se login,password sono stringhe vuote

    if Len(login)=0 Or Len(password)=0 then
    Response.Write("att=Compilare Tutti i campi!&errore=si")

    Else

    StrConnessione="provider=microsoft.jet.oledb.4.0;d ata source=C:\inetpub\wwwroot\Antagonia\DBUtente.mdb"
    Set Conn = Server.CreateObject("ADODB.Connection")

    Conn.Open StrConnessione

    'Creo la stringa SQL per inserire i dati nella tabella
    SQL = "insert into tbLogPsw (login,[password])"
    SQL = SQL & " values ('" & login & "','" & password & "')"


    Conn.execute SQL

    Conn.Close
    set Conn=nothing

    End If
    %>
    ____________________________
    Il DB DBUtente.mdb ha una tabella chiamata tbLogPsw cosi composta:
    (PK)id_utente---->contatore
    login--->testo
    password--->testo

    Tutto quà.
    Mi date una mano per favore?E' importante grazie a tutti...

  2. #2
    ascolta,per quello avevo già risolto,però adesso vorrei realizzare un controllo che mi permettesse di controllare se all'atto della registrazione,sia la login che la password sia già presenti all'interno del mio MDB.
    Ho fatto alcune prove ma non ci riesco,ti posto quello che ho in ASP:

    <%
    dim login
    dim password

    login=Trim(login)
    password=Trim(password)
    Response.Write(login & " " & password)
    Const adOpenKeyset = 1
    Const adLockReadOnly = 1

    StrConnessione="provider=microsoft.jet.oledb.4.0;d ata source=C:\inetpub\wwwroot\Antagonia\DBUtente.mdb"
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open StrConnessione

    SQL = "SELECT * FROM tbLogPsw where login ='" & login & "' and password='" & password & "'" 'order by tbLogPsw.id_utente desc"
    Set rs = Server.CreateObject("ADODB.RecordSet")
    rs.Open SQL, Conn, adOpenKeyset,adLockReadOnly

    if (login="" or password="")then
    Response.Write("Devi riempire i campi")

    elseif (login=rs.Fields("login") and password=rs.Fields("password")) then Response.Write("Bentornato")

    elseif (login<>trim(rs.Fields("login")) and password<>trim(rs.Fields("password"))) then Response.Write("Devi Registrarti")

    end if

    rs.close
    set rs=nothing
    Conn.Close
    set Conn=nothing

    questo è quello che ho,però il controllo N°2

    elseif (login=rs.Fields("login") and password=rs.Fields("password")) then Response.Write("Bentornato")

    non funziona mi sapresti dire gentilmente perchè?

    Grazie mille

  3. #3
    dal momento che la query la fai filtrando i record che hanno login e password uguali alle variabili che passi il terzo elseif è inutile in quanto non si potrà mai verificare, prova a fare così.
    Se devi caricare il risultato della query in flash devi modificare i vari respone.write.

    codice:
    if (login="" or password="")then 
    Response.Write("Devi riempire i campi") 
    else
    SQL = "SELECT * FROM tbLogPsw where login ='" & login & "' and password='" & password & "'" 'order by tbLogPsw.id_utente desc" 
    Set rs = Server.CreateObject("ADODB.RecordSet") 
    rs.Open SQL, Conn, adOpenKeyset,adLockReadOnly
    if rs.EOF then
    Response.Write("Devi Registrarti")
    else
    Response.Write("Bentornato")
    end if
    end if
    "...non è detto che sia tardi se non guardi che ora è..."

  4. #4
    Ti vorrei chiedere come fare per far apparire il messaggio da Asp a Flash,mi spiego.

    Faccio il controllo in Asp (giusto?) però il sito è in flash(giusto?)
    come posso all'atto dell'inserimento della login e password, rimandare un eventuale errore da Asp a Flash?

    Spero di essermi spiegato bene..
    Ciao ciao e grazie

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.