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

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

- 中国WEB开发者网络 (http://www.webasp.net)
-- 技术教程 (http://www.webasp.net/article/)
--- Asp中关于Global.asa文件的编程（三） (http://www.webasp.net/article/4/3745.htm)

-- 作者：未知
-- 发布日期： 2003-07-11

作者: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>

webasp.net