Asp中关于Global.asa文件的编程(二)

类别:Asp 点击:0 评论:0 推荐:

功能是读取发布目录下的一个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

本文地址:http://com.8s8s.com/it/it9342.htm