ชิ้นส่วน AdRotator ASP

ตัวอย่าง

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

ชิ้นส่วน AdRotator ASP

เมื่อผู้ใช้เข้าสู่เว็บไซต์หรือปรับปรุงหน้าเว็บ องค์ประกอบ AdRotator ของ ASP จะสร้างองค์ประกอบ AdRotator ขึ้นมาเพื่อแสดงภาพต่าง ๆ

รูปแบบการใช้งาน:

<%
set adrotator=server.createobject("MSWC.AdRotator")
adrotator.GetAdvertisement("textfile.txt")
%>

ตัวอย่าง

ฉันจะบอกว่าเรามีไฟล์ที่มีชื่อว่า "banners.asp" มันเหมือนนี้:

<html>
<body>
<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
response.write(adrotator.GetAdvertisement("ads.txt"))
%>
</body>
</html>

ไฟล์ "ads.txt" มีลักษณะเช่นนี้:

*
codew3c.gif
http://www.codew3c.com/
เยี่ยมชม CodeW3C.com
80
microsoft.gif
http://www.microsoft.com/
เยี่ยมชม Microsoft
20

"ads.txt" ไฟล์ที่ด้านล่างดาวดวงกำหนดวิธีการแสดงภาพ ที่มีลิงก์ ข้อความแทนภาพ และโอกาสที่จะแสดงภาพในแต่ละ 100 ครั้งคลิก สามารถเห็นได้ว่าโปรดิวค์ CodeW3C.com มีโอกาสแสดงภาพ 80% และโปรดิวค์ Microsoft มีโอกาสแสดงภาพ 20%

หมายเหตุ:เพื่อให้ลิงก์ที่ผู้ใช้คลิกได้ทำงานเหมือนกัน พวกเราต้องทำการปรับปรุงไฟล์ "ads.txt" น้อยนิด:

REDIRECT banners.asp
*
codew3c.gif
http://www.codew3c.com/
เยี่ยมชม CodeW3C.com
80
microsoft.gif
http://www.microsoft.com/
เยี่ยมชม Microsoft
20

หน้าที่จะเปลี่ยนไปจะได้รับตัวแปรที่มีชื่อว่า url ในของคำถามของค่าการค้นหา ซึ่งมี URL ที่จะทำการเปลี่ยนไป

หมายเหตุ:ถ้าต้องการกำหนดความสูง ความกว้าง และเส้นขอบของภาพ เราสามารถใส่รหัสดังนี้ด้านล่าง REDIRECT:

REDIRECT banners.asp
WIDTH 468 
HEIGHT 60 
BORDER 0 
*
codew3c.gif
...
...

สุดท้ายต้องทำคือเพิ่มรหัสนี้เข้าไปในไฟล์ "banners.asp":

<%
url=Request.QueryString("url")
If url<>"" then Response.Redirect(url)
%>
<html>
<body>
<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
response.write(adrotator.GetAdvertisement("textfile.txt"))
%>
</body>
</html>

ดีเด่นแล้วนี้คือทั้งหมดของเนื้อหา!

รายละเอียดขององค์ประกอบ AdRotator

รายละเอียด Border

กำหนดขนาดของเส้นขอบที่ล้อมรอบโฆษณา

<%
set adrot=Server.CreateObject("MSWC.AdRotator")
adrot.Border="2"
Response.Write(adrot.GetAdvertisement("ads.txt"))
%>

รายละเอียด Clickable

กำหนดว่าโฆษณาเองนั้นเป็นลิงก์สุดยอดหรือไม่

<%
set adrot=Server.CreateObject("MSWC.AdRotator")
adrot.Clickable=false
Response.Write(adrot.GetAdvertisement("ads.txt"))
%>

รายละเอียด TargetFrame

ชื่อโครงการที่แสดงโฆษณา

<%
set adrot=Server.CreateObject("MSWC.AdRotator")
adrot.TargetFrame="target='_blank'"
Response.Write(adrot.GetAdvertisement("ads.txt"))
%>

วิธีการขององค์ประกอบ AdRotator

เมธอด GetAdvertisement

คืนค่า HTML ที่แสดงโฆษณาในหน้า

<%
set adrot=Server.CreateObject("MSWC.AdRotator")
Response.Write(adrot.GetAdvertisement("ads.txt"))
%>