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

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