Cambiar Font

[AmoC]

hola a todos ,
alguien sabe como puedo cambiar la fuente osea el tamaño de letra por medio de codigo ASP
gracias

[bakanzipp]

y para que lo quieres hacer con asp habiendo tanto recurso con codigo cliente-side

[AmoC]

mira ya se que hay muchos recurso para eso , pero en mi aplicacion ten dos impresoras, una esta en LPT y la otra en USB, y tengo que imprimir en las dos primero en una y despues en la otra casi segidas, entonces estaba buscando algo para cambiar la impresora predeterminada y no encontre nada, hasta hoy pude hacer imprimir la del puerto paralelo con lo siguiente....
Set objFS = server.CreateObject("Scripting.FileSystemObject")
Set objPrinter = objFS.CreateTextFile("LPT1:", True)
objPrinter.writeline("Impresion de prueba ")
objPrinter.writeline("----------------------------------------")
objPrinter.writeline chr(30)


y me lo imprime bien pero quisiera saber como hacerlo de un tamaño mas chico..

[bakanzipp]

trataste agregandole codigo html a lo que quieres imprimir?

Código:

Set objFS = server.CreateObject("Scripting.FileSystemObject") 
Set objPrinter = objFS.CreateTextFile("LPT1:", True) 
objPrinter.writeline(" <font size=1>DIRECCION ESTATAL DEL REGISTRO CIVIL </font>") 
objPrinter.writeline("Impresion de prueba ") 
objPrinter.writeline("----------------------------------------") 
objPrinter.writeline chr(30)

[AmoC]

en este caso necesitaria cambiar la fuente y el tamaño de letra en la impresora, se podra algo asi...

[AmoC]

si ya lo hice y lo imprime tal y como esta, con todo y los tag's

[bakanzipp]

ME IMAGINABA-....

y por que estas imprimiendo de esa manera amoc?

[AmoC]

lo que pasa es que tengo una aplicacion donde tengo que imprimir dos documentos con distinto formato, la impresora predeterminada y otra, como te decia primero cambiar la impresora predeterminada osea intercalarlas, pero no pude y luego encontre esta forma de imprimir en el puerto paralelo, y estabien por que la predeterminada es la del usb, imprime primero esta y despues imprime la del LPT1. y esa es la historia.
ya consegi como imprimir ahora lo que quiero es cambiar la fuente o el tamaño... como vez.................bakanzipp

[bakanzipp]

hmmm..ta complicado...y funcionara asi?...jeje..me estoy carrileando

smensaje="<font face=verdana size=1>mi mensaje</font>"
Set objFS = server.CreateObject("Scripting.FileSystemObject")
Set objPrinter = objFS.CreateTextFile("LPT1:", True)

objPrinter.Write(smensaje)

[virla]

ACA TENES LA SOLUCION
DONDE VA EL TEXTO A CAMBIAR PONE
<span class="TU ESTILO" id=textoN>
Y AGREGA A LA PAGINA ESTA LINEA
<SCRIPT src="Notas.js" type=text/javascript></SCRIPT>
AHORA TE PASO EL NOTAS.JS
// FONT SIZE MANAGEMENT
function FindObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=FindObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function ChangeProp(objName,x,theProp,theValue) { //v6.0
var obj = FindObj(objName);
if (obj && (theProp.indexOf("style.")==-1 || obj.style)){
if (theValue == true || theValue == false)
eval("obj."+theProp+"="+theValue);
else eval("obj."+theProp+"='"+theValue+"'");
}
}

function LoadActualFontSize() {
tempArray = document.cookie.split(";");
for (tA = 0; tA < tempArray.length; tA++){
if (tempArray[tA].indexOf('fontSize') > -1){
fontSizeValue = tempArray[tA].split("=")
ACTUAL_FONTSIZE = parseInt(fontSizeValue[1]);
}
}
}

function SaveActualFontSize() {
var expire = new Date ();
expire.setTime (expire.getTime() + (6000 * 24 * 3600000));
expire = expire.toGMTString();
document.cookie="fontSize="+ACTUAL_FONTSIZE+"; path=/; expires="+expire;
}

function Fgrande() {
ACTUAL_FONTSIZE = ACTUAL_FONTSIZE+1;
if (ACTUAL_FONTSIZE > LARGEST_FONTSIZE) { ACTUAL_FONTSIZE = LARGEST_FONTSIZE }
ChangeProp('textoN','','style.fontSize',ACTUAL_FON TSIZE,'SPAN');
SaveActualFontSize();
}

function Fchica() {
ACTUAL_FONTSIZE = ACTUAL_FONTSIZE-1
if (ACTUAL_FONTSIZE < SMALLEST_FONTSIZE) { ACTUAL_FONTSIZE = SMALLEST_FONTSIZE }
ChangeProp('textoN','','style.fontSize',ACTUAL_FON TSIZE,'SPAN');
SaveActualFontSize();
}

ACTUAL_FONTSIZE = 12;
SMALLEST_FONTSIZE = 10;
LARGEST_FONTSIZE = 22;

Y EN EL LINK PARA QUE LA AGRANDE O LA ACHIQUE PONE
href="javascript:Fgrande();"
href="javascript:Fchica();"

[virla]

SORI, ME COLGUE MAL LEI QUE ERA SOLO CAMBIO DE LETRAS EN PANTALLA Y SE LA MANDE, BUENO ALGUNO LE VA A SERVIR

[DavidMexico]

Hola:

A ver, trata con esto:

Set objFS = server.CreateObject("Scripting.FileSystemObject")
Set objPrinter = objFS.CreateTextFile("LPT1:", True)
objPrinter.writeline(" <font size=1>DIRECCION ESTATAL DEL REGISTRO CIVIL </font>")
objPrinter.writeline(char(15)&"Impresion de prueba "&chr(18))
objPrinter.writeline("----------------------------------------")
objPrinter.writeline chr(30)