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

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

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

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

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

<OBJECT ID="agobjOraSession" RUNAT="Server" PROGID="OracleInProcServer.XOraSession" SCOPE="APPLICATION">
</OBJECT>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Const CONST_FL_NAME = "\GetAttributeCode.ini"
Const CONST_FL_FORREADING = 1
Const CONST_DB_SECTION = "[DB_CONNECTION]"Sub Application_OnStart
On Error Resume Next

Dim objFs
Dim objTs
Dim strLineData
Dim flgSection
Dim strTempData

Application("Service") = ""
Application("User") = ""
strLineData = ""
strTempData = ""
flgSection = False

Set objFs = Server.CreateObject ("Scripting.FileSystemObject")
Set objTs = objFs.OpenTextFile(Server.MapPath(CONST_FL_NAME),CONST_FL_FORREADING,False)
If Err.Number <> 0 Then
　　Err.Clear
　Set objTs = Nothing
　　Set objFs = Nothing
　　Exit Sub
End If

webasp.net