Risultati da 1 a 5 di 5

Discussione: aspdatabase

  1. #1
    Member
    Data Registrazione
    16-01-2006
    Messaggi
    54

    aspdatabase

    Scusate c'è qualcuno che mi può spiegare che se un database possiede diverse cartelle ed io sono interessato ad una in particolare dove devo mettere il nome della tabella cioè mi spiego
    il codice è questo

    Dsn= "Dsn=nomedeldatabase";
    Conn=Server.CreateObject("Adodb.Connection");
    // apertura del database
    Conn.Open(Dsn)
    // svolgimento delle operazioni
    // dopo le operazioni si chiude la connessione al database
    Conn.Close();

    questo database contien due cartelle utenti e area_riservata

  2. #2
    Software Zone Fanatic L'avatar di Capoccione
    Data Registrazione
    21-11-2001
    Località
    Roma
    Messaggi
    11.984
    Il codice che hai inserito serve unicamente a connettersi al database!
    Il puntare ad una tabella (e non cartella ) lo si fa utilizzando le query, tipo :

    Codice:
    SELECT * FROM UTENTI WHERE UTENTE = "PIPPO"

  3. #3
    Member
    Data Registrazione
    16-01-2006
    Messaggi
    54
    Scusate sono di nuovo io qualcuno sa com e posso tentare di risolvere quest'errore grazie anticipatamente
    Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
    Il driver ODBC non supporta le proprietà richieste.
    /carrello/t.asp, line 45

  4. #4
    Software Zone Fanatic L'avatar di Capoccione
    Data Registrazione
    21-11-2001
    Località
    Roma
    Messaggi
    11.984
    Da quello che scrivi non si può assolutamente dire niente, a meno che tu non inserisca il codice contenuto nella pagina t.asp

  5. #5
    Member
    Data Registrazione
    16-01-2006
    Messaggi
    54
    Ciao come richiesto t'invio il codice t.asp l' errore che mi dà e nella riga Rs.Open comm,,1,1


    <!--#include file="connessione.asp"-->

    <%' Per la registrazione di un nuovo utente elaboriamo i dati inseriti
    'campi atti per la registrazione ciè preleviamo username,password
    'tali dati verranno immessi poi nel db

    ' Dim Comm

    varUsername= Request.Form("Username")
    varPassword= Request.form("Password")

    '''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''
    '
    'Quello che si può notare e che per acquisire i dati per lavorarci
    ' viene utillizzato il comando Request.form(" ")Questo tipo di comando
    'serve appunto per estrapolare i dati nel form scritto dall'utente
    '
    'A questo punto dovrei aprire la connessione al database per immettere
    'i dati dell'utente.Tale connessione viene effettuata dal file esterno
    'connessione.asp.Si è preferito scrivere la connessione al db in un file
    'apparte di modo che possa essere incluso in tutti quei file che risulta
    'essere neccessario la connessione al db senza che la si va sempre a riscriverla
    'Dopo aver effettuata la connessione si procede con la verifica per controllare se esistono campi
    'se all'interno del db esistono dati simili a quelli immessi dall'utente se
    'tale ricerca ha esito negativo i dati vengono inseriti altrimenti l'utente
    'non viene registrato dando un messaggio d'errore
    '
    '''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''''''''''

    'fase di controllo per verificare se esiste un utente che abbi la stessa password
    'inizia la fase di test che mi da due risultati 0 oppure 1 a seconda se il test
    'effettuato riesce o meno se tale test viene superato viene efettuata la ricerca altrimenti
    'si ha messaggio d'errore
    'per prima cosa vediamo

    comm.ActiveConnection= con
    comm.CommandType= 1

    comm.CommandText ="select * from tbl_Clienti where Password='"&varPassword&"'"

    Rs.Open comm,,1,1
    if not(rs.eof) then

    ' se esiste utente con la stessa password il valore della varriabile intValido cambia
    'vale 1 se edsiste ,0 se non esiste.Inizzializzotale variabile assegno valore 1
    ' cioè che esiste
    '
    intValido = 1
    end if
    '<td colspan="5">
    '<%
    select case intValido
    case 0
    response.write "&nbsp;"
    case 1
    response.write "Nome utente gi in uso. Sceglierne nuovo."
    case 2
    response.write "Verificare i dati immessi."
    end select
    %>
    </td>

    <%


    set rs = nothing
    set comm = nothing
    set con = nothing

    if (intValido = 0 ) then


    'fase d'inserimento dati
    strSQL = "insert into tbl_Clienti(username, password) values('"&varUsername&"', '"&varpassword"')"
    Rs.Execute


    rs.close
    con.close

    set rs = nothing
    set comm = nothing
    set con = nothing

    %>

Segnalibri

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •