|
12345678910111213141516171819202122232425 |
- <%
- dim m_Chilkat_CSV
- Private Function Chilkat_CSV
- if not isobject(m_Chilkat_CSV) then
- set m_Chilkat_CSV= Server.CreateObject("Chilkat_9_5_0.Csv")
- end if
- set Chilkat_CSV = m_Chilkat_CSV
- End Function
-
- dim m_ReportManager
- Private Function ReportManager
- if not isobject(m_ReportManager) then
- set m_ReportManager = Server.CreateObject("ReportMan.ReportManX")
- end if
- set ReportManager = m_ReportManager
- End Function
-
- dim m_FSO
- Private Function FSO
- if not isobject(m_FSO) then
- set m_FSO = server.CreateObject("Scripting.FileSystemObject")
- end if
- set FSO = m_FSO
- End Function
- %>
|