Visualizzazione dei risultati da 1 a 3 su 3

Discussione: select + allegato.pdf

  1. #1
    Utente di HTML.it
    Registrato dal
    Aug 2005
    Messaggi
    53

    select + allegato.pdf

    Ciao a tutti,
    ho bisogno di un vostro aiuto:
    io ho creato una semplice tabella(Tabella1) in access con 3 campi id,pdv,microarea
    nella pagina .asp dopo aver creato la Sessione
    <%
    pdv=replace(Request.Querystring("pdv"),"'","''")
    Session("pdv") = pdv
    %>
    e aver connesso la pag. al db
    ho effettuato una select

    SQL="SELECT * FROM Tabella1 WHERE pdv = '"&pdv&"' "
    Set rec = Server.CreateObject("ADODB.Recordset")
    Set Rec=Conn.Execute(SQL)

    e ho inserito una condizione:

    if rec.eof then
    response.redirect ("datimancanti.htm")

    end if
    ">Allegato
    rec.close
    %>

    Il risultato che vorrei ottenere è che dopo il parametro pdv e la select l'utente pdv venisse identificato con la microaea di appartenenza e che fosse visualizzato il relativo documento che riporta il nome della microarea.pdf
    In questo modo all'interno della medesima pag. potrei gestire n allegati x n microarea.
    Potete aiutarmi please???

  2. #2
    <%
    microarea = rec("microarea")&".pdf"
    %>
    Allegato

    poi bisogna vedere cosa fai di preciso nella index...
    dove sbagliavi?

    sagliavi che tu recuperavi il campo del db microarea.pdf
    che non esiste... devi recuperare microarea e poi aggiungergli il .pdf


    Ah, Jedis! I had no ideas! What can i do for you, honored Jedis?

    I'm not Jedi. I'm a guy with a lighsaber and a few questions.

  3. #3
    Utente di HTML.it
    Registrato dal
    Aug 2005
    Messaggi
    53

    non funge

    Ti riporto il codice perchè con la correzione che mi hai suggerito va in errore:
    La domanda è
    avendo la variabile Session pdv come faccio a far sì che il sistema tiri su il file .pdf che riporta lo stesso nome della microarea di appartenenza riportata nella colonna vicina al pdv nella Tabella 1 di Access?


    Dim Conn
    Set Conn=Server.CreateObject("ADODB.Connection")
    Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("microarea.mdb")

    SQL="SELECT * FROM Tabella1 WHERE pdv = '"&pdv&"' "
    Set rec = Server.CreateObject("ADODB.Recordset")
    Set Rec=Conn.Execute(SQL)

    if rec.eof then
    response.redirect ("datimancanti.htm")

    end if

    microarea = rec("microarea")&".pdf"
    Allegato


    rec.close
    %>

    Grazie
    Iako

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.