不用REPLACE(""," ")这一类方法。 最好用本身的机制解决。
S sportsman Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-12 #1 不用REPLACE(""," ")这一类方法。 最好用本身的机制解决。
W weiyx Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-12 #3 RecoverHTML = Replace(str, "&lt;", "<") RecoverHTML = Replace(RecoverHTML, "&gt;", ">") RecoverHTML = Replace(RecoverHTML, "&quot;", chr(34)) RecoverHTML = Replace(RecoverHTML, "<br>", vbCrLf)
RecoverHTML = Replace(str, "&lt;", "<") RecoverHTML = Replace(RecoverHTML, "&gt;", ">") RecoverHTML = Replace(RecoverHTML, "&quot;", chr(34)) RecoverHTML = Replace(RecoverHTML, "<br>", vbCrLf)
K kevinxie Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-14 #5 使用如下方法: <pre> 以下: 是妳輸入的內容 </pre>
Y yysun Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-18 #7 以下程序摘自大富翁源程序 set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DelphiBBS", "", "" SQL = "SELECT * FROM Letters where 1=0" Set RS = Server.CreateObject("ADODB.RecordSet") RS.Open SQL, Conn, 2, 2 RS.AddNew RS("UserFrom")=UserName RS("Subject")=T1 RS("ROOMID")=D1 RS("Content")=S1 ...... RS.Update RS.Close 其中.AddNew 和 .Update是关键点。
以下程序摘自大富翁源程序 set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DelphiBBS", "", "" SQL = "SELECT * FROM Letters where 1=0" Set RS = Server.CreateObject("ADODB.RecordSet") RS.Open SQL, Conn, 2, 2 RS.AddNew RS("UserFrom")=UserName RS("Subject")=T1 RS("ROOMID")=D1 RS("Content")=S1 ...... RS.Update RS.Close 其中.AddNew 和 .Update是关键点。
S shangcm Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-18 #8 我认为，问题的关键在于输出！ 用&lt;pre&gt;&lt;/pre&gt;将有格式的文本输出即可！ 如： &lt;pre&gt;sportman 你好： 你这么早就发贴子，是不是一夜没睡呀？ 快去吃早饭吧！ &lt;/pre&gt; 这样可以吗？
我认为，问题的关键在于输出！ 用&lt;pre&gt;&lt;/pre&gt;将有格式的文本输出即可！ 如： &lt;pre&gt;sportman 你好： 你这么早就发贴子，是不是一夜没睡呀？ 快去吃早饭吧！ &lt;/pre&gt; 这样可以吗？
S shangcm Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-18 #9 哦，对不起，应该是这样： <pre>sportman 你好： 你这么早就发贴子，是不是一夜没睡呀？ 快去吃早饭吧！ </pre>
