หน้าแรก>บทช่วยสอนการเขียนโปรแกรมเครือข่าย>กวดวิชา ASP

ASP พัฒนาบอร์ดข้อความที่ใช้ XML

ผู้เขียน：Eve Cole เวลาอัปเดต：2025-03-02 20:16:01

XML (ภาษามาร์กอัปที่ขยายได้) เป็นภาษามาร์กอัปตามรูปแบบข้อความ ต่อไปนี้ใช้ XML เป็นตัวพาข้อมูลเพื่อพัฒนาบอร์ดข้อความที่ใช้ XML

XML (ภาษามาร์กอัปที่ขยายได้) เป็นภาษามาร์กอัปตามรูปแบบข้อความ เนื่องจาก XML มุ่งเน้นไปที่คำอธิบายของเนื้อหาข้อมูลจึงมีความหมายมากสำหรับการดึงข้อมูล ในทางกลับกันไฟล์ XML เป็นพาหะของข้อมูล ด้วยการมีส่วนร่วมอย่างแข็งขันของ บริษัท คอมพิวเตอร์รายใหญ่ทั่วโลก XML กำลังกลายเป็นมาตรฐานสำหรับรูปแบบข้อมูลบนอินเทอร์เน็ตรุ่นต่อไป ต่อไปนี้ใช้ XML เป็นตัวพาข้อมูลเพื่อพัฒนาบอร์ดข้อความที่ใช้ XML

ก่อนอื่นเราสร้าง File Guestbook.xml ไฟล์ XML ซึ่งบันทึกชื่ออีเมล URL และเนื้อหาข้อความของผู้วิจารณ์ แน่นอนเราสามารถเพิ่มข้อมูลได้มากเท่าที่เราต้องการ

เนื้อหาไฟล์มีดังนี้:

  1. <? xMlVersion = 1.0ENCODING = GB2312?>
  2. <สมุดข้อความ>
  3. <บันทึกข้อความ>
  4. <ชื่อของผู้วิจารณ์> Meng Xianhui </ชื่อของผู้วิจารณ์>
  5. <mail> [email protected] </email>
  6. <sweels> http://go.163.com/~colorweb </sitefiteal>
  7. <เนื้อหาข้อความ> ทดสอบสำเร็จ! - </เนื้อหาข้อความ>
  8. </บันทึกข้อความ>
  9. </หนังสือข้อความ>

