この記事では、HTMLを生成するためのASPのいくつかの方法について説明します。それを必要とする友人は、以下のコンテンツの詳細を参照できます。
方法1:FSO
fs = createObject( "scripting.filesystemObject")
newfile = server.mappath( "/asp/chap06/at/newfile.html")
'新しいファイル/newFile.htmlを作成します。ファイルが既に存在している場合は、上書きします
a = fs.createTextfile(newfile、true)を設定します
Response.Write「新しいファイルが作成されました!」
A.close
file = server.mappath( "newfile.html")
set txt = fs.opentextfile(file、8、true) '最後にデータを書き込むことができるファイルに開いています
data1 = "この文は、WriteLineメソッドを使用して書かれています!~~"
txt.writelineデータ1
data2 = "この文は書き込み方法を使用して書かれています!~~"
txt.write data2
txt.close
方法2:xmlhttp
xml = server.createobject( "microsoft.xmlhttp")を設定します
'次のアドレスをホームページのファイルアドレスに置き換えます。 http://で始まる絶対パスを必ず使用してください。そうすれば、相対パスを書くことはできません。
xml.open "get"、 "http://www.phpup.com"、false
xml.send
bodytext = xml.responsebody
bodytext = bytestobstr(bodytext、 "gb2312")
xml =何も設定しません
dim fso、myfile
fso = createObject( "Scripting.filesystemObject")
myfile = fso.createTextfile(server.mappath( "aa.htm")、trueを設定します)
myfile.writeline(bodytext)
myfile.close
他の:
1
次の例は、3つのダイナミクスです。INDENINE.SASP?ID = 1/index.asp?id = 2/index.asp?id = 3/
ページは、それぞれndex1.htm、index2.htm、index3.htmを生成し、ルートディレクトリにあります。
dim strurl、item_classid、id、filename、filepath、do_url、html_temp
html_temp = "
i = 1〜3の場合
html_temp = html_temp& "
item_classid = i
filename = "index"&item_classid& "。htm"
filepath = server.mappath( "/")& "/"&filename html_temp = html_temp&filepath& "
do_url = "http://"
do_url = do_url&request.servervariables( "server_name")& "/main/index.asp"
do_url = do_url& "?item_classid ="&item_classid
strurl = do_url
dim objxmlhttp
objxmlhttp = server.createObject( "microsoft.xmlhttp")を設定します
objxmlhttp.open "get"、strur、false
objxmlhttp.send()
薄暗いbinfiledata
binfiledata = objxmlhttp.responsebody
薄暗いobjadostream
objadostream = server.createObject( "adodb.stream")を設定します
objadostream.type = 1
objadostream.open()
objadostream.write(binfiledata)
objadostream.savetofile filepath、2
objadostream.close()
次
html_temp = html_temp& "
%>
Response.write( "resulterfullyted file:")
Response.write( "
「)
respons.write html_temp
%>
関数bytestobstr(body、cset)
DIM OBJSTREAM
objstream = server.createObject( "adodb.stream")を設定します
objstream.type = 1
objstream.mode = 3
objstream.open
objstream.write body
objstream.position = 0
objstream.type = 2
objstream.charset = cset
bytestobstr = objstream.readtext
objstream.close
objstream = Nothingを設定します
エンド関数
%>
2
public TemplateFile、tmpdata
subile() 'ファイルを開き、ファイルの内容をtmpdataに入れます
エラーの再開時に次に再開します
tmpdata = ""
asstream = server.createObject( "adodb.stream")を設定します
ASSTREAM.TYPE = 2'FILEタイプテキスト
asstream.mode = 3 '読み取りと書き込み
asstream.open
asstream.charset = "gb2312" '文字セット
asstream.loadfromfile(tempelatefile) 'ファイルからのロード
assp = astream.size
err.number0の場合
xz = -18
Response.Write TemplateFile& "
「
err.clear
tmpdata = ""
それ以外
tmpdata = astream.readtext(assp)
ifを終了します
End Sub
sub save_file()
ofile()
recfilen = server.mappath(dts)
asstream.flush
asstream.close
asstream.type = 2
asstream.mode = 3
asstream.open
asstream.charset = "gb2312"
asstream.position = 0
ASSTREAM.WRITETEXT TMPDATA、1'Writeデータをストリーミングします
asstream.savetofile recfilen、2'save file
End Sub
function dts() 'はランダムファイル名を生成します
len(month(now()))> 1の場合
mm =月(now())
それ以外
mm = "0"&month(now())
ifを終了します
len(day(now()))> 1の場合
d = day(now())
それ以外
d = "0"&day(now())
ifを終了します
len(hour(now()))> 1の場合
h = hour(now())
それ以外
h = "0"&hour(now())
ifを終了します
len(minute(now()))> 1の場合
m = minute(now())
それ以外
m = "0"&minute(now())
ifを終了します
len(2番目(now()))> 1の場合
s = second(now())
それ以外
s = "0"&second(now())
ifを終了します
ランダム化
upperbound = 9999
低い= 1000
rds = int((upperbound -lowerbound + 1) * rnd + lowerbound)
dts = "htm/"&year(now())&mm&d&h&m&s&rds& "。htm"
エンド関数
title = request.form( "title")
content = request.form( "content")
TMPDATA =交換(TMPDATA、 "
TMPDATA =交換(TMPDATA、 "
templateFile = server.mappath( "tempelate/1.htm") 'テンプレートファイル
save_file()
%>
上記は、ASPによってHTMLを生成するいくつかの方法です。あなたはそれについて学んだと思います。関連するコンテンツについては、引き続きWuxin Technologyチャネルに注意を払います。