Asp y graficos
Hola soy marcela nuevamente, busqué la página que me mencionaste y me sirvió, pero tengo un grave problema es que yo había encontrado también un componente que actuaba de forma muy similar el punto es que no puedo ver la imagen, me imagino que no genera la imagen, ya que se crea un objeto y ese se convierte a imagen para luego mostrarla... Pero no lo hace y la verdad es que ahora que probé con esta clase y no me funcionó nuevamente creo que debe ser algo de IE o de IIS... Además ya he probado en el servidor y en el mi PC (actuando este como servidor)... Ayudame por favor que ya no sé que hacer.
Saludos Marce... Y muchas gracias te pasaste.
Saludos Marce... Y muchas gracias te pasaste.
Respuesta de cgomezr
1
Estuve haciendo pruebas con la clase que te envié. No creo que sea nada en el IE o en el IIS. Mis sugerencias son las siguientes:
1) Crea una carpeta bajo inetpub\wwwroot que se llame por ejemplo "canvas".
2) Luego copia en "c:\inetpub\wwwroot\canvas" el archivo canvas.asp que viene en el paquete que descargaste desde la web.
3) Crea con Interdev o con Notepad un archivo que se llame por ejemplo "prueba.asp", al cual le copias el siguiente contenido:
'''''CONTENIDO DE PRUEBA.ASP''''
<!--#include file="canvas.asp"-->
<%
Set objCanvas = New Canvas ' Create the object
objCanvas.GlobalColourTable(0) = RGB(255,255,255) '(Color Blanco)
objCanvas.GlobalColourTable(1) = RGB(0,0,0) ' (Color Negro)
objCanvas.GlobalColourTable(2) = RGB(128,128,128) ' (Color Gris)
objCanvas.Resize 400,400,false ' Resize the canvas to 160x120, don't preserve the existing image
objCanvas.ForegroundColourIndex = 2 '(Lineas en gris)
ObjCanvas. Line 6,6,6,104
ObjCanvas. Line 4,4,29,104
ObjCanvas. Line 29,104,54,6
ObjCanvas. Line 54,6,54,104
ObjCanvas. Circle 104,54,30
ObjCanvas. Line 134,24,134,84
ObjCanvas. Line 154,24,154,84
ObjCanvas.Arc 194,54,40,40,180,90
ObjCanvas.Arc 234,54,40,40,90,180
ObjCanvas.Arc 284,54,40,40,45,315
ObjCanvas. Line 324,54,244,54
objCanvas.ForegroundColourIndex = 1 '(Lineas en negro)
ObjCanvas. Line 2,2,2,100
ObjCanvas. Line 2,2,25,100
ObjCanvas. Line 25,100,50,2
ObjCanvas. Line 50,2,50,100
ObjCanvas. Circle 100,50,30
ObjCanvas. Line 130,20,130,80
ObjCanvas. Line 150,20,150,80
ObjCanvas.Arc 190,50,40,40,180,90
ObjCanvas.Arc 230,50,40,40,90,180
ObjCanvas.Arc 280,50,40,40,45,315
ObjCanvas. Line 320,50,240,50
objCanvas.Write
%>
''''FIN PRUEBA.ASP'''''
4) Estando segura que el contenido de la carpeta canvas es canvas.asp y prueba.asp llama al IE con la dirección: http://localhost/canvas/prueba.asp
Luego cuéntame qué sale.
Saludos y suerte,
Carlos Gomez R.
[email protected]
No olvides cerrar la pregunta anterior y si tienes más dudas dime que con gusto te ayudo. Quizá es más fácil si me escribes por correo.
1) Crea una carpeta bajo inetpub\wwwroot que se llame por ejemplo "canvas".
2) Luego copia en "c:\inetpub\wwwroot\canvas" el archivo canvas.asp que viene en el paquete que descargaste desde la web.
3) Crea con Interdev o con Notepad un archivo que se llame por ejemplo "prueba.asp", al cual le copias el siguiente contenido:
'''''CONTENIDO DE PRUEBA.ASP''''
<!--#include file="canvas.asp"-->
<%
Set objCanvas = New Canvas ' Create the object
objCanvas.GlobalColourTable(0) = RGB(255,255,255) '(Color Blanco)
objCanvas.GlobalColourTable(1) = RGB(0,0,0) ' (Color Negro)
objCanvas.GlobalColourTable(2) = RGB(128,128,128) ' (Color Gris)
objCanvas.Resize 400,400,false ' Resize the canvas to 160x120, don't preserve the existing image
objCanvas.ForegroundColourIndex = 2 '(Lineas en gris)
ObjCanvas. Line 6,6,6,104
ObjCanvas. Line 4,4,29,104
ObjCanvas. Line 29,104,54,6
ObjCanvas. Line 54,6,54,104
ObjCanvas. Circle 104,54,30
ObjCanvas. Line 134,24,134,84
ObjCanvas. Line 154,24,154,84
ObjCanvas.Arc 194,54,40,40,180,90
ObjCanvas.Arc 234,54,40,40,90,180
ObjCanvas.Arc 284,54,40,40,45,315
ObjCanvas. Line 324,54,244,54
objCanvas.ForegroundColourIndex = 1 '(Lineas en negro)
ObjCanvas. Line 2,2,2,100
ObjCanvas. Line 2,2,25,100
ObjCanvas. Line 25,100,50,2
ObjCanvas. Line 50,2,50,100
ObjCanvas. Circle 100,50,30
ObjCanvas. Line 130,20,130,80
ObjCanvas. Line 150,20,150,80
ObjCanvas.Arc 190,50,40,40,180,90
ObjCanvas.Arc 230,50,40,40,90,180
ObjCanvas.Arc 280,50,40,40,45,315
ObjCanvas. Line 320,50,240,50
objCanvas.Write
%>
''''FIN PRUEBA.ASP'''''
4) Estando segura que el contenido de la carpeta canvas es canvas.asp y prueba.asp llama al IE con la dirección: http://localhost/canvas/prueba.asp
Luego cuéntame qué sale.
Saludos y suerte,
Carlos Gomez R.
[email protected]
No olvides cerrar la pregunta anterior y si tienes más dudas dime que con gusto te ayudo. Quizá es más fácil si me escribes por correo.
Muchas gracias me sirvió mucho tu ayuda, ya había probado el ejemplo que salía en la página, mi problema es que no tenia la clase canvas y font en la carpeta de la app... que pava, pero es que ya estaba muy mareada probando casi todas las opciones juntas (componentes, applets, etc).
Y esta muy bonito tu dibujo gracias...
Saludos Marce.
PD: ¿Si tengo otra preguntita me ayudas? jijijiji
Y esta muy bonito tu dibujo gracias...
Saludos Marce.
PD: ¿Si tengo otra preguntita me ayudas? jijijiji
