I should have been more clear about the script sample. The chartSpace.ChartSpaceTitle object in my script sample refers to the caption below the chart. There is not problem tweaking that object.
What I am looking to do is:
1) Reduce the font.size of the title above the chart that is defined by the -chartTitle:"Some BarChart" parameter on the command line.
AND
2) Have a "standardized" chartTitle (caption) below the chart that is defined by the config.js script.
I don't want to replace the [-chartTitle:"Some Bar Chart"] with the config script file because then I would need to customize the config.js for every chartTitle variation. I have several versions of config.js depending on the interval or some other variance, but I don't want to have to create one for every chart title. My ASP scripts, sample below, deal with populating the "Top" title.
A sample graphic is also attached.
<%
Dim strInputPath : strInputPath = "\\10.0.0.27\d$\logfiles\1\"
Dim strOutputPath : strOutputPath = "c:\web_data\site1\dev\images\"
Call ChartMonthlyHits("NonApp")
Sub ChartMonthlyHits(strHitType)
Dim strLP
strLP=strLP & " SELECT TO_TIMESTAMP(STRCAT(TO_STRING(Field1, 'yyyy-MM'), '-01 00:00:00'), 'yyyy-MM-dd hh:mm:ss') AS Month,"
strLP=strLP & " SUM(CASE QUANTIZE(Field3, 100) WHEN 200 THEN TO_INT(Field4) ELSE 0 END) AS [Good Hits],"
strLP=strLP & " SUM(CASE Field3 WHEN 304 THEN TO_INT(Field4) ELSE 0 END) AS [Use Cache],"
strLP=strLP & " SUB(SUM(CASE QUANTIZE(Field3, 100) WHEN 300 THEN TO_INT(Field4) ELSE 0 END),[Use Cache]) AS Redirects,"
strLP=strLP & " SUM(CASE QUANTIZE(Field3, 100) WHEN 400 THEN TO_INT(Field4) ELSE 0 END) AS [4xx Error],"
strLP=strLP & " SUM(CASE QUANTIZE(Field3, 100) WHEN 500 THEN TO_INT(Field4) ELSE 0 END) AS [5xx Error]"
strLP=strLP & " INTO " & OutputFile("Monthly" & strHitType & "Hits.gif")
strLP=strLP & " FROM DailyHits.csv"
Select Case strHitType
Case "App"
strLP=strLP & " WHERE EXTRACT_EXTENSION(Field2) IN ('aspx'; 'asp')"
Case "NonApp"
strLP=strLP & " WHERE EXTRACT_EXTENSION(Field2) NOT IN ('aspx'; 'asp')"
Case Else
Exit Sub ' should have specified one or the other on the Call statement
End Select
strLP=strLP & " GROUP BY MONTH"
strLP=strLP & " ORDER BY MONTH ASC"
Set objLogQuery=CreateObject("MSUtil.LogQuery")
Set objInputFormat=CreateObject("MSUtil.LogQuery.CSVInputFormat")
Set objOutputFormat=CreateObject("MSUtil.LogQuery.ChartOutputFormat")
objInputFormat.headerRow = False
objOutputFormat.chartType = "BarStacked"
objOutputFormat.groupSize = "1200x300" ' Increase the 2nd dimension every months as more periods come online
Select Case strHitType
Case "App"
objOutputFormat.charttitle = "Application (ASP,ASPX) Hits"
Case "NonApp"
objOutputFormat.charttitle = "Non-Application Hits"
Case Else
Exit Sub ' should have specified one or the other on the Call statement
End Select
objOutputFormat.otsformat = "MMM yy"
objOutputFormat.config = "ChartConfig24h.js"
objLogQuery.ExecuteBatch strLP, objInputFormat, objOutputFormat
Set objLogQuery=Nothing
End Sub 'ChartMonthlyAppHits
Function InputFile(InputFilename)
InputFile = "'" & strInputPath & InputFilename & "'"
End Function
Function OutputFile(OutputFilename)
OutputFile = strOutputPath & OutputFilename
End Function
%>