Set news = Server.CreateObject("aspSmartUpload.SmartUpload")
with news
.Upload
img = .files.item(1).filename
if img <>"" then
arrayImg = Split(img, ".")
nArr = Ubound(arrayImg)
lennArr = Len(arrayImg(nArr))
exten = Right(img, lennArr)
vnow=now()
data = year(vnow) & right("00"& month(vnow),2) & right("00"& day(vnow),2) & right ("00" & hour(vnow),2) & right ("00" & minute(vnow),2) & right ("00" & second(vnow),2)
fileName = data & "." & exten
.files.item(1).saveas "/Images/news/" & fileName
Else
fileName = " "
End If
lingua = Replace(.Form("lingua"), "'", "''")
titolo = Replace(.Form("titolo"), "'", "''")
body = Replace(.Form("body"), "'", "''")
autore = session("nome")
sql_0 = "INSERT INTO NEWS(NEWS_AUTHOR,NEWS_DATA,NEWS_FILE) VALUES ('" & autore & "'," & data & ",'" & fileName & "')"
RsCon2.Execute(sql_0)
ma se provo ad inserire una news senza immagine mi da un errore di sitassi

Rispondi quotando
