Ciao a tutti.. qualcuno riesce ad aiutarmi?
ho preso uno script per l'upload delle immagini sul server e l'inserimento del percorso sul db.
l'ho adattato alle mie pčagine ma non riesco a fare uscire sul database il percorso corretto delle immagini. le immagini le carica correttamante sul sito ma non scrive il percorso corretto. quest č il mio script, dove sbaglio? il percprso mi fa uscire nel database ( ovviamente la pagina non trova l'immagine ) č questo:d:\inetpub\webs\casesucaseit\public\londra_ 0104_9_6.jpgche
Dim oUpload
Set oUpload = new cUpload
oUpload.AutoRename = True
oUpload.Overwrite = False
oUpload.SetPath "/public" oUpload.Load
While Not oUpload.EOF
oUpload.Save()
Select Case lCase(oUpload.Files("InputName"))
Case "img_annuncio"
'FileName_img_annuncio = oUpload.GetFileName()
FileName_img_annuncio = oUpload.GetCompletePathFile
End Select
oUpload.MoveNext
Wend
'Set Conn = Server.CreateObject("ADODB.Connection")
'Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/mdb-database/csc_data.mdb")
Set Rs=server.CreateObject("ADODB.Recordset")
rs.activeconnection = con
Rs.Open "tbl_annunci",Con,3,3
Rs.AddNew
Rs("img_annuncio") = FileName_img_annuncio
Rs.update
Rs.Close
Con.Close
Set Rs = Nothing
Set Con=Nothing
Set oUpload = Nothing

Rispondi quotando