%[@ IncludeFile "Code/Util.vbs" ]%> <%[@ IncludeFile "Code/Lang.vbs" ]%> <%[ InitGlobalVariables strBaseUrl = g_strBaseUrl fPrivateFolder = Eval(Left(Report.FileOutput,g_nPrivateFolder) = g_strPrivateFolder) If fPrivateFolder Then strBaseUrl = strBaseUrl & "genomaps/" ReportGenerator.NegateAxisY = True ' Create an HTML file for each GenoMap For Each g In GenoMaps strFileSvg = g.Session("FileSvg") If (strFileSvg <> "") Then ]%>
<%[ strScriptPath="../script.js" strFileSvgz = "../genomapsz/" & strFileSvg & "z" If fPrivateFolder Then Report.WriteFormattedLn "