• User Attivo

    [ASP] error '800a0cc1'

    Ciao a tutti,
    purtroppo non riesco a far visualizzare una query elementare.

    Mi spiego meglio, ho una tabella di 10 campi, in una pagina vorrei che si visualizzassero solo 6.
    <%@LANGUAGE="VBSCRIPT"%>
    <!--#include file="conn.asp" -->
    <%
    Response.Expires = -1000 'Makes the browser not cache this page
    Response.Buffer = True 'Buffers the content so our Response.Redirect will work

    If Session("UserLoggedIn") <> "true" Then
    Response.Redirect("index.asp")
    End If
    %>

    <%
    if request("link")="1" then
    username=request("username")
    Password=request("Password")
    profilo=request("profilo")
    account=request("account")
    indirizzo=request("indirizzo")
    citta=request("citta")
    filiale=request("filiale")
    telefono=request("telefono")
    account=replace(account,"'","''")
    indirizzo=replace(indirizzo,"'","''")
    citta=replace(citta,"'","''")
    Sqlins = "insert into tabella1(username, Password, profilo, account, indirizzo, citta, filiale, telefono) values ('"&username&"','"&Password&"', '"&profilo&"', '"&account&"','"& indirizzo&"', '"&citta&"', '"&filiale&"', '"&telefono&"')"
    set rsins=conn.execute(Sqlins)
    end if
    %>

    <%
    data = date()
    Sql1 = "SELECT account FROM tabella1 order by account"
    set rs1=conn.execute(Sql1)
    %>
    ............
    <% do while not rs1.eof %>
    <% response.write ("<a href=cancella.asp?id="&rs1("id")&">"&rs1("account")&"</a>" )%>
    ....
    ....
    <% rs1.movenext
    loop
    %>

    ......
    Form di inserimento di un nuovo account.

    L'errore che mi dà è:
    ADODB.Recordset error '800a0cc1'
    Item cannot be found in the collection corresponding to the requested name or ordinal.
    /almasdb/adm/carica.asp, line 4915 --> ovvero <% response.write ("<a href=cancella.asp?id="&rs1("id")&">"&rs1("account")&"</a>" )%>

    Grazie per l'aiuto.


  • Moderatore
    
    Sql1 = "SELECT id, account FROM tabella1 order by account" 
    
    

  • User Attivo

    Ciao Legolas scusa il ritardo della mia risposta.
    La tua idea l'ho provata subito ma cmq non funziona.

    In effetti non mi sono spiegato bene, ci riprovo sperando di essere più chiaro.
    La tabella1 contiene 18 campi di cui uno chiamato account.
    Cmq, elenco i campi:
    id
    username
    password
    profilo
    nome
    cognome
    account
    dealer
    agenzia
    indirizzo
    citta
    filiale
    etic_filiale
    telefono
    vedi
    messagistica
    tipo
    firma

    La pagina che tanti problemi crea si chiama caricaaccount.asp.

    In questa voglio fargli fare una doppia "operazione":

    1. visualizzare 8 semplici campi (incluso l'id, anche se non capisco il perchè:
      id
      account
      indirizzo
      telefono
      citta
      filiale
      username
      password

    2. Far si che visualizzato i campi possa inserirne uno nuovo.

    Inoltre cliccando sul campo account voglio che questo automaticamente venga eliminato.

    Posto lo script per intero:

    <%@LANGUAGE="VBSCRIPT"%>
    <!--#include file="conn.asp" -->
    <%
    Response.Expires = -1000 'Makes the browser not cache this page
    Response.Buffer = True 'Buffers the content so our Response.Redirect will work

    If Session("UserLoggedIn") <> "true" Then
    Response.Redirect("index.asp")
    End If
    %>
    <%

    account = request.form ("account")
    %>

    <%
    if request("link")="1" then
    username=request("username")
    Password=request("Password")
    profilo=request("profilo")
    account=request("account")
    indirizzo=request("indirizzo")
    citta=request("citta")
    filiale=request("filiale")
    telefono=request("telefono")
    account=replace(account,"'","''")
    indirizzo=replace(indirizzo,"'","''")
    citta=replace(citta,"'","''")
    %>
    <%
    Sqlins = "insert into tabella1 (username, Password, profilo, account, indirizzo, citta, filiale, telefono) values ('"&username&"','"&Password&"', '"&profilo&"', '"&account&"','"& indirizzo&"', '"&citta&"', '"&filiale&"', '"&telefono&"')"
    set rsins=conn.execute(Sqlins)
    end if
    %>
    ..................................

    Script per la visualzzazione elenco account:
    <%
    data = date()
    Sql1 = "SELECT account FROM tabella1 where id, account, indirizzo, telefono, citta, filiale, username, Password, profilo order by account"
    account=request("account")
    response.write Sql1 & "<br />"
    set rs1=conn.execute(Sql1)
    %>
    ...................

    <% do while not rs1.eof %>
    <% response.write ("<a href=cancelencoaccount.asp?id="&rs1("id")&">"&rs1("account")&"</a>" )%>
    <%=rs1("indirizzo")%>
    il resto dei campi che voglio che si visualizzano nell'elenco
    .....
    <% rs1.movenext
    loop
    %>

    Infine inserisco il form per l'inserimento del nuovo account:

    <form method="post" action="caricaaccount.asp" id="form1" onsubmit="return validate(form1);">

    Inserisco nel form i campi che mi interessano, quelli elencati prima......

    e chiudo il form
    </form>

    Ora a me sembrava facile questo script ma proprio non vuole riuscire, sicuramente data dalla mia scarsità in ASP.

    Cmq ora non mi fà nessun errore ma mi visualizza nei 8 soli campi che ho indicato sopra, tutti i dati tranne quelli per l'account.
    In pratica non riesco a dirgli hai 18 campi, io ne voglio vedere 8 corrispondente ad un campo specifico.

    Bho spero di essere stato un pò più chiaro, spero anche in una risposta, help me.

    Grazie