摘要: 全部源代码如下:显示源码 1 Class INIClass 2 Private dict,path 3 4 Private Sub Class_Initialize() 5 Set dict=server.CreateObject("Scripting.Dictionary") 6 End Sub 7 Private Sub Class_Terminate() 8 Set dict=Nothing 9 End Sub 10 11 '计算.ini文件的实际路径 12 '参数: 13 ' fpath ini文件路径,虚拟路径或实际路径 14 '返 阅读全文