Visualizzazione dei risultati da 1 a 4 su 4

Discussione: Response

  1. #1
    Utente di HTML.it
    Registrato dal
    Jun 2005
    Messaggi
    97

    Response

    Ciao a tutti

    il mio problema e di far visualizzare , se non trova nessun record la risposta "nessu dato"
    e poi lo dovrò trasportare in un filmato flash

    Mi riesce ma all'interno
    mi appare l'intero record e la dicitura
    "non ci sono dati".

    ho sbagliato qualcosa in asp
    ecco il codice ASP


    <%
    Dim objConn
    Set objConn = Server.CreateObject("ADODB.Connection")

    ' connessione a database Access
    objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.MapPath("/mdb-database/prova.mdb")
    ' "Driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("/mdb-database/prova.mdb")

    dim Param
    Param = request.queryString("Param")

    dim muovi
    muovi = request.queryString("muovi")

    objConn.open

    Dim objRS, strSQL

    set objRS = Server.CreateObject("ADODB.Recordset")

    Dim operazione
    Dim stringa

    if Param <> "" then
    if muovi="successivo" then
    stringa = " where AD_ID > " + Param + " order by AD_ID ASC"
    else
    stringa = " where AD_ID < " + Param + " order by AD_ID DESC"
    end if
    else
    stringa = " order by AD_ID DESC "
    end if

    strSQL = "select * from PROVA " + stringa + ";"

    objRS.open strSQL, objConn, 3, 3

    Dim Totale
    Totale = objRS.RecordCount



    dim AD_ID
    AD_ID = objRS("AD_ID")

    dim DATA
    DATA = objRS("DATA")

    dim TITOLO
    TITOLO = objRS("TITOLO")


    Response.Write ("AD_ID=" & AD_ID & "
    ")

    Response.write("&AD_ID=" & AD_ID & "&DATA=" & DATA & "&TITOLO=" & TITOLO)


    if Totale = 0 and muovi=0 then
    end if
    Response.Write "non ci sono dati"



    if Totale = 1 and muovi="precedente" then
    end if

    Response.Write (" ")

    if (Totale = 1 and muovi="successivo") or muovi="" then
    end if



    objRS.close
    set objRS = nothing

    objConn.close
    set objConn = nothing
    %>

  2. #2
    if Totale = 0 and muovi=0 then
    end if
    Response.Write "non ci sono dati"

    sopra l'errore

    if Totale = 0 and muovi=0 then
    Response.Write "non ci sono dati"
    end if

    altrimenti la condizione è inutile

    ciao

  3. #3
    Utente di HTML.it
    Registrato dal
    Jun 2005
    Messaggi
    97

    grazie adesso tutto ok!!!!!!

    che c......,
    era davanti agli acchi e non l'ho vedovo

  4. #4
    Utente di HTML.it
    Registrato dal
    Jun 2005
    Messaggi
    97

    Attenzione

    ho parlato troppo presto
    se faccio la prova su una pagina di navigazione mi da il seguente errore

    Il record corrente corrisponde all'inizio o alla fine del file oppure è stato eliminato. Per eseguire l'operazione richiesta è necessario disporre di un record corrente .


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.