Mi duda es la siguiente, tengo un codigo que os facilito a continuación (Si os digo la verdad no se donde me lo facilitaron), necesito que se cambie lo que haga falta para que el scroll sea horizontal. Si no me entendeis ejecutar el codigo que os facilito y me comprendereis, GRACIAS.
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<SCRIPT>
function verifyCompatibleBrowser(){
this.ver=navigator.appVersion
this.dom=document.getElementById?1:0
this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom)?1:0;
this.ie4=(document.all && !this.dom)?1:0;
this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0;
this.ns4=(document.layers && !this.dom)?1:0;
this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5)
return this
}
bw=new verifyCompatibleBrowser()
var speed=50
var loop, timer
function ConstructObject(obj,nest){
nest=(!nest) ? '':'document.'+nest+'.'
this.el=bw.dom?document.getElementById(obj):bw.ie4 ?document.all[obj]:bw.ns4?eval(nest+'document.'+obj):0;
this.css=bw.dom?document.getElementById(obj).style :bw.ie4?document.all[obj].style:bw.ns4?eval(nest+'document.'+obj):0;
this.scrollHeight=bw.ns4?this.css.document.height: this.el.offsetHeight
this.clipHeight=bw.ns4?this.css.clip.height:this.e l.offsetHeight
this.up=MoveAreaUp;this.down=MoveAreaDown;
this.MoveArea=MoveArea; this.x; this.y;
this.obj = obj + "Object"
eval(this.obj + "=this")
return this
}
function MoveArea(x,y){
this.x=x;this.y=y
this.css.left=this.x
this.css.top=this.y
}
function MoveAreaDown(move){
if(this.y>-this.scrollHeight+objContainer.clipHeight){
this.MoveArea(0,this.y-move)
if(loop) setTimeout(this.obj+".down("+move+")",speed)
}
}
function MoveAreaUp(move){
if(this.y<0){
this.MoveArea(0,this.y-move)
if(loop) setTimeout(this.obj+".up("+move+")",speed)
}
}
function PerformScroll(speed){
if(initialised){
loop=true;
if(speed>0) objScroller.down(speed)
else objScroller.up(speed)
}
}
function CeaseScroll(){
loop=false
if(timer) clearTimeout(timer)
}
var initialised;
function InitialiseScrollableArea (){
objContainer=new ConstructObject('ZonaListados')
objScroller=new ConstructObject('Listado','ZonaListados')
objScroller.MoveArea(0,0)
objContainer.css.visibility='visible'
initialised=true;
}
</SCRIPT>
</HEAD>
<BODY onload="InitialiseScrollableArea();">
<TABLE width=100 height=100% Border=1 Align=Center Valign=Middle>
<TR><!-- BOTON DE SUBIR -->
<TD Width=100 Align=Center Valign=Middle Border=0>
<Div id=divUpControl name=Subir Align=Center Valign=Middle onMouseover="PerformScroll(-7);" onMouseout="CeaseScroll();">SUBIR</DiV>
</TD>
</TR>
<TR><!-- CONTENIDO DEL SCROLL -->
<TD Width=100 Height=100% Align=Center Valign=Middle Border=0>
<DIV id=ZonaListados style=" width: 100%; height: 100%; top: 0; left: 0; POSITION: relative; OVERFLOW: hidden;">
<DIV id=Listado style="width: 100%; POSITION: absolute; Visibility: Visible;">
<!-- CONTENIDO -->
a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>
a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>
a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>a</BR>
<!-- FIN CONTENIDO -->
</DIV>
</DIV>
</TD>
</TR>
<TR><!-- BOTON DE BAJAR -->
<TD Width=100 Align=Center Valign=Middle Border=0>
<Div id=divDownControl name=bajar Align=Center Valign=Middle onMouseover="PerformScroll(7);" onMouseout="CeaseScroll();">BAJAR</Div>
</TD>
</TR>
</TABLE>
</BODY>
</HTML>