This is the code page of the connection for which autECLXfer was set. This code page may change over time. CodePage is a Long data type and is read-only. The following example shows this property.

DIM  CodePage as Long
DIM  SessObj as Object
Set SessObj = CreateObject("ZIEWin.autECLSession")
' Initialize the session
' Save the code page
CodePage = SessObj.CodePage