Could Anyone Convert this JScript to VBScript please

[Programmer_n00b]

I am just learning VB and VBScript. I came accross a nice piece of code written in jscript... since I do not know a word of that could someone please convert the following to VBScript?

function setActiveCSS(title){var i,a,main;for(i=0;(a =document.getElementsByTagName("link")[i]);i++){if(a.getAttribute("rel").indexOf("style")!=-1&&a.getAttribute("title")){a.disabled=true;if(a.getAttribute("title")==title)a.disabled=false;}}}

function getActiveCSS(){var i,a;for(i=0;(a=document.getElementsByTagName("link")[i]);i++){if(a.getAttribute("rel").indexOf("style")!=-1&&a.getAttribute("title")&&!a.disabled)return a.getAttribute("title");}return null;}

function getPreferredCSS(){var i,a;for(i=0;(a=document.getElementsByTagName("link")[i]);i++){if(a.getAttribute("rel").indexOf("style")!=-1&&a.getAttribute("rel").indexOf("alt")==-1&&a.getAttribute("title"))return a.getAttribute("title");}return null;}

function setCookie(name,value,days){if(days){var date=new Date();date.setTime(date.getTime()+(days*24*60*60*1000));var expires=";expires="+date.toGMTString();}else expires="";document.cookie=name+"="+value+expires+"; path=/";}

function getCookie(name){var nameEQ=name+"=";var ca=document.cookie.split(';');for(var i=0;i<ca.length;i++){var c=ca[i];while(c.charAt(0)==' ')c=c.substring(1,c.length);if(c.indexOf(nameEQ)==0)return c.substring(nameEQ.length,c.length);}return null;}
window.onload=function(e){var cookie=getCookie("css");var title=cookie?cookie:getPreferredCSS();setActiveCSS(title);}
window.onunload=function(e){var title=getActiveCSS();setCookie("css",title,512);}

TIA

[CornedBee]

Looks like client-side code to me. Why on earth would you want to convert it to VBScript?

[Programmer_n00b]

I thought you could run VBScript client side by using the;

<script type="text/vbscript">
blah blah
</script>

tags

[Cander]

Originally posted by Programmer_n00b
I thought you could run VBScript client side by using the;

<script type="text/vbscript">
blah blah
</script>

tags

What CornedBee means is that you don't need to. it is fine exactly as it is as javascript. Even Microsoft is getting away from VBScript for web pages.

[CornedBee]

And no browser beside IE supports it in the first place.

[TheAlchemist]

that code works pretty well,
i use it myself...if you want to move from vbscript tp javascript or just learn javascript and other web related technologies go

here