%@ LANGUAGE="VBScript" %> <% Set Chart = Server.CreateObject ("ASPChart.Chart") Response.Write "Registered To: " & Chart.RegisteredTo & "" Response.Write "Version: " & Chart.Version & "" Response.Write "Expires: " & Chart.Expires & "" %>