34 messaggi dal 12 novembre 2006
Questo è il codice e le pagine che uso attualmente; per il momento sto facendo un upload del file ad una cartella e poi a parte scrivo il nome del file (foto) in un form che poi viene letto nella pagina di visualizzazione;
in tal modo però nel database non posso inserire numerosi campi...
infatti ho 5 campi dove inseirre i nomi dei file

PRIMO PASSO:

Connessione al databse
'Connessione al database
set conn = Server.CreateObject ("ADODB.Connection")
conn.ConnectionString="Driver={Microsoft Access Driver (*.mdb)};" &_
"DBQ=" & Server.MapPath("../mdb-database/cmasgesteventi.mdb")
conn.Open
'set rcdset = server.CreateObject ("ADODB.Recordset")


SECONDO PASSO:
così inserisco i file (e altre cose) ma il problema sta nella limitazione dei files (con un'altra pagina asp ad hoc)

'Inserisci i dati nel database

rcdset("tbltitimg1")= Request.Form("ctitimg1")
rcdset("tblimg1")= Request.Form("cimg1")
rcdset("tbltitimg2")= Request.Form("ctitimg2")
rcdset("tblimg2")= Request.Form("cimg2")
rcdset("tbltitimg3")= Request.Form("ctitimg3")
rcdset("tblimg3")= Request.Form("cimg3")
rcdset("tbltitimg4")= Request.Form("ctitimg4")
rcdset("tblimg4")= Request.Form("cimg4")
rcdset("tbltitimg5")= Request.Form("ctitimg5")
rcdset("tblimg5")= Request.Form("cimg5")
rcdset("tbltitimg6")= Request.Form("ctitimg6")
rcdset("tblimg6")= Request.Form("cimg6")



TERZO PASSO:
ecco come dichiaro le variabili:
dim img1
dim img2
dim img3
dim img4
dim img5
dim img6

img1 = rcdset.Fields.Item("tblimg1").value
img2 = rcdset.Fields.Item("tblimg2").value
img3 = rcdset.Fields.Item("tblimg3").value
img4 = rcdset.Fields.Item("tblimg4").value
img5 = rcdset.Fields.Item("tblimg5").value
img6 = rcdset.Fields.Item("tblimg6").value

sempre nella stessa pagina ecco come vengono lette i campi relative alle immagini (ripeto che attualmente per inserire una immagine devo perforza scrivere anche il nome del file immagine e fare l'upload a parte)

..................
..................
<img src="fileeventi/<%
if img1 = "" then
response.write "no.gif"
else
response.write "" & img1
end if
%>" alt="<%=(rcdset.Fields.Item ("tbltitimg1").Value)%>" border="0"
..............
..............

HELP ME HELP ME HELP ME HELP ME HELP ME HELP ME HELP ME HELP ME HELP ME HELP ME HELP ME HELP ME HELP ME HELP ME HELP ME HELP ME

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.