Make your own free website on Tripod.com
Click here to visit our sponsor
Free Advertising from Click2Net!

บทเรียนที่ 2 Content Rotator



เมื่อคุณเรียนบทเรียนนี้จบแล้วคุณจะสามารถสร้างหน้าแสดงข้อความสั้นๆเช่น Tip, สุภาษิต-คำคม
หรือข้อความอื่นๆที่คุณต้องการให้ผู้เข้าเว็บไซต์อ่าน ให้แสดงหมุนเวียนกันไปครั้งละ 1 ข้อความได้

หลักการทำงาน
เมื่อผู้เรียกใช้ไฟล์ผ่านบราวเซอร์ โดยไฟล์นั้นได้มี script ของ Content Rotator ติดอยู่
จะทำให้ ASP ไปอ่านรายการข้อความต่างๆที่เราได้กำหนดไว้ก่อนแล้ว สุ่มนำขึ้นมาแสดง
ที่บราวเซอร์ของผู้เรียกใช้ไฟล์นั้นได้อ่านครั้งละ 1 ข้อความ

ส่วนประกอบและขั้นตอน


1. ไฟล์เก็บรายการข้อความ
ให้คุณ copy ข้อความต่อไปนี้แล้ว นำไป paste ลง notepad จากนั้น save ไฟล์ไว้ใน folder
asp ตั้งชื่อว่า tips.txt

No man is born wise or learned - ไม่มีผู้ใดฉลาดหรือรอบรู้มาแต่กำเนิด
Respect a man, he will do the same - จงเคารพผู้อื่นแล้วเขาจะเคารพท่านเช่นกัน
Quarreling is the weapon of the weak - การทะเลาะวิวาทเป็นอาวุธของคนอ่อนแอ
Men are blind in their own cause - คนเรามักจะตาบอดในเรื่องของตนเอง
Let us not be weary in well-doing - จงอย่าท้อถอยในการทำความดี
An honest man's word is his bond - คำพูดของคนซื่อสัตย์คือคำมั่นสัญญา
He that once deceives, is ever suspected - ผู้ที่เคยโกหกแล้วย่อมเป็นที่สงสัยเสมอ
The insolent have no friends - คนอวดดีไม่มีเพื่อน



2. ไฟล์แสดงข้อความ
ให้คุณ copy code ต่อไปนี้แล้ว นำไป paste ลง notepad จากนั้น save ไฟล์ไว้ใน folder
asp ตั้งชื่อว่า showme.asp

<html>
<body>

<!-- เริ่มแทรก script Content Rotator-->
<%
Randomize
TipNumber = Int(Rnd*10)
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
Set Instream = FileObject.OpenTextFile (Server.MapPath ("/asp") & "\tips.txt", 1, FALSE, FALSE)
For i = 1 to TipNumber -1
InStream.SkipLine()
Next
TipOfTheDay = Instream.ReadLine
'การดัดแปลงแก้ไข script นี้ ให้ระวังส่วนของ /asp(ชื่อ Folder ที่เก็บไฟล์ tips.txt) และ \tips.txt
%>


<!-- เริ่มส่วนแสดงผล -->
<center>
<h3>Today's Word by Content Rotator</h3>
<br><center>
<table border="1" CELLPADDING="1" CELLSPACING="0">
<tr><td VALIGN="middle">
<font size="+1" color="#CC0000"><b><%= TipOfTheDay %></b></font>
</td></tr>
</table>

</body>
</html>



3. การเรียกใช้งาน
เรียกไฟล์ showme.asp ในบราวเซอร์โดยพิมพ์ http://127.0.0.1/asp/showme.asp
และ reload หรือ Refresh ไปเรื่อยๆ ดูผลที่ได้