Visualizzazione dei risultati da 1 a 8 su 8

Discussione: Problema Cancellazione

  1. #1
    Utente bannato
    Registrato dal
    Jun 2004
    Messaggi
    419

    Problema Cancellazione

    SALVE ho questo script:
    <%
    Dim Conn
    Set Conn=Server.CreateObject("ADODB.Connection")
    Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.Mappath("/mdb-database/UTENTI.mdb")

    Username=Request.Form(Recordset1.Fields.Item("Somm aDicrediti").Value)

    SQL = "DELETE INTO UTENTIISCRITTI(SommaDicrediti)"

    SQL = SQL&"VALUES('"&Username&"')"
    Conn.Execute(SQL)
    %>

    perche' di quella query contenuta in utenti.mdb non cancella il valore
    sommadicrediti?
    mi scrive:
    Request object error 'ASP 0105 : 80004005'

    Index out of range

    /CANCELLACREDITI.asp, line 29

    An array index is out of range.

  2. #2
    codice:
    Username=Request.Form(Recordset1.Fields.Item("SommaDicrediti").Value) 
    
    SQL = "DELETE FROM UTENTIISCRITTI where username = Username"
    P.S.:Compra un buon manuale di SQL, perchè ne hai bisogno.
    Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!

  3. #3
    Utente bannato
    Registrato dal
    Jun 2004
    Messaggi
    419
    <%
    Dim Conn
    Set Conn=Server.CreateObject("ADODB.Connection")
    Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.Mappath("/mdb-database/UTENTI.mdb")

    Username=(Recordset1.Fields.Item("SommaDicrediti") .Value)

    SQL = "DELETE FROM UTENTIISCRITTI where username = Username"
    SQL = SQL&"VALUES('"&Username&"')"
    Conn.Execute(SQL) linea 33
    %>

    Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

    [Microsoft][ODBC Microsoft Access Driver] Undefined function 'UsernameVALUES' in expression.

    /CANCELLACREDITI.asp, line 33
    perche?grazie

  4. #4
    metti uno spazio dopo username o prima di values o la stringa verrà scritta attaccata e quindi incomprensibile.

  5. #5
    Così:

    codice:
    Username = (Recordset1.Fields.Item("SommaDicrediti").Value) 
    
    SQL = "DELETE FROM UTENTIISCRITTI where username = '" & Username & "'"
    Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!

  6. #6
    Utente bannato
    Registrato dal
    Jun 2004
    Messaggi
    419
    <%
    Dim Conn
    Set Conn=Server.CreateObject("ADODB.Connection")
    Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.Mappath("/marinodiprinzio/mdb-database/UTENTI.mdb")

    Username = (Recordset1.Fields.Item("SommaDicrediti").Value)

    SQL = "DELETE FROM UTENTIISCRITTI where username = '" & Username & "'"
    SQL = SQL& "VALUES ('"&srtUsername&"')"
    Conn.Execute(SQL)
    %>

    Tipo di errore:
    Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
    [Microsoft][Driver ODBC Microsoft Access] Syntax error (missing operator) in query expression 'username = '150'VALUES ('')'.
    /marinodiprinzio/TMP7ztcu81ejs.asp, line 33
    perche mio vede il valore ma non lo cancella?

  7. #7
    Utente bannato
    Registrato dal
    Jun 2004
    Messaggi
    419
    scusatemi le ultime righe sono cosi:
    SQL = "DELETE FROM UTENTIISCRITTI where username = '" & Username & "'"
    SQL = SQL& "VALUES ('"&Username&"')"
    Conn.Execute(SQL)

  8. #8
    Questo si:
    codice:
    <%
    Dim Conn
    Set Conn=Server.CreateObject("ADODB.Connection")
    Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.Mappath("/marinodiprinzio/mdb-database/UTENTI.mdb")
    
    Username = (Recordset1.Fields.Item("SommaDicrediti").Value) 
    
    SQL = "DELETE FROM UTENTIISCRITTI where username = '" & Username & "'"
    Questo no:
    codice:
    SQL = SQL& "VALUES ('"&srtUsername&"')"
    Conn.Execute(SQL)
    %>
    La delete non concepisce la clausola VALUES.

    P.S.:Torno a ribadire, hai le idee un po' confuse, compra un buon manuale di SQL e studiaci su.

    P.P.S.:Esegui il codice senza la parte indicata sotto la dicitura "Questa no" e vedrai che la cancellazione andrà a buon fine (salvo altri problemi, legati a permessi sulle cartelle o che so io).
    Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!

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.