Upload con Persits.Upload, no puedo hacer que se vean mas pequeñas ya en el server

[speedy]

Hola a todo el Foro, investigando como podiamos subir imagenes al servidor, encontre este objeto de Persits.Upload, en el server que utilízo esta funcionando muy bien lo de subir las imagenes ahora, no se si alguno de ustedes utilizen este objeto para subir sus imagenes al server, bueno esto lo baje de:

http://support.persits.com/jpeg/pick_jpeg.asp

ahi mismo pueden hacer la prueba de subir imagenes, despues de subir su imagen aparece otra pantalla como esta:



Ok, hasta aquí todo bien, pero le da uno a continue y aparece la siguiente pantalla, y aqui le da uno otro clic al boton para que la imgen que subimos se pueda hacer mas pequeña, no de vista sino tambien de tamaño (peso para minorizar el tiempo de carga)



desde el sitio del fabricante funciona muy bien pero desde mi pagina solo sale ese tache rojo, haciendo referencia a que no se ha encontrado la imagen, el codigo que baje y no he podido encontrar para que funcione bien es el siguiente, gracias por sus comentarios:

Código:

<%
If Request("Create") <> "" Then

	Path = Request("Path")

	If Request("Quality") <> "" Then
		Interpolation =	1 ' use Bilinear interpolation
	Else
		Interpolation =	0 ' use Nearest-neighbor algorithm
	End If
	
	If Request("Sharpen") <> "" Then
		Sharpen = "1"
		
		SharpenValue = Request("SharpenValue")
		If SharpenValue <= 100 Then
			Response.Write "<FONT FACE=""Arial""><B>Sharpening value must be greater than 100</B></FONT>"
			Response.End
		End If
	Else 
		Sharpen = "0"
	End If

	' resize according to user selection

	' Percentage scaling
	If Request("ResizeOption") = 1 Then
		Scale = Request("scale") / 100
		Height = Request("Height") * Scale
		Width = Request("Width") * Scale
	End If

	' user-specified width
	If Request("ResizeOption") = 2 Then
		If IsNumeric(Request("NewWidth")) Then Width = Request("NewWidth") Else Width = 0
		If Width > 0 and Width < 2000 Then
			Height = Request("Height") * Width / Request("Width")
		Else
			Response.Write "<FONT FACE=""Arial""><B>Invalid Width value</B></FONT>"
			Response.End
		End If
	End If

	' user-specified height
	If Request("ResizeOption") = 3 Then
		If IsNumeric(Request("NewHeight")) Then Height = Request("NewHeight") Else Height = 0
		If Height > 0 and Height < 2000 Then
			Width = Request("Width") * Height / Request("Height")
		Else
			Response.Write "<FONT FACE=""Arial""><B>Invalid Height value</B></FONT>"
			Response.End
		End If
	End If

	Rotate = Request("Rotate")

	' Display image
%>
<IMG SRC="send_binary.asp?Path=<% = Server.URLEncode(Path) %>&Width=<% = Width%>&Height=<% = Height %>&Interpolation=<% = Interpolation %>&sharpen=<% = Sharpen %>&sharpenvalue=<% = SharpenValue%>&Rotate=<% = Rotate %>">
<%
End If
%>

O si existe alguna otra forma para hacer esto, soy todo ojos muchas gracias y SALUDOS.