AspCanvas

[geokym]

No puedo cambiar de fuente en aspcanvas uso este código:

Código:

<!--#include file="canvas.asp"-->
<!--#include file="font.asp"-->

<%
	Dim objCanvas, Texto, Ancho
	Texto = "asdzxc"
	Ancho = (len(Texto) * 12) - 10
	Set objCanvas = New Canvas
	objCanvas.GlobalColourTable(0) = RGB(255,255,255)
	objCanvas.GlobalColourTable(1) = RGB(0,0,0)
	objCanvas.BackgroundColourIndex = 0
	objCanvas.ForegroundColourIndex = 1
	objCanvas.Resize Ancho,12,True
	objCanvas.DrawVectorTextWE 0,0,Texto,2
	objCanvas.Write
%>

de esta forma funciona pero el texto es muy feo...
según lo que he visto o he leido para cambiar la fuente es de esta forma:

Código:

<!--#include file="canvas.asp"-->
<!--#include file="extra_fonts/courier_10_point.asp" -->


<%
	Dim objCanvas, Texto, Ancho
	Texto = "asdzxc"
	Ancho = (len(Texto) * 12) - 10
	Set objCanvas = New Canvas
	objCanvas.GlobalColourTable(0) = RGB(255,255,255)
	objCanvas.GlobalColourTable(1) = RGB(0,0,0)
	objCanvas.BackgroundColourIndex = 0
	objCanvas.ForegroundColourIndex = 1
	objCanvas.Resize Ancho,12,True
	objCanvas.DrawVectorTextWE 0,0,Texto,2
	objCanvas.Write
%>

pero la verdad no me muestra nada. si alguien sabe por que pasa esto y como remediarlo por favor helpme! ... gracias