您最多选择25个主题 主题必须以字母或数字开头,可以包含连字符 (-),并且长度不得超过35个字符

25 行
731B

  1. <%
  2. dim m_Chilkat_CSV
  3. Private Function Chilkat_CSV
  4. if not isobject(m_Chilkat_CSV) then
  5. set m_Chilkat_CSV= Server.CreateObject("Chilkat_9_5_0.Csv")
  6. end if
  7. set Chilkat_CSV = m_Chilkat_CSV
  8. End Function
  9. dim m_ReportManager
  10. Private Function ReportManager
  11. if not isobject(m_ReportManager) then
  12. set m_ReportManager = Server.CreateObject("ReportMan.ReportManX")
  13. end if
  14. set ReportManager = m_ReportManager
  15. End Function
  16. dim m_FSO
  17. Private Function FSO
  18. if not isobject(m_FSO) then
  19. set m_FSO = server.CreateObject(CreateObject("Scripting.FileSystemObject")
  20. end if
  21. set FSO = m_FSO
  22. End Function
  23. %>

Powered by TurnKey Linux.