これらのコードが初めて送信されるか、あなたがそれを使用していない場合、私はそれを使用しています。私が書くときはできるだけシンプルです。
ウェブサイト、ブログなどにRSS集約関数を追加し、RSS.ASPの重合コードを指定して、あなたがどのように反応するかを確認してください。
http://www.nbpda.com/rss.aspの外観をデバッグして表示するのに便利です
テスト後、ほとんどの総読者をサポートします
次のコードはrss.aspとして保存されます
以下はコードフラグメントです。
| 以下はコードフラグメントです。 <！ - ＃include file = "conn.asp" - > <％ strurl = "http：//"＆request.servervariables（ "server_name"）＆_ 左（request.servervariables（ "script_name"）、len（request.servervariables（ "script_name"））-len（ "/rss.asp"）//ファイル名の名前はあなたの名前です sql = "[テーブル名] descで[表名]注文から上位100 *を選択します" //実際の変更によると、トップ100は最新の100項目であり、自分で修正します。同時に、クエリ条件を追加できます。ここでxxx = 1 .... rs = server.createObject（ "adodb.oldset"）を設定します rs.oopen sql、conn、1,1 Response.ContentType = "text/xml" respons.write "<？xmlバージョン=" "1.0" "encoding =" gb2312 ""？> "＆vbcrlf Response.write "<rss version =" "2.0" ""> "＆vbcrlf Response.Write "<Channel>"＆vbcrf Response.Write "<title> xxx.com RSS Feed </title>"＆vbcrlf Response.Write "<link>"＆srurl＆ "</link>"＆vbcrip Response.write "<language> zh-cn </leganication>"＆vbcrlf Response.Write "<Copyright> xxx.comCopyright>"＆vbcrlfのRSSフィード rs.eofではありませんが Response.Write "<tem>"＆vbcrlf Response.Write "<Title> <！[" ""＆rs（ "title"）＆ "] >> </title>"＆vbcrlf Respons.write "<link>"＆strurl＆ "/xxxx.asp？id ="＆rs（ "id"）＆ "</link>"＆vblockff Response.Write "<説明> <！[" "" ""＆rs（ "テーマフィールド"）＆ "<br />"＆rs（ "content field"）＆ "<br /> <br />]> < /description> "＆vbcrf respons.write "<pubdate>"＆return_rfc822_date（rs（ "time field"）、 "gmt"）＆ "</pubdate>"＆vbcrlfff Response.Write "</item>"＆vbcrf rs.movenext ウェンド respons.write "</channel>"＆vbcrlf Response.Write "</rss>"＆vbcrlf rs.close rs = Nothingを設定します function return_rfc822_date（byval mydate、byval timezone） myday、mydays、mymonth、myyear 薄暗いmyhours、myminutes、myseconds mydate = cdate（mydate） myday = enweekdayname（mydate） mydays = right（ "00"＆day（mydate）、2） mymonth = enmonthname（mydate） myyear = year（mydate） myhours = right（ "00"＆hour（mydate）、2） myminutes = right（ "00"＆minute（mydate）、2） myseconds = right（ "00"＆2番目（mydate）、2） return_rfc822_date = myday＆ "、"＆_ mydays＆ "＆_ mymonth＆ "＆_ myyear＆ ""＆_ 私の家 ＆ "：" ＆ _ myminutes＆ "："＆_ myseconds＆ ""＆_ ""＆timezone エンド関数 関数enweekdayname（inputdate） 薄暗い結果 ケースの平日を選択します（inputdate、1） ケース1：result = "sun" ケース2：result = "mon" ケース3：result = "tue" ケース4：result = "wed" ケース5：result = "thu" ケース6：result = "fri" ケース7：result = "sat" [選択]を終了します enweekdayname = result エンド関数 function enmonthname（inputdate） 薄暗い結果 ケース月（inputdate）を選択します ケース1：result = "jan" ケース2：result = "feb" ケース3：result = "mar" ケース4：結果= "APR" ケース5：result = "may" ケース6：結果= "jun" ケース7：結果= "Jul" ケース8：result = "aug" ケース9：result = "sep" ケース10：結果= "OCT" ケース11：結果= "nov" ケース12：result = "dec" [選択]を終了します enmonthname = result エンド関数 ％> |