• 当前位置:首页>>ASP教程>>ASP综合技巧>>Asp中关于Global.asa文件的编程(三)
  • Asp中关于Global.asa文件的编程(三)
  • 作者:virtualboy

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

    If flgSection = True Then
          If Mid(strLineData,1,7) = "Service" Then
            strTempData = Trim(Mid(strLineData,8,Len(strLineData)-7))
            If Mid(strTempData,1,1) = "=" Then
              strTempData = Trim(Mid(strTempData,2,Len(strTempData)-1))
              Application.Lock
               Application("Service") = Mid(strTempData,2,Len(strTempData)-2)
              Application.UnLock
           End If
        End If
        If Mid(strLineData,1,4) = "User" Then
            strTempData = Trim(Mid(strLineData,5,Len(strLineData)-4))
            If Mid(strTempData,1,1) = "=" Then
            strTempData = Trim(Mid(strTempData,2,Len(strTempData)-1))
            Application.Lock
            Application("User") = Mid(strTempData,2,Len(strTempData)-2)
            Application.UnLock
          End If
    End If
    End If
    End If
    Wend
    objTs.Close
    Set objTs = Nothing
    Set objFs = Nothing
    End Sub
    </SCRIPT>



    [1]

  • 上一篇:自定义DataGrid分页设置
    下一篇:不用Global.asa实现在线人数统计