Direkomendasikan: Cara menerapkan thumbnail bebas komponen ASP Ada banyak komponen ASP yang menghasilkan thumbnail di internet. Jika ruang virtual Anda tidak mendukung mendaftarkan komponen baru, Anda mungkin merasa bahwa situs web Anda kehilangan warnanya. Xinqing tidak berbakat, dan dikombinasikan dengan sumber daya online, ia menulis program thumbnail bebas komponen hanya untuk referensi. Mari kita lihat dasar -dasarnya terlebih dahulu. Pertama -tama, kita tahu bahwa kode berikut ditampilkan pada halaman: img src = pic.gif border = 0 lebar
Artikel ini mengajarkan Anda pernyataan loop skrip ASP:
Karakteristik dari lingkungan halaman server dinamis ASP adalah ditulis melalui satu atau beberapa bahasa skrip. Bahasa skrip dapat dianggap sebagai versi yang disederhanakan dari bahasa pemrograman. Mudah dipelajari dan dikuasai, yang memberikan kenyamanan besar bagi para desainer situs web dinamis. Dapat dikatakan bahwa penggunaan bahasa skrip yang tepat terkait langsung dengan kelebihan dan kekurangan aplikasi ASP. Setelah mempelajari fungsi dan pernyataan bersyarat dari bahasa skrip VBScript dalam artikel sebelumnya, hari ini kita akan terus melihat pernyataan loop dalam VBScript.
Fungsi pernyataan loop adalah berulang kali menjalankan kode program. Loop dapat dibagi menjadi tiga kategori: satu jenis mengulangi pernyataan sebelum kondisi menjadi salah, satu jenis mengulangi pernyataan sebelum kondisi menjadi benar, dan jenis lainnya mengulangi pernyataan sesuai dengan jumlah kali yang ditentukan. Pernyataan loop berikut dapat digunakan dalam VBScript:
Lakukan ... loop: loop ketika (atau sampai) kondisinya benar.
Sedangkan ... wend: loop saat kondisinya benar.
Untuk ... Berikutnya: Tentukan jumlah loop dan ulangi pernyataan menggunakan penghitung.
Untuk setiap ... Berikutnya: Untuk setiap item dalam set atau setiap elemen dalam array, ulangi satu set pernyataan.
Pertama -tama mari kita lihat do ... loop, yang dapat menjalankan blok pernyataan beberapa kali (berbagai waktu). Ulangi blok pernyataan ketika kondisinya benar atau sebelum kondisinya benar. Silakan lihat contoh berikut: <html> <head>
<title> doloop.asp </iteme> <body bgcolor =#fffff> </head> <p> </p>
<p> Silakan isi catatan penyelesaian penjualan untuk setiap bulan dari tahun ini hingga bulan ini di halaman ini. <p>
< %
penghitung = 1
thismonth = bulan (sekarang ())
Lakukan saat melawan <thismonth + 1
Response.write & Counter & Month:
Response.write ___________________________________ & <br> <br>
Jika Counter> 13 maka
keluar
akhiri jika
penghitung = penghitung+1
Lingkaran
%>
<hr> </body> </html>
Program ASP ini menggunakan pernyataan loop untuk membuat tabel catatan penyelesaian penjualan, klip kode di atas ke notepad dan simpan sebagai doloop.asp, dan telusuri di browser di http. Bergantung pada bulan ini, Anda akan melihat hasil pada gambar di bawah ini.
Mari kita analisis program ini. Tujuan kami adalah untuk mencetak tabel berdasarkan bulan berjalan. Pertama, kami mengatur penghitungan penghitung dan menetapkan nilainya menjadi 1. Kemudian kami menggunakan bulan fungsi () dan sekarang () untuk mendapatkan bulan saat ini, dan akhirnya membuat loop. Ketika nilai jumlah kurang dari nilai bulan berjalan, nilai bulan dan garis horizontal ditampilkan dan nilai jumlah meningkat sebesar 1. Pernyataan loop diulangi sampai kondisi di atas salah. Jika hitungan lebih besar dari 13, EXIT DO akan digunakan untuk keluar dari loop segera.
Pernyataan Loop juga dapat menggunakan sintaks berikut:
Melakukan
[Pernyataan] [Keluar Do]
[pernyataan] loop [{while | Sampai} kondisi]
Sementara ... Pernyataan Wend disediakan untuk pengguna yang terbiasa dengan penggunaannya. Namun, karena sementara ... Wend tidak memiliki fleksibilitas, disarankan untuk menggunakan pernyataan do ... loop. Mari kita lihat pernyataan untuk berikutnya. Pernyataan untuk ... berikutnya digunakan untuk menjalankan blok pernyataan sebagai waktu yang ditentukan, menggunakan variabel penghitung dalam loop, yang nilainya meningkat atau berkurang dengan setiap loop.
Contoh berikut mengulangi prosedur MyProc 50 kali. Pernyataan untuk menentukan variabel penghitung X dan nilai awal dan akhir. Pernyataan berikutnya menambahkan variabel penghitung sebesar 1 setiap kali. Sub domyproc50times ()
Redup x
Untuk x = 1 hingga 50
Myproc
Berikutnya
Akhir sub
Langkah kata kunci digunakan untuk menentukan nilai variabel penghitung setiap peningkatan atau penurunan. Dalam contoh berikut, variabel penghitung J bertambah 2 setiap kali. Setelah loop selesai, nilai total adalah jumlah 2, 4, 6, 8, dan 10.
Sub twostotal ()
Redup, total
Untuk j = 2 hingga 10 langkah 2
Total = Total + J
Berikutnya
Jumlah msgbox adalah & total &.
Akhir sub
Untuk mengurangi variabel penghitung, atur langkah ke nilai negatif. Pada saat ini, nilai terminasi dari variabel penghitung harus kurang dari nilai awal. Dalam contoh berikut, variabel penghitung mynum dikurangi 2 setiap kali. Setelah loop selesai, nilai totalnya adalah jumlah 16, 14, 12, 10, 8, 6, 4 dan 2. Sub newtotal ()
Redup mynum, total
Untuk mynum = 16 hingga 2 langkah -2
Total = Total + Mynum
Berikutnya
Jumlah msgbox adalah & total &.
Akhir sub
Pernyataan keluar untuk digunakan untuk keluar dari ... pernyataan berikutnya sebelum konter mencapai nilai terminasi. Karena loop biasanya hanya untuk keluar dalam beberapa kasus khusus (seperti ketika kesalahan terjadi), Anda dapat menggunakan pintu keluar untuk pernyataan di blok pernyataan sebenarnya dari if ... lalu ... lain pernyataan. Jika kondisinya salah, loop akan berjalan seperti biasa.
Akhirnya, mari kita lihat untuk masing -masing ... pernyataan berikutnya, untuk masing -masing ... loop berikutnya mirip dengan untuk ... loop berikutnya. Untuk setiap ... Selanjutnya alih -alih menjalankan pernyataan seperti yang ditentukan, ia mengulangi satu set pernyataan untuk setiap elemen dalam array atau untuk setiap item dalam koleksi objek. Ini sangat berguna ketika Anda tidak tahu jumlah elemen dalam koleksi. Sintaksnya adalah sebagai berikut: Untuk setiap elemen dalam grup
[Pernyataan]
[Keluar untuk]
[Pernyataan] Berikutnya [Elemen]
Bagikan: ASP menyimpan file jarak jauh ke lokal % Fungsi saveremoteFile (localfileName, remoteFileUrl) saveremoteFile = true red iklan, pengambilan, getRemotedata set retrieval = server.createObject (microsoft.xmlhttp) dengan retrieval .Open get, remoteFileurl, false,.