Я недавно занялся разработкой классического приложения ASP после того, как ушел единственный разработчик проекта.Ниже приведен фрагмент кода, который, на мой взгляд, я не могу извлечь из пользы, может, некоторые из вас, более опытные парни и девушки, могли бы пролить свет на логику?
В разделе заголовканашей страницы default.asp код вызывает другую страницу asp с параметром для загрузки / включения некоторых файлов.Эта страница asp читает параметр и затем выбирает массив файлов.Затем он проходит через этот массив и для каждого объекта в массиве выполняет следующую функцию:
Sub SendFile(ByRef sFilename)
If Len(sFilename) = 0 Then
Exit Sub
End If
If IsEmpty([__SendFile_sSuffixCompressed]) Then
[__SendFile_sSuffixCompressed] = ".js"
End If
If IsEmpty([__SendFile_fso]) Then
Set [__SendFile_fso] = Server.CreateObject("Scripting.FileSystemObject")
End If
Dim sPath
sPath = Server.MapPath(sFilename)
Dim stream
Dim sData
Set stream = Server.CreateObject("ADODB.Stream")
Response.Write sPath
With stream
.Charset = "utf-8"
.Type = 2
.Open
.LoadFromFile sPath
sData = .ReadText
.Close
End With
OurResponse.Write sData
End Sub
Я бы подумал, что это будет способ динамической загрузки этих файлов, но не так либыло бы намного проще просто иметь условный IF-блок вокруг нормальной строки <script src"...>
?