推奨：ASPスクリプトテクノロジーの使用方法VBスクリプトでは、変数を定義したり、他のスクリプト言語でそれらのタイプを明示的に定義する必要はありません。最初に使用するときに変数が存在します。ただし、この機能により、コードはタイプスクリプトに広く存在することができます。コード内の変数名を誤って定義すると、新しい変数が作成されます。スクリプトが正しく機能しない場合があります。
ASPでHTMLを生成する方法は？ HTMLを生成するニュースシステムはすでに多くありますが、すべてテンプレートを使用しています。この関数は、ASPページによって生成されたHTMLコードをHTMLファイルに保存するため、HTMLを生成するニュースシステムを簡単に完了するために元のページを変更する必要はありません。 ^_^
コードは短いので、ここではコメントしません
以下は引用されたコンテンツです。 <％ 'ターゲットページにファイル、つまり#includeページが含まれている場合、このプログラムに問題があります。 '注：このファイルは、20041227111723.htmまでに指摘されたファイルと同じディレクトリに配置する必要があります dim hughchiu_rtcode 関数get_exe_code（20041227111723.htm） dime execode DIM TMP_STR dim re、re1、content、fso、f、aspstart、aspend 薄暗いms、m execode = fso = createObject（scripting.filesystemObject）をset f = fso.opentextfile（server.mappath（20041227111723.htm）を設定） content = f.readall f.close f =何も設定しません FSO =何も設定しません re = new regexpを設定します re.ignorecase = true re.global = true Re.pattern =/</％/@[^/％]/％/////////////////// content = re.replace（content、） re.global = false re.pattern =/</！/ - / - /s*/＃include/s*file/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） それ以外 終了します ifを終了します ループ M = Nothingを設定します MS =何も設定しません re.pattern =^/s*= Aspend = 1 ASPSTART = Instr（Aspend、Content、<％）2 re1 = new regexpを設定します re1.ignorecase = true re1.global = false re1.pattern = response/.write（。） aspstart> aspend 1を実行します execode = execode＆vbcrlf＆hughchiu_rtcode = hughchiu_rtcode && facty（mid（content、aspstart-aspend-2）,,）、vbcrlf、＆vbcrlf＆）&& vbcrlf aspend = strunt（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）） それ以外 終了します ifを終了します ループ M = Nothingを設定します MS =何も設定しません execode = execode＆re.replace（tmp_str、hughchiu_rtcode = hughchiu_rtcode＆） ASPSTART = Instr（Aspend、Content、<％）2 ループ re1 =何も設定しません re =何も設定しません execode = execode＆vbcrlf＆hughchiu_rtcode = hughchiu_rtcode && cheplage（falling（mid（content、aspend）、）、vbcrlf、＆vbcrlf＆&& vbcrlf get_exe_code = <％＆execode＆％/> エンド関数 関数ASP2HTML（20041227111723.htm） 薄暗いコード code = cheplace（leplage（get_exe_code（20041227111723.htm）、hughchiu_rtcode = hughchiu_rtcode && vbcrlf、）、<％、）、％/>、）） 'Response.Write（コード） execute（code） 'Response.Write（hughchiu_rtcode） asp2html = hughchiu_rtcode エンド関数 ％> |
使用例：
以下は引用されたコンテンツです。 fso = createObject（scripting.filesystemObject）をset f = fso.createTextfile（server.mappath（youpage.htm）、true）を設定 f.writeLine（asp2html（youpage.asp）） f.close f =何も設定しません FSO =何も設定しません |
共有：ASP変数を始める方法変数は情報を保存するために使用されます。変数がサブルーチンの外側で宣言されている場合、ASPファイルの任意のスクリプトによって変数を変更できます。変数がサブルーチンで宣言されている場合、サブルーチンが実行されるたびに作成および取り消されます。例：変数を次のように宣言します。HTMLボディ％DIM名name = Donald Duck Response。