Va sul server ma non nel localhost

[freezone]

Salve,
ho uno script per ridimensionare le immagini in .NET, ma funziona sul server di Aruba ma non nel mio localhost. Pur aventi installato il .NET Framework. Comincia così lo script:

<%@ LANGUAGE="VB" AutoEventWireup="true" %>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Imaging" %>

Cosa devo aggiungere nel mio localhost?
Grazie

[cassano]

Che errore ti genera ???

[freezone]

Semplicemente non mi mostra l'immagine e mi mette una "x" come di immagine non trovata. Il medesimo script online funziona. L'immagine è ovviamente presente al posto giusto. Ma offline non ridimensiona l'immagine. Temo manchi il NameSpace (ho detto una cavolata? )

[cassano]

se fai col bottone destro l'img dove punta ????

[freezone]

.../makepreviews.aspx?imgfile=EnricoSera.jpg
In pratica lo script dentro alla pagine makepreviews.aspx ridimensiona l'immagine. Che esiste, non è che si assente.

[freezone]

Il mio dubbio è che quell'import namespace, non funzioni nel mio localhost... premetto che sono un po' un novellino in .NET

[sms]

magarri non è niente, però:
<%@ Page Language="VB" AutoEventWireup="true" %>

[freezone]

Questo è il codice

<%@ LANGUAGE="VB" AutoEventWireup="true" %>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Drawing.Imaging" %>
<script runat="server" language="VB">
	Private Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
	
	Dim rFactor As Single = Convert.ToSingle(Request.QueryString("factor"))/100
	Dim imgFileName As String = Request.QueryString("imgFile")
	Dim objImage As System.Drawing.Image
	Dim objResizedImg As System.Drawing.Image
	Dim imgOutputFormat As ImageFormat
	Dim ContentTypeName As String
	Dim DimOrizz As Integer
	Dim DimVert As Integer
	
	'Crea una istanza della immagine originale
	objImage = System.Drawing.Image.FromFile(Page.MapPath(imgFileName))
	
	'DimOrizz = objImage.Width * rFactor
	'If DimOrizz > 150 Then
	'	DimOrizz = 150
	'	DimVert = (150 / objImage.Width) * objImage.Height
	'Else
	'	DimOrizz = objImage.Width * rFactor
	'	DimVert = objImage.Height * rFactor
	'End If
	
	DimOrizz = 80
	DimVert = 101
	
	'Crea una istanza della immagine ridotta
	objResizedImg = objImage.GetThumbnailImage(DimOrizz, DimVert, AddressOf On_GetThumbnailAbort, IntPtr.Zero)
	'objResizedImg = objImage.GetThumbnailImage(objImage.Width * rFactor, objImage.Height * rFactor, AddressOf On_GetThumbnailAbort, IntPtr.Zero)
	
	'Seleziona la estensione
	Select Case imgFileName.Split(".")(1).ToString
	
		Case "gif"
			imgOutputFormat = ImageFormat.Gif
			contentTypeName = "image/gif"
			
		Case "jpg"
			imgOutputFormat = ImageFormat.Jpeg
			contentTypeName = "image/jpeg"
	End Select
	
	'Imposta il MIME-Type per il brwoser
	Page.Response.ContentType = contentTypeName
	'Persiste immagine ridemensionata nello strema di Output
	objResizedImg.Save(Page.Response.OutputStream, imgOutputFormat)
	objImage.Dispose()
	objResizedImg.Dispose()
		
	End Sub
	
	Private Function On_GetThumbnailAbort() As Boolean
		Return False
	End Function
</script>