Asp中关于Global.asa文件的编程（二）

功能是读取发布目录下的一个ini文件

While Not objTs.AtEndOfStream
strLineData = objTs.ReadLine
　If Trim(strLineData) <> "" Then
If flgSection = True And Mid(strLineData,1,1) = "[" And _
　　Mid(strLineData,Len(strLineData),1) = "]" Then
　　　objTs.Close
　Set objTs = Nothing
　　　Set objFs = Nothing
　　　Exit Sub
　　End If

　　If strLineData = CONST_DB_SECTION Then
　　　flgSection = True
　　 End If