Visualizzazione dei risultati da 1 a 2 su 2
  1. #1
    Utente di HTML.it
    Registrato dal
    Sep 2013
    Messaggi
    8

    Update tabella db con Asp

    Salve,
    sto cominciando adesso a muovere i primi passi con ASP, mentre con SQL sto a poco a poco rispolverando quello che ben sapevo oltre dieci anni fa.
    Il problema è il seguente:
    Ho una tabella generata con Access di nome Visit contenente un campo id (contatore) e un campo vcount, dove vado a incrementare il numero di visitatori della home page.
    Questo il codice:

    <%
    Set Conn = Server.CreateObject("ADODB.Connection")
    strConn="DRIVER={Microsoft Access Driver (*.mdb)};" & "DBQ=" & Server.Mappath("mdb-database/visit.mdb")
    strConn=strConn & ";pwd=pippo"
    Conn.Open strConn


    sql = "UPDATE visit SET vcount = vcount + 1 WHERE id=1"

    //sql = "SELECT * FROM visit" se metto questa anziché la precedente, non dà errore

    Set rs = Server.CreateObject("ADODB.Recordset")
    rs.Open sql, conn ,3,3
    rs.update
    rs.Close

    set rs = Nothing
    conn.Close
    set conn = Nothing
    %>

    L'errore che dà è "Operation is not allowed when the object is closed", ma non lo dà se anziché la query con UPDATE gli passo quella (qui commentata) con SELECT.

    Grazie

  2. #2
    Utente di HTML.it
    Registrato dal
    Sep 2013
    Messaggi
    8

    Problema risolto, ma ne spunta un altro

    Ho risolto parzialmente, ma ho un diverso problema:

    PAGINA 1 (test.asp):

    <%
    Set Conn = Server.CreateObject("ADODB.Connection")
    strConn="DRIVER={Microsoft Access Driver (*.mdb)};" & "DBQ=" & Server.Mappath("mdb-database/visit.mdb")
    strConn=strConn & ";pwd=pippo"
    Conn.Open strConn
    Conn.execute ("UPDATE visit SET vcount = vcount + 1 WHERE id=1")
    Conn.Close
    set Conn = Nothing
    %>

    PAGINA 2 (visit.asp)

    <%
    Set Conn = Server.CreateObject("ADODB.Connection")
    strConn="DRIVER={Microsoft Access Driver (*.mdb)};" & "DBQ=" & Server.Mappath("mdb-database/visit.mdb")
    strConn=strConn & ";pwd=pippo"
    Conn.Open strConn


    sql = "SELECT * FROM visit"
    Set rs = Server.CreateObject("ADODB.Recordset")
    rs.Open sql, Conn ,3,3
    %>

    Numero visitatori: <% Response.Write(rs("vcount"))
    rs.Close
    set rs = Nothing
    Conn.Close
    set Conn = Nothing
    %>

    Quando chiamo TEST.ASP mi fa regolarmente l'UPDATE, ma quando chiamo VISIT.ASP mi dà errore sulla linea "Conn.Open strConn", come se la connessione non venisse chiusa nella pagina precedente

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.