segnala raduno

<% call testLogin("?tipo=raduno",": If Request.QueryString("addfoto")<>“” Then

Dim fileFoto, fileRedim
currId= request.QueryString(“idraduno”)

‘ salvo l’immagine inviata dall’utente usando l’oggeto ASP Smart Upload
fileFoto = effettuaUpdate(PATHFOTORADUNI & “N”, “F” & “_” & currId & “_”, “”)
If fileFoto<>“” Then

Set img = CreateObject(“ImageMagickObject.MagickImage.1”)

‘ limito le dimensioni del file originale caricato (siccome le immagini possono essere sia orizzontali che verticali
‘ limito una delle due dimensioni a 640px mantenendo le proporzioni)
ret = img.Convert(PATHFOTORADUNI & “N” & fileFoto, “-resize”, “900×700>”, PATHFOTORADUNI & “N” & fileFoto)

‘ ridimensionamento dell’immagine usando ImageMagickObject; viene portata a dimensione massima 100×100 senza stretch
ret = img.Convert(PATHFOTORADUNI & “N” & fileFoto, “-resize”, “100×100”, PATHFOTORADUNI & “RID” & fileFoto)

‘ salvataggio nel db dell’url dell’immagine originale
sql = “UPDATE raduni SET foto='” & replace(fileFoto,”‘”,”””) & “‘ WHERE idRaduno=” & currId
‘response.Write sql
Set Conn = Server.CreateObject(“ADODB.Connection”)
Conn.Open cConnectionString
conn.Execute(sql)
conn.close

Set img=Nothing

End If
End If
%>

Grazie per la tua segnalazione. La redazione si riserva di pubblicare l’evento da te indicato.

« Torna alla home page

Sponsor

Nuovo Škoda Kamiq

OFFERTA City o Suv? City Suv. Scopri nuovo Škoda Kamiq.

Scoprilo

Sponsor

Nuovo Škoda Kamiq

OFFERTA City o Suv? City Suv. Scopri nuovo Škoda Kamiq.

Scoprilo

Skoda Enyaq

SEGMENTO SUV

PREZZO a partire da 48.400€

VEDI I DETTAGLI

Sponsor

Nissan JUKE

OFFERTA Ad aprile Nissan triplica gli incentivi su Juke Full Hybrid.

Scopri di più

Sponsor

Nissan JUKE

OFFERTA Ad aprile Nissan triplica gli incentivi su Juke Full Hybrid.

Scopri di più

Redazione

01 Apr 2004

Articoli più letti

PROGETTI E COLLABORAZIONI

Concessionarie Auto

Distributori GPL

Distributori Metano

Top Dealers Italia

Best Partners Italia

Infomotori.com - Quotidiano di informazione registrato presso il Tribunale di Vicenza n. 980 del 19.09.2000
founded by Ivana Gabriella Cenci and Carlo Valente - Direttore Responsabile: Ivana Gabriella Cenci
Edito da Caval Service srl, - P.IVA 02514810247 - Copyright 2024 © Tutti i diritti riservati.