Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 15

Discussione: Array bidimensionali

  1. #1

    Array bidimensionali

    Ho un problema con gli Array bidimensionali il testo è il seguente:

    codice:
    <%
    Dim dbc  ' as ADODB.Connection
    Dim rsQuery  'as ADOD.Recordset
    Dim strSQLAzienda
    Dim strArray(4,3)
    
    strArray(0,1) = ("Massimo")
    strArray(1,1) = ("Aldo")
    strArray(2,1) = ("Flavio")
    
    Const adOpenKeyset = 1
    Const adLockOptimistic = 3
    
    Set dbc = Server.CreateObject("ADODB.Connection")
    dbc.ConnectionString = "Provider= Microsoft.Jet.OLEDB.4.0;"_
     & "Data Source=c:\Inetpub\wwwroot\crm.mdb"
    dbc.Open
    
    Set rsQuery = Server.CreateObject("ADODB.Recordset")
    strSQLAzienda = "SELECT * FROM tbl_feedback WHERE tbl_feedbackid ='Massimo';"
    rsQuery.Open strSQLAzienda, dbc, adOpenKeyset, adLockOptimistic
    
    rsQuery("Nome")= "Gianni"
    rsQuery.Update
    rsQuery.Close
    dbc.Close
    %>
    mi da come errore:

    Tipo di errore:
    Microsoft JET Database Engine (0x80040E10)
    Nessun valore specificato per alcuni parametri necessari.
    /cambio nome.asp, line 21


    La mia tabella è di Access, tbl_feedbackid è un numero che identifica il nome

    la tabella ha questo aspetto ( metto i - al posto degli spazi )

    ID----------Nome--------Email--------Commenti
    1----------Massimo-------//------------//
    2----------Aldo-----------//----------- //
    3----------Flavio----------//-----------//

    Qualcuno sa dirmi se c'è qualcosa di sbagliato nel settare gli array?
    Perpetual Ribellion With Absolutely No Cause

  2. #2
    perché incolpare gli array quando il problema ti viene dato dal db?

    strSQLAzienda = "SELECT * FROM tbl_feedback WHERE tbl_feedbackid ='Massimo';"


    è giusta?
    tbl_feedbackid esiste?
    tbl_feedbackid è una stringa?

  3. #3
    Utente di HTML.it
    Registrato dal
    Sep 2008
    Messaggi
    55
    Se
    tbl_feedbackid è un numero che identifica il nome
    perchè
    tbl_feedbackid ='Massimo'
    ?

    nella tabella che hai riportato tbl_feedbackid non c'è.

    prova a cambiare da
    codice:
    strSQLAzienda = "SELECT * FROM tbl_feedback WHERE tbl_feedbackid ='Massimo';"
    a
    codice:
    strSQLAzienda = "SELECT * FROM tbl_feedback WHERE nome = '"Massimo"'"

  4. #4
    Ok adesso l'ho impostato come:

    strSQLAzienda = "SELECT * FROM tbl_feedback WHERE Nome ='Massimo';"

    Cambia l'errore:

    Tipo di errore:
    ADODB.Recordset (0x800A0CB3)
    Il set di record corrente non supporta l'aggiornamento. Potrebbe trattarsi di una limitazione del provider o del tipo di blocco selezionato.
    /cambio nome.asp, line 23

    La linea 23 corrisponde a:

    rsQuery("Nome")= "Gianni"

    Sul manuale per aggiornare il nome è indicato quel metodo, che sia errato?
    se per blocco si intende i valori di cursor e lock type ho già provato a dare pieni permessi di modifica.
    Perpetual Ribellion With Absolutely No Cause

  5. #5
    Utente di HTML.it
    Registrato dal
    Sep 2008
    Messaggi
    55
    non è che mi sbagli la sintassi?

    prova così

    codice:
    nome1 = "Massimo"
    strSQLAzienda = "SELECT * FROM tbl_feedback WHERE Nome = nome1"
    ti da ancora errore?

  6. #6
    Originariamente inviato da gleoho
    non è che mi sbagli la sintassi?

    prova così

    codice:
    nome1 = "Massimo"
    strSQLAzienda = "SELECT * FROM tbl_feedback WHERE Nome = nome1"
    ti da ancora errore?
    leo, sta' attento...

    strSQLAzienda = "SELECT * FROM tbl_feedback WHERE Nome = '" & nome1 & "'"

  7. #7
    codice:
    <%
    Dim dbc  ' as ADODB.Connection
    Dim rsQuery  'as ADOD.Recordset
    Dim strSQLAzienda
    Dim strArray(4,3)
    
    strArray(0,1) = ("Massimo")
    strArray(1,1) = ("Aldo")
    strArray(2,1) = ("Flavio")
    
    Const adOpenKeyset = 1
    Const adLockOptimistic = 3
    
    Set dbc = Server.CreateObject("ADODB.Connection")
    dbc.ConnectionString = "Provider= Microsoft.Jet.OLEDB.4.0;"_
     & "Data Source=c:\Inetpub\wwwroot\crm.mdb"
    dbc.Open
    
    Set rsQuery = Server.CreateObject("ADODB.Recordset")
    nome1 = "Massimo" 
    strSQLAzienda = "SELECT * FROM tbl_feedback WHERE Nome = nome1"
    rsQuery.Open strSQLAzienda, dbc, adOpenKeyset, adLockOptimistic
    
    rsQuery("Nome")= "Gianni"
    rsQuery.Update
    rsQuery.Close
    dbc.Close
    %>
    mi da:

    Tipo di errore:
    Microsoft JET Database Engine (0x80040E10)
    Nessun valore specificato per alcuni parametri necessari.
    /cambio nome.asp, line 22


    ..ossia come all'inizio
    Perpetual Ribellion With Absolutely No Cause

  8. #8
    Ho provato anche con:

    strSQLAzienda = "SELECT * FROM tbl_feedback WHERE Nome = '" & nome1 & "'"

    e ci risiamo con:

    Tipo di errore:
    ADODB.Recordset (0x800A0CB3)
    Il set di record corrente non supporta l'aggiornamento. Potrebbe trattarsi di una limitazione del provider o del tipo di blocco selezionato.
    /cambio nome.asp, line 24

    Ossia:

    rsQuery("Nome")= "Gianni"
    Perpetual Ribellion With Absolutely No Cause

  9. #9
    fa' una UPDATE classica via SQL

  10. #10
    Utente di HTML.it
    Registrato dal
    Sep 2008
    Messaggi
    55
    Originariamente inviato da optime
    fa' una UPDATE classica via SQL
    quoto!

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.