 |
建站必读 |
 |
|
|
 |
|
 |
|
| |
| 当前位置：首页 -> 建站必读 -> ASP技术 |
|
Asp中关于Global.asa文件的编程（三） |
作者:virtualboy
功能是读取发布目录下的一个ini文件
If ***Section = 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>
|
| |
|
| |
本站关键词： |
|
|
|
|
 |
|
 |
|
