Visualizzazione dei risultati da 1 a 5 su 5
  1. #1
    Utente di HTML.it
    Registrato dal
    Jun 2002
    Messaggi
    585

    Update record db con objRS.Update

    Ciao a Tutti,
    vorrei fare l' upload di un campo in un record di un database.
    Con la seguente sintassi digito il valore di Commessa da cambiare, digito il record che voglio uploadare,
    ma quando faccio il submit del form mi da' il seguente errore: "Necessario Oggetto".
    Il bello e' che quando aggiorno la pagina il valore me lo ha cambiato

    <%@ Language=VBScript %>
    <%
    Option Explicit
    Dim my_count2, objConn, objRS
    my_count2 = Request.Form("numero_mod")
    '
    Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.ConnectionString = "DSN=proj05.dsn"
    objConn.Open
    '
    Set objRS = Server.CreateObject("ADODB.Recordset")
    objRS.Open "t_proj", objConn, , 3, 2
    '
    Do While Not objRS.EOF
    If (StrComp(objRS("Numero"), my_count2, 1) = 0) Then
    objRS("Commessa") = Request.Form("commessa_mod")
    objRS.Update
    objRS.Close
    Set objRS = Nothing
    Else
    objRS.MoveNext
    End If
    Loop
    '
    objConn.Close
    Set objConn = Nothing
    %>

  2. #2
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    codice:
    Do While Not objRS.EOF 
    If (StrComp(objRS("Numero"), my_count2, 1) = 0) Then 
    objRS("Commessa") = Request.Form("commessa_mod") 
    objRS.Update 
    End if 
    objRS.MoveNext 
    Loop 
    objRS.Close 
    Set objRS = Nothing
    Roby

  3. #3
    Problema analogo cioè

    set objconn=server.CreateObject("ADODB.connection")
    objconn.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("mdb-database/regolamento.mdb")
    set objrs=server.CreateObject("ADODB.recordset")
    objrs.open "SELECT * FROM Squadre2005 WHERE categoria='S' ",objconn,3,3
    dim conta
    conta= 1
    Do While Not objRS.EOF
    objrs("numero")=conta
    conta=conta+1
    objRS.Update
    objRS.MoveNext
    Loop
    objRS.Close
    Set objRS = Nothing

    Risultato:
    Informazioni tecniche (per il personale del supporto tecnico)

    Tipo di errore:
    Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
    [Microsoft][Driver ODBC Microsoft Access] Impossibile aggiornare. Database o oggetto di sola lettura.
    /spazi_web/trofeobozzetti2005/provacanc.asp, line 32


    Sono con IIS 5. Grazie

  4. #4

  5. #5
    Utente di HTML.it
    Registrato dal
    Jun 2002
    Messaggi
    585
    Roby_72,
    ti ringrazio tantissimo perche' ho provato e funziona tutto !!!!
    Grazie ancora !!

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