asp生成html源碼
① 求一個ASP生成HTML的源碼,謝謝了
也不是個難事，原理很簡單。會用VB做記事本么，實際上跟這個一樣，就是做一個保存純文本文件的功能，調用FSO即可。如下：
<%
Set fso=CreateObject("Scripting.FileSystemObject")
NewFile=Server.MapPath("/html/文件名.html")
'HTML文件的位置
Set t=fso.CreateTextFile(NewFile, True)
t.close
'新建了一個空白的純文本文件
File=Server.MapPath("/html/文件名.html")
Set txt=fso.OpenTextFile(File,8,True)'打開剛才創建的純文本文件
txt.Write "<html><head><title>這是一個靜態頁面</title></head><body>這里就是靜態頁面的內容了</body></html>"
'寫入內容
txt.Close
'OK了，就這么簡單
%>
創建的純文本文件的位置根據你自己需要調整吧，寫入到靜態頁面里的內容也可以加入動態獲取的內容，比如從資料庫里讀取的部分，比如"<title>"&rs("資料庫標題")&"</title>"。至於要使靜態頁面的代碼能換行，加入換行符比如"<html>"&chr(13)&chr(10)&"<head>"即可，這樣生成出來的HTML頁面的代碼就錯落有致了。
相信你有一定的ASP基礎，肯定能看得懂！
② asp 要怎麼才可以將文本轉換成 HTML 代碼
<%
function htmlencode2(fString)
if fString<>"" and not isnull(fString) then
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, chr(32), "")
fString = Replace(fString, CHR(10) & CHR(10), "</p><p>")
fString = Replace(fString, CHR(10), "<br>")
htmlencode2=fString
else
htmlencode2=""
end if
end function
%>
比如得到的要存入資料庫中的內容的變數是text
text=htmlencode2(text)
把處理後的text存入資料庫就可以了.