91久久久久久久久_欧美日韩中文_在线观看中文字幕亚洲_夜夜骑首页_精品久久伊人_天天色天天射天天操

當前位置: 首頁IT技術 → ASP中動態include文件實例代碼分享

ASP中動態include文件實例代碼分享

更多

提供給大家一個ASP中動態include文件代碼實例 ,希望能夠對大家有用。

受<! #include file="filename.asp" --> 宏限制,必須存在該文件并且會預先編譯(不管前面是否加以條件)。經常有這樣的要求,根據不同的需求要求include不同的文件,如各個人的不同設置,所以要求能動態include文件。

    代碼如下:

Function include(filename)
  Dim re,content,fso,f,aspStart,aspEnd
  set fso=CreateObject("Scripting.FileSystemObject")
  set f=fso.OpenTextFile(server.mappath(filename))
  content=f.ReadAll
  f.close
  set f=nothing
  set fso=nothing
  set re=new RegExp
  re.pattern="^\s*="
  aspEnd=1
  aspStart=inStr(aspEnd,content,"<%")+2
  do while aspStart>aspEnd+1
    Response.write Mid(content,aspEnd,aspStart-aspEnd-2)
    aspEnd=inStr(aspStart,content,"%\>")+2
    Execute(re.replace(Mid(content,aspStart,aspEnd-aspStart-2),"Response.Write "))
    aspStart=inStr(aspEnd,content,"<%")+2
  loop
  Response.write Mid(content,aspEnd)
  set re=nothing
End Function

    使用范例:

include("youinc.asp")
熱門評論
最新評論
昵稱:
表情: 高興 可 汗 我不要 害羞 好 下下下 送花 屎 親親
字數: 0/500 (您的評論需要經過審核才能顯示)
主站蜘蛛池模板: 欧美日韩成人一区二区 | 夜夜操影院 | 亚洲欧美日韩成人 | 国产无遮挡 | 国产精品成人在线观看 | 亚洲免费黄色 | 在线观看av的网站 | 久久a级片| 女人av在线 | 二区三区在线观看 | 亚洲精品在线看 | 福利网站在线观看 | 亚洲 欧美 日韩 在线 | 午夜影视| 久久福利视频导航 | 欧美激情一区 | 午夜视频一区二区三区 | 夜夜嗨av一区二区三区网页 | 久久久久久久网站 | 午夜精品久久久久久久 | 日日爱视频 | 国产一级一片免费播放放a 免费国产视频 | 国产色视频一区二区三区qq号 | 成人羞羞国产免费 | 久久综合国产 | 理论片中文字幕 | 国产性猛交╳xxx乱大交 | 亚洲国产天堂 | 夜夜草导航| 天堂免费av | 日韩精品国产精品 | 九九热视频在线 | 日韩一区二区在线播放 | 加勒比一区二区三区 | 韩日精品视频 | 国产激情一区二区三区 | 蜜桃精品噜噜噜成人av | 中文毛片 | 亚洲激情欧美激情 | www黄色片 | 免费看黄网 |