ASPJPEG y Godaddy

Wasper · #1 (**permalink**) 03/06/2009, 15:03

Buenas, de nuevo yo y mi guerra Godaddy, esta vez el componente ASPJPEG. Abreviando bastante la cosa, me bajo el ejemplo que vienen en la pagina de Persist cambio en un archivo la ruta donde se guardaran las imagenes pero al ponerlo a funcionar me da error.

An error occurred: This feature has been disabled by system administrator. Use SaveVirtual instead.
Try again.

¿¿Alguien me puede ayudar??

Muchas gracias masters!!!!

Saludos, Jose

Myakire · #2 (**permalink**) 03/06/2009, 15:17

No colocas la linea del error, pero solo por curiosidad, si el error es llamando a un método ¿has probado lo que te sugiere el mensaje?

Wasper · #3 (**permalink**) 03/06/2009, 15:34

Juer despues de leerlo otra ver, he traducido mal, porque pensaba que me estaba diciendo que no usara SaveVirtual, vaya cagada traduciendo con prisas... ahora ya me salen otros tipos de errores que parece que controlo mejor, si veo algo raro de nuevo posteare.

Gracias Myakire!!!!

Saludos, Jose

Myakire · #4 (**permalink**) 03/06/2009, 15:40

... de nada, supongo

Wasper · #5 (**permalink**) 05/06/2009, 09:41

Hola otra vez, sabia que no iba a tardar mucho en volver...

Veamos sigo con el ASPJPEG y una pregunta que he visto por otros hilos, pero no me llego a enterar bien.

Veamos, he conseguido que funcione perfectamente el ASPJPEG, claro con el ejemplo, pero resulta que tengo un problema, voy a situar el problema para que lo veais.

Quiero crear un sistema de subidas de imagenes, hasta ahi bien, el usuario por medio de un form mete el archivo y este se sube, todo bien hasta ahora, el problemon viene cuando un usuario es tan bestia que mete una imagen gigantesta supongamos que 3000x3000 px por poner un ejemplo... si si ya se que puedo limitar el peso de una imagen en ASPJPEG pero lo que quiero realmente es que si este usuario me sube esa foto, esta se subiera pero con un 75% menos de tamaño, es decir el tio sube la foto de 3000x3000 y lo que acaba en el servidor mio es una foto de 750x750...

Me he leido muchos hilos, pero es que ya estoy mareado y no encuentro una respuesta para lo que pido.

Muchiiiiisimas gracias por vuestras respuestas.

Saludos, Jose

Myakire · #6 (**permalink**) 05/06/2009, 15:45

ya revisaste el manual del componente en el aparatado de resizing ?

Wasper · #7 (**permalink**) 06/06/2009, 12:39

Hola Myakire, he leido sobre eso, al final me he instalado en mi ordenador local el ASPJPEG y ASPUPLOAD para hacer las pruebas en local... he estado trasteando con los ejemplos que trae, pero ahora me encuentro otro problema...

Resulta que he encontrado un buen ejemplo que hace lo que quiero, ademas se mete en base de datos las imagenes (aunque no me interesa eso) total he desmenuzado el codigo y consigo que en local eliges una imagen para subir y le dices que % quieres reducirla, cuando le das al subir, te sube en una carpeta la original y la redimensionada. Bien el problema esta cuando lo prueba en mi hosting, que me da error 500 pero no me dice nada mas... y claro mareado que estoy... he pensado que puede ser por el Server.Mappath("")... de todas formas te pongo el codigo por si ves algo que no veo yo...

Código:

<HTML>
<HEAD>
<TITLE>Subida ASP imagenes redimensionadas</TITLE>
</HEAD>
<BODY>

<!-- this script is invoked by form.asp-->
<%
	' Create an instance of AspUpload object
	Set Upload = Server.CreateObject("Persits.Upload")

	' Compute path to save uploaded files to
	Path = Server.MapPath("/images/") 


	' Capture uploaded file. Save returns the number of files uploaded
	Count = Upload.Savevirtual(Path)

	If Count = 0 Then
		Response.Write "No images selected. <A HREF=""03_form.asp"">Try again</A>."
		Response.End
	Else

		' Obtain File object representing uploaded file
		Set File = Upload.Files(1)

		' Is this a valid image file?
		If File.ImageType <> "UNKNOWN" Then

			' create instance of AspJpeg object
			Set jpeg = Server.CreateObject("Persits.Jpeg")
			
			' open uploaded file
			jpeg.Open( File.Path )

			' resize image accoring to "scale" option.
			' notice that we cannot use Request.Form, so we use Upload.Form instead.
			jpeg.Width = jpeg.OriginalWidth * Upload.Form("scale") / 100
			jpeg.Height = jpeg.OriginalHeight * Upload.Form("scale") / 100

			SavePath = Path & "\small_" & File.ExtractFileName

			' AspJpeg always generates JPEG thumbnails regardless of original format.
			' If the original file was not a JPEG, append .JPG extension.
			If UCase(Right(SavePath, 3)) <> "JPG" Then
				SavePath = SavePath & ".jpg"
			End If

			jpeg.Save SavePath

			' Using ADO, save both images in the database along with description.
			strConnect = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/aspjpeg.mdb")

			Set rs = Server.CreateObject("adodb.recordset")
			rs.Open "images", strConnect, 1, 3
			rs.AddNew
			
			 Use File.Binary to access binary data of uploaded file.
			rs("original_image").Value = File.Binary

			Set ThumbFile = Upload.OpenFile(SavePath)
			rs("thumbnail").Value = ThumbFile.Binary

			rs("description") = Upload.Form("Description")

			rs.Update
			rs.Close
			Set rs = Nothing

			Response.Write "Success! Both the original file and its thumbnail are saved in the database.<P>"
			Response.Write "Copies can be found at <B>" & Path & "\" & File.ExtractFileName & "</B> and <B>" & SavePath & "</B>"

		Else			
			Response.Write "This is not a valid image. <A HREF=""formulario.asp"">Try again</A>."
			Response.End
		End If
	End If
%>
</BODY>
</HTML>

Muchas gracias

Saludos, Jose

Myakire · #8 (**permalink**) 06/06/2009, 15:53

Para que te muestre un còdigo de error debes desmarcar el cuadro de mostrar mensajes de error descriptivo en HTTP (o algo asì, jejeje) en las opciones avanzadas del IE, o usa firefox

Wasper · #9 (**permalink**) 07/06/2009, 07:48

Lo tengo puesto asi, pero no se porque me sigue dando el mismo error 500 predefinido de Godaddy... tanto en IE con la opcion desmarcada como en FireFox...

¿¿Alguna idea??

Gracias!