{"id":775,"date":"2011-11-18T00:14:22","date_gmt":"2011-11-17T16:14:22","guid":{"rendered":""},"modified":"2014-03-11T22:40:46","modified_gmt":"2014-03-11T14:40:46","slug":"%e7%94%a8asp%e7%94%9f%e6%88%90html%e7%9a%84%e6%96%b0%e6%96%b9%e6%b3%95","status":"publish","type":"post","link":"http:\/\/www.xiaoyebailong.com\/index.php\/2011\/11\/18\/775.htm","title":{"rendered":"\u7528ASP\u751f\u6210html\u7684\u65b0\u65b9\u6cd5"},"content":{"rendered":"

\u7f51\u4e0a\u5df2\u6709\u5f88\u591a\u5173\u4e8e\u751f\u6210html<\/font><\/a>\u7684\u65b0\u95fb\u7cfb\u7edf\uff0c\u4f46\u662f\u90fd\u662f\u7528\u7684\u6a21\u677f\uff0c\u672c\u51fd\u6570\u5b9e\u73b0\u628aasp<\/font><\/a>\u9875\u9762\u4ea7\u751f\u7684html<\/font><\/a>\u4ee3\u7801\u4fdd\u5b58\u6210\u4e3a\u4e00\u4e2ahtml\u6587\u4ef6\uff0c\u8fd9\u6837\u5c31\u6ca1\u6709\u5fc5\u8981\u6539\u52a8\u539f\u6765\u7684\u9875\u9762\u5c31\u53ef\u4ee5\u8f7b\u677e\u5b8c\u6210\u4e00\u4e2a\u751f\u6210html\u7684\u65b0\u95fb\u7cfb\u7edf\u4e86\u3002^_^
\n\u7531\u4e8e\u4ee3\u7801\u6bd4\u8f83\u77ed\uff0c\u8fd9\u91cc\u5c31\u4e0d\u8fdb\u884c\u6ce8\u91ca\u4e86 <\/p>\n

\u4ee5\u4e0b\u4e3a\u5f15\u7528\u7684\u5185\u5bb9\uff1a<\/p>\n

<%
\n”\u5f53\u76ee\u6807\u9875\u9762\u7684\u5305\u542b\u6587\u4ef6\u5373#include\u7684\u9875\u9762\u91cc\u8fb9\u5b58\u5728response.End()\u7684\u65f6\u5019\u672c\u7a0b\u5e8f\u6709\u95ee\u9898
\n”\u6ce8\u610f\uff1a\u672c\u6587\u4ef6\u4e00\u5b9a\u8981\u653e\u572820041227111723.htm\u6307\u5411\u7684\u6587\u4ef6\u7684\u540c\u4e00\u76ee\u5f55\u4e0b
\ndim hughchiu_rtcode
\nFunction get<\/font><\/a>_exe_code(20041227111723.htm)
\ndim execode
\ndim tmp_str
\nDim re,re1,content,fso,f,as<\/font><\/a>pStart,aspEnd
\ndim ms,m
\nexecode = ""
\nset fso=CreateObject("Scrip<\/font><\/a>ting.FileSystemObject")
\nset f=fso.OpenTextFile(server<\/font><\/a>.mappath(20041227111723.htm))
\ncontent=f.ReadAll
\nf.close
\nset f=nothing
\nset fso=nothing <\/p>\n

set re = new regexp
\nre.ignorecase = true
\nre.global = true
\nre.pattern = "\\<\\%\\@[^\\%]+\\%\\>"
\ncontent = re.replace(content,"") <\/p>\n

re.global = false
\nre.pattern = "\\<\\!\\-\\-\\s*\\#include\\s*file\\s*=\\s*\\""([^\\""]+)\\""\\s*\\-\\-\\>"
\ndo
\nset ms = re.execute(content)
\nif ms.count<>0 then
\nset m = ms(0)
\ntmp_str = get_exe_code(m.submatches(0))
\ncontent = re.replace(content, tmp_str)
\nelse
\nexit do
\nend if
\nloop
\nset m = nothing
\nset ms = nothing <\/p>\n

re.pattern="^\\s*="
\naspEnd=1
\naspStart=inStr(aspEnd,content,"<%")+2 <\/p>\n

set re1=new RegExp
\nre1.ignorecase = true
\nre1.global = false
\nre1.pattern = "response\\.Write(.+)" <\/p>\n

do while aspStart>aspEnd+1
\nexecode = execode&vbcrlf&" hughchiu_rtcode = hughchiu_rtcode&"""&replace( replace(Mid(content,aspEnd,aspStart-aspEnd-2),"""",""""""), vbcrlf, """&vbcrlf&""")&""""&vbcrlf
\naspEnd=inStr(aspStart,content,"%\\>")+2
\ntmp_str = Mid(content,aspStart,aspEnd-aspStart-2) <\/p>\n

do
\nset ms = re1.execute(tmp_str)
\nif ms.count<>0 then
\nset m = ms(0)
\ntmp_str = re1.replace(tmp_str, " hughchiu_rtcode = hughchiu_rtcode&"&m.submatches(0))
\nelse
\nexit do
\nend if
\nloop <\/p>\n

set m = nothing
\nset ms = nothing <\/p>\n

execode = execode& re.replace(tmp_str,"hughchiu_rtcode = hughchiu_rtcode&") <\/p>\n

aspStart=inStr(aspEnd,content,"<%")+2
\nloop <\/p>\n

set re1 = nothing
\nset re=nothing <\/p>\n

execode = execode&vbcrlf&" hughchiu_rtcode = hughchiu_rtcode&"""&replace( replace(Mid(content,aspEnd), """", """"""), vbcrlf, """&vbcrlf&""" )&""""&vbcrlf
\nget_exe_code = "<%"&execode&"%\\>"
\nEnd Function <\/p>\n

function asp2html(20041227111723.htm)
\ndim code
\ncode = replace( replace( replace( get_exe_code(20041227111723.htm), "hughchiu_rtcode = hughchiu_rtcode&"""""&vbcrlf, "" ), "<%", "" ), "%\\>", "" )
\n”response.Write(code)
\nexecute(code)
\n”response.Write( hughchiu_rtcode )
\nasp2html = hughchiu_rtcode
\nend function
\n%> <\/p>\n

\n\u4f7f\u7528\u8303\u4f8b\uff1a <\/p>\n

\u4ee5\u4e0b\u4e3a\u5f15\u7528\u7684\u5185\u5bb9\uff1a<\/p>\n

\n\u3000\u3000set fso=CreateObject("Scripting.FileSystemObject")
\n\u3000\u3000set f=fso.CreateTextFile( server<\/font><\/a>.mappath( "youpage.htm" ), true )
\n\u3000\u3000f.WriteLine( asp2html("youpage.asp") )
\n\u3000\u3000f.close
\n\u3000\u3000set f = nothing
\n\u3000\u3000set fso = nothing<\/p>\n","protected":false},"excerpt":{"rendered":"

\u7f51\u4e0a\u5df2\u6709\u5f88\u591a\u5173\u4e8e\u751f\u6210html\u7684\u65b0\u95fb\u7cfb\u7edf\uff0c\u4f46\u662f\u90fd\u662f\u7528\u7684\u6a21\u677f\uff0c\u672c\u51fd\u6570\u5b9e\u73b0\u628aasp\u9875\u9762\u4ea7\u751f\u7684html\u4ee3\u7801\u4fdd\u5b58\u6210\u4e3a\u4e00\u4e2ahtml\u6587\u4ef6\uff0c\u8fd9\u6837\u5c31\u6ca1\u6709\u5fc5\u8981\u6539\u52a8\u539f\u6765\u7684\u9875\u9762\u5c31\u53ef\u4ee5\u8f7b\u677e\u5b8c\u6210\u4e00\u4e2a\u751f\u6210html\u7684\u65b0\u95fb\u7cfb\u7edf\u4e86\u3002^_^ \u7531\u4e8e\u4ee3\u7801\u6bd4\u8f83\u77ed\uff0c\u8fd9\u91cc\u5c31\u4e0d\u8fdb\u884c\u6ce8\u91ca\u4e86 …<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1],"tags":[],"topic":[],"class_list":["post-775","post","type-post","status-publish","format-standard","hentry","category-technology"],"_links":{"self":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts\/775","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/comments?post=775"}],"version-history":[{"count":1,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts\/775\/revisions"}],"predecessor-version":[{"id":66626,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/posts\/775\/revisions\/66626"}],"wp:attachment":[{"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/media?parent=775"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/categories?post=775"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/tags?post=775"},{"taxonomy":"topic","embeddable":true,"href":"http:\/\/www.xiaoyebailong.com\/index.php\/wp-json\/wp\/v2\/topic?post=775"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}