Рекомендуется: как использовать технологию сценариев ASP В сценариях VB вам не нужно определять переменные или явно определять их типы на других языках сценариев. Переменная существует, когда вы впервые ее используете. Тем не менее, эта функция позволяет вашему коду широко существовать в типовых процессах. Если вы ошибочно определите имя переменной в коде, будет создана новая переменная. Ваш сценарий может не работать должным образом.
Как генерировать HTML в ASP? Уже есть много новостных систем, которые генерируют HTML, но все они используют шаблоны. Эта функция сохраняет код HTML, сгенерированный страницей ASP в HTML -файл, поэтому нет необходимости изменять исходную страницу, чтобы легко заполнить новостную систему, которая генерирует HTML. ^_^
Поскольку код короткий, я здесь не буду комментировать
Ниже приведено цитируемое содержание: <% «Когда целевая страница содержит файл, то есть страница #include, есть проблема с этой программой. Примечание: этот файл должен быть помещен в тот же каталог, что и файл, указанный к 20041227111723.htm Dim hughchiu_rtcode Функция get_exe_code (20041227111723.htm) Dim Execode Dim tmp_str Dim Re, Re1, Content, FSO, F, Aspstart, Aspend Dim MS, m execode = Установить fso = createObject (scripting.filesystemobject) Установите f = fso.opentextfile (server.mappath (20041227111723.htm))) Контент = F.Readall F.Close Установите F = ничего Установить FSO = ничего SET RE = новая режима re.ignorecase = true re.global = true re.pattern =/</%/@[^/%]/%/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// Content = re.replace (Content,) re.global = false re.pattern = /</!/-/-/s*/#include/s*file/s*=/s*/([^/] )//s*/-///////////////////////////////// делать Установите MS = re.Execute (Content) Если Ms.count <> 0, то Установите M = MS (0) tmp_str = get_exe_code (m.submatches (0)) content = re.replace (content, tmp_str) еще Выход DO конец, если петля Установить M = ничего Установить MS = ничего re.pattern =^/s*= Append = 1 aspstart = instr (aspend, content, <%) 2 Установите RE1 = новая режима re1.ignorecase = true re1.global = false re1.pattern = response/.write (.) Делай, пока aspstart> aspend 1 execode = execrode & vbcrlf & hughchiu_rtcode = hughchiu_rtcode && reply (reply (mid (content, aspend, aspstart-aspend-2) ,,), vbcrlf, & vbcrlf &) && vbcrlf aspend = instr (aspstart, content,%/>) 2 tmp_str = mid (content, aspstart, aspend-aspstart-2) делать Установить MS = re1.execute (tmp_str) Если Ms.count <> 0, то Установите M = MS (0) tmp_str = re1.replace (tmp_str, hughchiu_rtcode = hughchiu_rtcode && m.submatches (0)) еще Выход DO конец, если петля Установить M = ничего Установить MS = ничего execude = execude & re.replace (tmp_str, hughchiu_rtcode = hughchiu_rtcode &) aspstart = instr (aspend, content, <%) 2 петля Установить RE1 = ничего установить re = ничего execude = execrode & vbcrlf & hughchiu_rtcode = hughchiu_rtcode && reply (reply (mid (content, aspend),,), vbcrlf, & vbcrlf &) && vbcrlf get_exe_code = <%& execode &%/> Конечная функция Функция asp2html (20041227111723.htm) Dim Code Code = reply (replace (replace (get_exe_code (20041227111723.htm), hughchiu_rtcode = hughchiu_rtcode && vbcrlf,), < %,), %/>,) 'response.write (код) выполнить (код) 'response.write (hughchiu_rtcode) asp2html = hughchiu_rtcode конечная функция %> |
Пример использования:
Ниже приведено цитируемое содержание: Установить fso = createObject (scripting.filesystemobject) Установить f = fso.createTextFile (server.mappath (youpage.htm), true) F.WriteLine (asp2html (youpage.asp)) F.Close Установить f = ничего Установить FSO = ничего |
Поделиться: как начать с переменными ASP Переменные используются для хранения информации. Если переменная объявлена вне подпрограммы, переменная может быть изменена любым скриптом в файле ASP. Если переменная объявлена в подпрограмме, она будет создана и отозвана каждый раз, когда выполняется подпрограмма. Пример: объявить переменную следующим образом: HTML Body % DIM NAME = Дональд Дак Ответ.