Visualizzazione dei risultati da 1 a 3 su 3

Discussione: gestione foto in asp

  1. #1
    Utente di HTML.it
    Registrato dal
    Jul 2007
    Messaggi
    159

    gestione foto in asp

    Ciao a tutti ho un problema.
    Non so come gestire le foto in una pagina .asp.
    Mi spiego meglio, ho una pagina asp che gestisce separatamente le varie righe del database, per semplicità riporto lo script qui sotto
    <%
    Dim id
    id = request.queryString("id")
    if len(id) > 0 and isNumeric(id) then
    id = cLng(id)
    else
    id = 1
    end if
    Dim recordPerId
    recordPerId = 1
    Dim Conn
    Set Conn = Server.CreateObject("ADODB.Connection")
    conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("database/link.mdb")
    Dim rs
    Set rs = Server.CreateObject("ADODB.Recordset")
    rs.Open "select * from link", conn, 1, 3
    RS.pageSize = recordPerId
    RS.absolutePage = id
    If Not RS.eof then
    for i = 1 to recordPerId
    if rs.eof then exit for
    %>



    <%
    Dim descrizione
    descrizione = rs("descrizione")
    response.write(descrizione)
    %>


    <%
    Dim link
    link=rs("link")
    %>
    <% response.write(link) %>
    </p>
    <%
    rs.moveNext
    next
    end if
    RS.Close
    Set RS = Nothing

    conn.Close
    Set conn = Nothing
    %>

    Adesso se io volessi gestire delle foto per ogni id come devo fare? Che script devo utilizzare?
    Grazie a tutti e ciao

  2. #2
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    codice:
    <%
    Dim id 
    id = request.queryString("id")
    if len(id) > 0 and isNumeric(id) then
    id = cLng(id)
    else
    id = 1
    end if
    Dim recordPerId
    recordPerId = 1
    Dim Conn 
    Set Conn = Server.CreateObject("ADODB.Connection") 
    conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("database/link.mdb") 
    Dim rs 
    Set rs = Server.CreateObject("ADODB.Recordset") 
    rs.Open "select * from link", conn, 1, 3 
    RS.pageSize = recordPerId
    RS.absolutePage = id
    If Not RS.eof then
    for i = 1 to recordPerId
    if rs.eof then exit for
    %>
    
    
    
    <%
    Dim descrizione
    descrizione = rs("descrizione") 
    response.write(descrizione)
    %>
    
    
    <% 
    Dim link 
    link=rs("link") 
    %>
    <% response.write(link) %> 
    
    
    <% 
    Dim foto 
    foto=rs("foto") 
    %>
    [img]<%=foto%>[/img] 
    </p> 
    <%
    rs.moveNext
    next
    end if
    RS.Close 
    Set RS = Nothing 
    
    conn.Close 
    Set conn = Nothing 
    %>
    Aggiungi poi un campo "foto" alla tabella.
    Per ogni record inserisci il nome dell'immagine con il path: ad esempio se l'immagine la metti nella cartella public nel campo "foto" scriverai "/public/image.jpg".

    Roby

  3. #3
    Utente di HTML.it
    Registrato dal
    Jul 2007
    Messaggi
    159

    gestione foto in asp

    Grazie tante!!!!

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.