I am a beginner (very beginner) in vbscript and am having a problem running the following script. This was a html file that I converted to vbscript. I keep getting the same error no matter what support files (recommended) I put in the same or windows directories. Would someone be able to get me on the right track as to what I need to search for as far as a solution or if there is any recommendation?
Thank you!
Mehrdad
============
<html>
<head>
<meta http-equiv="Content-Language" content="en-us">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>New Page 1</title>
<script language="JavaScript">
<!--
function FP_swapImg() {//v1.0
var doc=document,args=arguments,elm,n; doc.$imgSwaps=new Array(); for(n=2; n<args.length;
n+=2) { elm=FP_getObjectByID(args[n]); if(elm) { doc.$imgSwaps[doc.$imgSwaps.length]=elm;
elm.$src=elm.src; elm.src=args[n+1]; } }
}
function FP_preloadImgs() {//v1.0
var d=document,a=arguments; if(!d.FP_imgs) d.FP_imgs=new Array();
for(var i=0; i<a.length; i++) { d.FP_imgs[i]=new Image; d.FP_imgs[i].src=a[i]; }
}
function FP_getObjectByID(id,o) {//v1.0
var c,el,els,f,m,n; if(!o)o=document; if(o.getElementById) el=o.getElementById(id);
else if(o.layers) c=o.layers; else if(o.all) el=o.all[id]; if(el) return el;
if(o.id==id || o.name==id) return o; if(o.childNodes) c=o.childNodes; if(c)
for(n=0; n<c.length; n++) { el=FP_getObjectByID(id,c[n]); if(el) return el; }
f=o.forms; if(f) for(n=0; n<f.length; n++) { els=f[n].elements;
for(m=0; m<els.length; m++){ el=FP_getObjectByID(id,els[n]); if(el) return el; } }
return null;
}
// -->
</script>
</head>
<body onload="FP_preloadImgs(/*url*/'button1D.gif', /*url*/'button1E.gif', /*url*/'button20.gif', /*url*/'button21.gif', /*url*/'button23.gif', /*url*/'button24.gif')">
<table border="0" cellpadding="0" cellspacing="0" bgcolor="#009999" width="600" height="349">
<!-- MSTableType="layout" -->
<tr>
<td colspan="3" height="62">
<!-- MSCellType="ContentHead" -->
<p align="center"><font face="Arial" size="4" color="#FFFFFF"><b>DVR
Connection Restore Utility</b></font></td>
</tr>
<tr>
<td rowspan="3" align="center" valign="top">
<!-- MSCellType="NavBody" -->
<p align="center"><b><font size="4">WARNING!</font></b></p>
<p align="center"><b><font size="2">This utility is
intended<br>
for a quick recovery of<br>
the DVR server. The use<br>
of the options available<br>
will result in loss of data.<br>
Please backup any data<br>
that is important before<br>
proceeding with your<br>
selection.</font></b></td>
<td valign="top" height="87">
<!-- MSCellType="ContentHead2" -->
<div style="position: absolute; left: 235; top: 95">
<a href="%SYSTEMDRIVE%\windows\system32\restore-files\partial.cmd">
<img border="0" id="img1" src="%SYSTEMDRIVE%\windows\system32\restore-files\button1C.gif" height="50" width="150" alt="Partial Restore" onmouseover="FP_swapImg(1,0,/*id*/'img1',/*url*/'button1D.gif')" onmouseout="FP_swapImg(0,0,/*id*/'img1',/*url*/'button1C.gif')" onmousedown="FP_swapImg(1,0,/*id*/'img1',/*url*/'button1E.gif')" onmouseup="FP_swapImg(0,0,/*id*/'img1',/*url*/'button1D.gif')" fp-style="fp-btn: Glass Rectangle 5; fp-font-style: Bold; fp-font-size: 11; fp-transparent: 1; fp-proportional: 0" fp-title="Partial Restore"></a></div>
</td>
<td align="center">
<!-- MSCellType="NavBody2" -->
<b><font size="2">This option will restore the<br>
Operating System ONLY.<br>
It will not remove the <br>
video Files from the system.</font></b></td>
</tr>
<tr>
<td valign="top" height="87">
<!-- MSCellType="ContentBody" -->
<div style="position: absolute; left: 235px; top: 185px">
<a href="%SYSTEMDRIVE%\windows\system32\restore-files\full.cmd">
<img border="0" id="img2" src="%SYSTEMDRIVE%\windows\system32\restore-files\button1F.gif" height="50" width="150" alt="Full Restore" onmouseover="FP_swapImg(1,0,/*id*/'img2',/*url*/'button20.gif')" onmouseout="FP_swapImg(0,0,/*id*/'img2',/*url*/'button1F.gif')" onmousedown="FP_swapImg(1,0,/*id*/'img2',/*url*/'button21.gif')" onmouseup="FP_swapImg(0,0,/*id*/'img2',/*url*/'button20.gif')" fp-style="fp-btn: Glass Rectangle 5; fp-font-style: Bold; fp-font-size: 11; fp-transparent: 1; fp-proportional: 0" fp-title="Full Restore"></a></div>
</td>
<td align="center">
<!-- MSCellType="NavBody2" -->
<b><font size="2">This option will restore the<br>
entire DVR server.<br>
It will erase all the Video<br>
files from the system.</font></b></td>
</tr>
<tr>
<td valign="top" height="94">
<!-- MSCellType="ContentBody2" -->
<div style="position: absolute; left: 235; top: 270">
<img border="0" id="img3" src="%SYSTEMDRIVE%\windows\system32\restore-files\button22.gif" height="50" width="150" alt="Cancel" onmouseover="FP_swapImg(1,0,/*id*/'img3',/*url*/'button23.gif')" onmouseout="FP_swapImg(0,0,/*id*/'img3',/*url*/'button22.gif')" onmousedown="FP_swapImg(1,0,/*id*/'img3',/*url*/'button24.gif')" onmouseup="FP_swapImg(0,0,/*id*/'img3',/*url*/'button23.gif')" fp-style="fp-btn: Glass Rectangle 5; fp-font-style: Bold; fp-font-size: 11; fp-transparent: 1; fp-proportional: 0" fp-title="Cancel"></div>
</td>
<td align="center">
<!-- MSCellType="NavBody2" -->
</td>
</tr>
<tr>
<td width="200"></td>
<td width="200"></td>
<td height="19" width="200"></td>
</tr>
</table>
</body>
</html>