Komponen AdRotator ASP

Contoh

Contoh AdRotator Sederhana
Pertunjukan ini: Setiap kali pengguna mengakses situs web atau memperbarui halaman sekali, cara penggunaan komponen AdRotator untuk menampilkan gambar iklan yang berbeda.
AdRotator - Tautan Gambar
Pertunjukan ini: Setiap kali pengguna mengakses situs web atau memperbarui halaman sekali, cara penggunaan komponen AdRotator untuk menampilkan gambar iklan yang berbeda. Selain itu, gambar itu sendiri adalah tautan.

Komponen AdRotator ASP

Setiap kali pengguna memasuki situs web atau memperbarui halaman, komponen AdRotator ASP akan membuat objek AdRotator untuk menampilkan gambar yang berbeda.

Sintaksis:

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

Contoh

Dengan demikian, kita mendapatkan berkas dengan nama "banners.asp". Ini seperti ini:

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

Berkas "ads.txt" seperti ini:

*
codew3c.gif
http://www.codew3c.com/
Kunjungi CodeW3C.com
80
microsoft.gif
http://www.microsoft.com/
Kunjungi Microsoft
20

"ads.txt" berisi kode di bawah bintang yang menentukan bagaimana gambar ini akan ditampilkan, alamat tautan, teks pengganti gambar, dan kesempatan untuk muncul setiap 100 kali klik. Kita dapat melihat bahwa kesempatan untuk gambar CodeW3C.com adalah 80%, sementara kesempatan untuk gambar Microsoft adalah 20%.

Keterangan:Untuk membuat tautan ini berfungsi dengan baik saat di klik pengguna, kami perlu melakukan sedikit perubahan ke berkas "ads.txt":

REDIRECT banners.asp
*
codew3c.gif
http://www.codew3c.com/
Kunjungi CodeW3C.com
80
microsoft.gif
http://www.microsoft.com/
Kunjungi Microsoft
20

Halaman tujuan akan menerima variabel query bernama url, yang mengandung URL untuk dialihkan.

Keterangan:Untuk menentukan tinggi, lebar dan border gambar, kami dapat menambahkan kode di bawah REDIRECT ini:

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

Terakhir yang harus dilakukan adalah menambahkan kode ini ke berkas "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>

Bagus, ini adalah konten yang ada!

Properti Komponen AdRotator

Properti Border

Tentukan ukuran garis border di sekitar iklan.

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

Properti Clickable

Tentukan apakah iklan sendiri adalah tautan super.

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

Properti TargetFrame

Nama kerangka untuk menampilkan iklan.

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

Metode Komponen AdRotator

Metode GetAdvertisement

Kembalikan HTML untuk menampilkan iklan di halaman.

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