codice da vb a jscript

[superesse]

Ragazzi che mi aiutate a trasformare questo codice da <%@ LANGUAGE = VBScript %> a
<%@ LANGUAGE = JScript %>

Grazie !!!


<%@ LANGUAGE = VBscript %>
<%

dim Stringa_connessione
dim nome_pdf
dim path_pdf

Set dom_Reportobj = Server.CreateObject("ReportMan.ReportmanX")
dom_Reportobj.Filename = path_rep & nome_report

dom_Reportobj.SetDatabaseConnectionString "VSDOTNET",Stringa_connessione

dom_Reportobj.SetParamValue "ID", iddomanda
dom_Reportobj.SetParamValue "SIGLA", request("sigla")


Set dom_DelphiASPObj = Server.CreateObject("ReportMan.ReportmanXAServer")

nomefilepdf=nome_pdf
nome_pdf=path_pdf & nome_pdf


dom_Reportobj.SaveToPDF nome_pdf,true

Set dom_DelphiASPObj = nothing
Set dom_Reportobj = nothing

%>

[superesse]

ho fatto cosi ma da errore :


<%@ LANGUAGE = JScript %>
<%
Response.Expires = 0;

try{

var Stringa_connessione = "";
var id;
var path_rep;
var path_pdf;
var sql = "";
var nome_report;

Stringa_connessione ="Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=dom2;Data Source=201B";


sql += "SELECT * FROM Domande "
sql += "WHERE ID = " + id;


nome_report = "dom_cVII.rep";
path_rep = Server.MapPath("../report/");

Response.Write(path_rep + chr(10) );
//Response.End()

path_pdf = Server.MapPath("../pdf/");

var dom_Reportobj = new ActiveXObject("ReportMan.ReportmanXAServer");
dom_Reportobj.Filename = path_rep + "\\dom_m13.rep"
dom_Reportobj.SetDatabaseConnectionString("VSDOTNE T", Stringa_connessione);


dom_Reportobj.SetParamValue("ID", 6671);
dom_Reportobj.SetParamValue("SIGLA", "pippo");

path_pdf = Server.MapPath("../report");
path_pdf = path_pdf + "/"

nomefilepdf = "prova_pdf"
nome_pdf = path_pdf + "pippo"


dom_Reportobj.SaveToPDF(nome_pdf,true);


dom_Reportobj.close();
}

catch(e){
Response.Write("Errore:" + e.message);
}
%>