D
Dan Ricker
Office2003 also has OWC11
CLSID: {0002E55d-0000-0000-C000-000000000046}
ProgID: OWC11.ChartSpace.11
which should work with the same code as used for OWC10.
Now for the problem at hand (adding OWC11 into the matrix).
One method would be to have 4 asp pages.
OWCRedirect.asp:
This page test what verion of OWC is available on the
client and redirects the client to the
corresponding "real" asp page.
''' VBScript Client sample - Warning Air Code (written
from memory):
On Error Resume Next
''' Test for OWC11 First - Use the latest if Possible
Set objTest = CreateObject("OWC11.ChartSpace")
If Err.Number <> 0 Then
''' Client does not have OWC11
Err.Clear
''' Test for OWC10 Second - Leave OWC9 till the end
Set objTest = CreateObject("OWC10.ChartSpace")
If Err.Number <> 0 Then
''' Client does not have OWC10
Err.Clear
Set objTest = CreateObject("OWC.Chart")
If Err.Number <> 0 Then
''' Client does not have OWC9
''' Client does not have any OWC version
''' Shame on Client
window.navigate "NoOWCYouSillyPerson.asp"
Else ''' Client has OWC9
window.navigate "OWC9MyRealPage.asp"
End If
Else ''' Client has OWC10
window.navigate "OWC10MyRealPage.asp"
End IF
Else ''' Client has OWC11 so use OWC11 Page
window.navigate "OWC11MyRealPage.asp"
End If
CLSID: {0002E55d-0000-0000-C000-000000000046}
ProgID: OWC11.ChartSpace.11
which should work with the same code as used for OWC10.
Now for the problem at hand (adding OWC11 into the matrix).
One method would be to have 4 asp pages.
OWCRedirect.asp:
This page test what verion of OWC is available on the
client and redirects the client to the
corresponding "real" asp page.
''' VBScript Client sample - Warning Air Code (written
from memory):
On Error Resume Next
''' Test for OWC11 First - Use the latest if Possible
Set objTest = CreateObject("OWC11.ChartSpace")
If Err.Number <> 0 Then
''' Client does not have OWC11
Err.Clear
''' Test for OWC10 Second - Leave OWC9 till the end
Set objTest = CreateObject("OWC10.ChartSpace")
If Err.Number <> 0 Then
''' Client does not have OWC10
Err.Clear
Set objTest = CreateObject("OWC.Chart")
If Err.Number <> 0 Then
''' Client does not have OWC9
''' Client does not have any OWC version
''' Shame on Client
window.navigate "NoOWCYouSillyPerson.asp"
Else ''' Client has OWC9
window.navigate "OWC9MyRealPage.asp"
End If
Else ''' Client has OWC10
window.navigate "OWC10MyRealPage.asp"
End IF
Else ''' Client has OWC11 so use OWC11 Page
window.navigate "OWC11MyRealPage.asp"
End If