เนื่องจากเซิร์ฟเวอร์จำนวนมากรองรับ ASP เราจึงใช้ ASP เป็นเครื่องมือในการใช้งาน

  1. <%@language = vbscript%>
  2. -
  3. 'ตั้งค่าข้อมูลของหน้าเว็บ
  4. response.buffer = true
  5. Response.expires = -1
  6. 'แสดงฟังก์ชั่นข้อความเริ่มต้น ()
  7. functionInit ()
  8. entrentform ()
  9. 'กำหนดตัวแปรท้องถิ่น
  10. dimobjxml
  11. ชื่อ dimarrname
  12. dimarremails
  13. dimarrurls
  14. dimarrmessages
  15. 'สร้างวัตถุเอกสาร XMLDOM เพื่อจัดเก็บข้อความ
  16. setObjxml = server.createObject (msxml2.domDocument)
  17. objxml.async = false
  18. objxml.load (server.mappath (guestbook.xml)))
  19. 'รับคอลเลกชันขององค์ประกอบของสมุดข้อความ
  20. setArnames = objxml.getElementsByTagname (ชื่อของผู้วิจารณ์)
  21. setArremails = objxml.getElementsByTagname (อีเมล)
  22. setArrurls = objxml.getElementsByTagname (เว็บไซต์)
  23. SetarrMessages = objxml.getElementsByTagname (เนื้อหาข้อความ)
  24. Response.write <TableBorder = '0'Width =' 100%'>
  25. Response.write <tr> <tdbgColor = '#00ccff'align =' center'Height = '26 '>
  26. Response.write <b> ความคิดเห็นของแพทย์มีดังนี้: </b>
  27. Response.write </td> </tr>
  28. 'เนื้อหาเอาท์พุทของแต่ละองค์ประกอบของสมุดข้อความข้อความล่าสุดจะแสดงก่อน
  29. forx = arrnames.length-1to0step-1
  30. Response.write <tr> <td> <ahref = mailto: & arremails.item (x) .Text &> & arnames.Item (x) .Text & </a> </td> </tr>
  31. Response.write <tr> <td> เว็บไซต์: <ahref = & arrurls.item (x) .text & target = '_ blank'> & arrurls.item (x) .Text & </a> <td> </tr>
  32. Response.write <tr> <td> เนื้อหาข้อความ: </td> </tr>
  33. Response.write <tr> <tdbgColor = '#0099ff'> & arrMessages.Item (x) .Text & </td> </tr>
  34. Response.write <tr> <td> </td> </tr>
  35. ต่อไป
  36. Response.write </bable>
  37. setObjxml = ไม่มีอะไร
  38. endfunction
  39. 'ฟังก์ชั่นเพื่อเพิ่มบันทึกข้อความไปยัง Addentry ไฟล์ XML ()
  40. functionAddentry ()
  41. 'กำหนดตัวแปรท้องถิ่น
  42. Dimstrname
  43. Dimstremail
  44. Dimstrurl
  45. dimstrmessage
  46. 'รับเนื้อหาอินพุตของแบบฟอร์มข้อความ
  47. strName = request.form (ชื่อ)
  48. stremail = request.form (อีเมล)
  49. strurl = request.form (เว็บไซต์)
  50. strMessage = request.form (ฝากข้อความ)
  51. dimobjxml
  52. dimobjentry
  53. dimobjname
  54. dimobjemail
  55. dimobjurl
  56. dimobjmessage
  57. 'เพิ่มเนื้อหาข้อความลงในไฟล์ XML
  58. setObjxml = server.createObject (msxml2.domDocument)
  59. objxml.async = false
  60. objxml.load (server.mappath (guestbook.xml)))
  61. setObjentry = objxml.createnode (องค์ประกอบ, บันทึกข้อความ,)
  62. OBJXML.DocumentElement.AppendChild (OBJENTRY)
  63. setObjname = objxml.createnode (องค์ประกอบชื่อของผู้วิจารณ์)
  64. objentry.appendchild (objname)
  65. objname.text = strName
  66. setObjemail = objxml.createnode (องค์ประกอบ, อีเมล,)
  67. objentry.appendchild (objemail)
  68. objemail.text = stremail
  69. setobjurl = objxml.createnode (องค์ประกอบ, url,)
  70. objentry.appendchild (objurl)
  71. objurl.text = strurl
  72. setObjMessage = objxml.createnode (องค์ประกอบ, เนื้อหาข้อความ,)
  73. objentry.appendchild (objmessage)
  74. objmessage.text = strMessage
  75. objxml.save (server.mappath (guestbook.xml)))
  76. Response.redirect (guestbook.asp)
  77. endfunction
  78. 'กรอกและส่งฟังก์ชั่นฟอร์มข้อความ entryform ()
  79. functionentryform ()
  80. Response.write <palign = 'center'> <b> ตัวอย่างสมุดข้อความ XML </b> </p>
  81. response.write <hrcolor = '#000099'Width =' 100%'noshade>
  82. Response.write <formaction = guestbook.asp? action = addentryMethod = post>
  83. Response.write <TableBorder = 1>
  84. Response.write <tr> <td> ชื่อของคุณ: </td> <td> <putryType = textName = NAME/> </td> </tr>
  85. response.write <tr> <td> อีเมล: </td> <td> <putryType = textName = อีเมล/> </td> </tr>
  86. Response.write <tr> <td> URL ของคุณ: </td> <td> <putryType = textName = เว็บไซต์/> </td> </tr>
  87. Response.write <tr> <td> ข้อความของคุณ: </td> <td> <textarename = ข้อความ cols = 40Rows = 5> </TextARE> </td> </tr>
  88. Response.write <tr> <td> </td> <td> <putType = submentValue = โพสต์ข้อความ/</td> </tr>
  89. Response.write </bable>
  90. Response.write </form>
  91. endfunction
  92. -
  93. <html>
  94. <head>
  95. <title> ตัวอย่างข้อความ XML </title>
  96. <metahttp-equiv = content-typecontent = text/html; charset = gb2312>
  97. </head>
  98. <body>
  99. -
  100. 'ตัดสินว่ามีการส่งข้อความและอัปเดตข้อมูลข้อความ
  101. dima
  102. A = request.QueryString (การกระทำ)
  103. ifa <> จากนั้น
  104. ส่วนเสริม
  105. อื่น
  106. การเริ่มต้น
  107. endif
  108. -
  109. </body>
  110. </html>

ข้างต้นเป็นตัวอย่างง่ายๆของการใช้ XML เพื่อพัฒนาบอร์ดข้อความและสามารถเพิ่มฟังก์ชั่นเพิ่มเติมได้ตามต้องการ

บทความที่เกี่ยวข้อง