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

精彩推荐

分类最新教程

分类热点教程

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

作者：未知

日期：2003-07-11

人气：

投稿：Andy.m(转贴)

来源：未知

字体：大中小

收藏：加入浏览器收藏

以下正文：

作者:virtualboy

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

相关文章：