Pengulangan Do Loop Pada ASP

Niguru.com | Senin, 31 Agt 2020 | Pada pemrograman seringkali diperlukan suatu pekerjaan yang diulang dari suatu baris script hingga ke baris script tertentu, untuk keperluan tersebut ASP sudah menyediakan fasilitas looping (pengulangan script selama beberapa kali, tergantung pada kondisi yang ditentukan).

Salah satu fungsi looping adalah Do .. Loop, yang akan mengulang suatu script yang berada diantara script DO dan script LOOP, yang akan diulang sebanyak kondisi tertentu.

Berikut ini sintaks penulisan fungsi Do .. Loop:

Do

 [kelompok program]

Loop Until [kondisi]

Perhatikan contoh penggunaan Do Loop berikut, mulai dari halaman pengirim (.HTML):

<h1>Belajar Do .. Loop</h1>

<big><big>Uji mengulang teks

<br>------------------------------<br>

<form method="post" action="doLoop01.asp">

Ketik teks:<br>

<input name="text1"><br><br>

Ulang sebanyak:<br>

<input name="repeat1" size=3> x<br>

<input type="submit" value="Kirim Data">

</form>

 

Simpan dengan nama inputDoLoop.html:

 

Dilanjutkan dengan membuat file .ASP berisi instruksi Do .. Loop:

<%

dim a,b

a=request.form("text1")

b=request.form("repeat1")

do 

response.write(a&"<br><big>")

b=b-1

loop until b=0

%>

 

Simpan dengan nama doLoop01.asp:

 

Buka file  inputDoLoop.html pada browser:

 

Ketik teks > isi jumlah pengulangan > klik Kirim Data:

Hasilnya:

Demikianlah penjelasan mengenai pengulangan Do .. Loop.

Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Cara Membuat Function Pada ASP

Niguru.com | Minggu, 30 Agt 2020 | ASP menyediakan fasilitas FUNCTION yang gunanya adalah untuk membuat suatu variabel yang nilainya didapatkan dari suatu perhitungan.

Function ini sesungguhnya mirip seperti Procedure, hanya saja function adalah suatu variabel khusus. Biasanya perhitungan untuk menghasilkan suatu nilai pada function adalah gabungan dari operasi logika dan aritmetik yang cukup panjang, sehingga perlu diringkas dengan bantuan fasilitas function.

Berikut ini sintaks penulisan function:

Function nama_function(argumen)

[kelompok program /statement]

End function

Berikut ini contoh halaman inputnya:

 

<h1>Berat Ideal</h1>

<h3>Latihan menghitung dengan bantuan Function

<br>--------------------------<br>

<form method="post" action="beratIdeal01.asp">

Ketik gender:<br>

1. Pria<br>

2. Wanita<br>

<input name="g1" size="5" value=1 style="text-align: center">

<br><br>Ketik tinggi badan:<br>

<input name="t1" size="5" value=170 style="text-align: center">

<br><br><input type="submit" value="Kirim Data">

</form>

 

Simpan dengan nama inputBerat01.html:

 

Dan berikut ini adalah script halaman .ASP sebagai penerima informasi:

<%

function beratIdeal(gender,tinggi)

if gender=1 then

 beratIdeal=tinggi-100

else

 beratIdeal=tinggi-110

end if

end function

dim a,b,c

a=request.form("g1")

b=request.form("t1")

c=beratIdeal(a,b)

response.write("<h1>Berat idealmu = "&c)

%>

 

Note:

Perhatikan bahwa variabel c diisi dengan function, yang seperti dijelaskan di atas, adalah variabel yang khusus.

 

Simpan dengan nama beratIdeal01.asp:

 

Buka inputBerat01.html pada browser:

 

Hasilnya:

Demikianlah penjelasan mengenai cara membuat function pada bahasa pemrograman ASP.

Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Inilah Cara Untuk Membuat Procedure Yang Dilengkapi Argumen Pada Pemrograman ASP

Niguru.com | Sabtu, 29 Agt 2020 | Pada posting 2 hari yang lalu Niguru.com sudah menjelaskan mengenai cara untuk membuat procedure pada bahasa pemrograman ASP. Dimana sudah dicontohkan bahwa dengan bantuan fasilitas procedure maka kelompok program yang penggunaannya perlu diulang beberapa kali, cukup dituliskan sekali saja.

Pada posting kali ini Niguru.com akan menambahkan pengetahuan teman-teman pembaca sekali mengenai pembuatan procedure, dengan membuat procedure yang dilengkapi dengan argumen, sehingga saat procedure dijalankan, maka hasilnya akan tergantung pada argumen yang dicantumkan pada saat procedure tersebut dipanggil.

Berikut ini sintaks penulisan procedure yang dilengkapi argumen:

Sub nama_procedure(argumen)

[kelompok program]

End sub

Sebagai contoh Niguru.com akan mulai dengan membuat file .HTML sebagai pengirim data ke procedure:

<h3>Pilih salah satu nama binatang dibawah ini:<br>

1: Untuk Kucing<br>

2: Untuk Sapi<br>

3: Untuk Kuda<br>

4: Untuk Nyamuk<br><br>

<form method="post" action="procedure02.asp">

<input name="pilih" size="3" style="text-align: center">

<input type="submit" value="Kirim Pilihan">

</form>

 

Simpan dengan nama inputPro01.html:

 

Dan berikut ini file .ASP yang berisi procedure:

 

<h2>Uji procedure dengan argumen

<br><br>---------------<br>

</font>

<%

sub pilihBinatang(argumenKu)

select case argumenKu

case 1

response.write("kamu memilih KUCING")

case 2

response.write("kamu memilih SAPI")

case 3

response.write("kamu memilih KUDA")

case 4

response.write("kamu memilih NYAMUK")

case else

response.write("Tentukan pilihan sesuai petunjuk")

end select

end sub

pilihBinatang(request.form("pilih"))

%>

 

Simpan dengan nama procedure02.asp:

 

Buka inputPro01.html pada browser > ketik angka pilihan (1 .. 4) > klik Kirim Pilihan:

 

Hasilnya:

Demikianlah penjelasan mengenai cara untuk membuat procedure yang dilengkapi dengan argumen.

Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Inilah Cara Untuk Membuat Procedure Pada ASP

Niguru.com | Jumat, 28 Agt 2020 | Dalam pembuatan program, terutama program yang kompleks dengan kode yang rumit dan panjang, selalu ada kelompok program yang perlu dijalankan berulang kali, untuk keperluan inilah setiap bahasa pemrograman menyediakan fasilitas PROCEDURE.

Dengan masih melanjutkan penjelasan pada bahasa pemrograman ASP, pada posting kali ini Niguru.com akan menjelaskan cara pembuatan procedure pada ASP.

Berikut ini sintaks penulisan procedure pada ASP:

Sub nama_procedure

[kelompok program]

End sub

Dan untuk menjalankan kelompok program yang ada di dalam procedure cukup dengan menyebutkan nama procedure tersebut.

Untuk lebih jelasnya lihat contoh program berikut ini:

<h1>Procedure Pada ASP</h1><font color="#FF0000"><big><big>

Uji mengulang procedure jumlah

<br><br>---------------<br>

</font>

<%

dim a

sub jumlah

a=a+2

response.write("<br>nilai a adalah: "&a)

end sub

a=41

jumlah

jumlah

jumlah

jumlah

jumlah

jumlah

%>

 

Simpan dengan nama procedure01.asp:

 

Buka procedure01.asp pada browser, dan berikut ini hasilnya:

Demikianlah penjelasan mengenai cara membuat procedure pada bahasa pemrograman ASP.

Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Menggunakan Fungsi SELECT CASE Pada ASP

Niguru.com | Kamis, 27 Agt 2020 | Dalam suatu program besar dan kompleks, programmer seringkali berhadapan dengan dengan situasi dimana terdapat banyak pilihan yang harus ditangani dengan benar.

Bila setiap pilihan perlu satu kelompok program yang sesuai untuk meneruskan operasi secara benar maka fungsi SELECT .. CASE yang disediakan ASP bisa menjadi solusinya. Fungsi Select .. Case mirip seperti If .. Then namun memberikan programmer lebih banyak pilihan. 

Berikut ini sintaks penulisan fungsi Select .. Case:

Select Case [variabel_yang_diuji]

Case [kondisi_1]

[kelompok_program_1]

Case [kondisi_2]

[kelompok_program_2]

Case [kondisi_n]

[kelompok_program_n]

End Select

Berikut ini contoh program yang menggunakan fungsi Select .. Case, dimana pertama kali Niguru.com membuat file HTML yang digunakan untuk input:

<h1>Belajar Select Case</h1><big><big>

Program bahasa ASP<br>

Pilih angka antara 1 .. 3

<br><br>---------------<br>

<form method="get" action="case02.asp">

<input name="pilih" size="6" style="text-align: center">

<input type="submit" value="Kirim Data">

</form>

 

Simpan dengan nama inputCase.html:

 

Dan berikut ini file .ASP untuk menerima data yang dikirimkan dari halaman input:

<h1>Belajar Select Case</h1><big><big>

Program bahasa ASP

<br><br>---------------<br>

<%

dim a,b

a=request.querystring("pilih")

b="kamu memilih angka: "

select case a

case 1

response.write(b&"satu")

case 2

response.write(b&"dua")

case 3

response.write(b&"tiga")

case else

response.write("input salah")

end select

%>

<br>---------------

 

Simpan dengan nama case02.asp:

 

Buka file inputCase.html pada browser:

 

Ketik angka (misal angka 3) > klik Kirim Data:

Demikianlah penjelasan mengenai penggunaan fungsi Select .. Case pada pemrograman dalam bahasa pemrograman ASP.

Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Beginilah Membuat Fasilitas User Input Pada Aplikasi Yang Dituliskan Dengan ASP – Part 2

Niguru.com | Rabu, 26 Agt 2020 | Pada posting sehari sebelumnya Niguru.com sudah menjelaskan mengenai cara untuk membuat fasilitas user input, agar user dapat mengirimkan data secara langsung lewat browser.

Bila pada posting sebelumnya Niguru.com sudah menjelaskan cara membuat fasilitas user input dengan metode GET, maka pada posting kali ini Niguru.com akan menjelaskan cara membuat user input dengan menggunakan fasilitas POST.

Berikut ini adalah sintaks untuk membuat user input dengan metode POST:

<form method="post" action="nama_file.asp">

<input name="nama_input_1">

<input name="nama_input_2">

<input name="nama_input_n">

<input type="submit" value="nama_tombol">

</form>

Sintaks di bagian penerimaan yang berupa program ASP yang menerima data dari web page pengirim adalah:

request.form("nama_input")

Berikut ini contoh script halaman input:

<form method="post" action="terima03.asp">

<input name="angka">

<input type="submit" value="Kirim Data">

</form>

 

Simpan dengan nama input03.html:

 

 

Berikut ini contoh script halaman penerima:

<%

Dim a

a = request.form("angka")

response.write("kamu mengetikkan: " & a)

%>

 

Simpan dengan nama terima03.asp:

 

Jalankan input03.html > ketikkan angka atau kata atau kalimat > klik Kirim Data:

 

Hasilnya:

 

 

Perhatikan pada contoh script halaman input berikut ini:

<h1>Pengurangan /Perkalian</h1><br>

<form method="post" action="terima04.asp">

Ketik angka: <input name="angka1" size="5"><br>

Ketik angka: <input name="angka2" size="5"><br><br>

Ketik 1 untuk Pengurangan<br>

Ketik 2 untuk Perkalian<br>

<input name="pilih" size="3">

<input type="submit" value="Kirim Data">

</form>

 

Simpan dengan nama input04.html:

 

Dan script halaman penerimanya adalah:

<%

Dim a,b,c

a = request.form("angka1")

b = request.form("angka2")

c = request.form("pilih")

if c=1 then

response.write(a&" - "&b&" = "&a-b)

else

response.write(a&" x "&b&" = "&a*b)

end if

%>

 

Simpan dengan nama terima04.asp:

 

Jalankan input04.html > ketikkan angka pada 2 kolom input angka, ketik 1 atau 2 untuk memilih operasi Pengurangan /Perkalian > klik Kirim Data:

 

Hasilnya:

Demikianlah penjelasan mengenai cara membuat fasilitas user input pada ASP. 

Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)

Beginilah Membuat Fasilitas User Input Pada Aplikasi Yang Dituliskan Dengan ASP – Part 1

Niguru.com | Selasa, 25 Agt 2020 | Pada posting sebelumnya sudah dijelaskan mengenai perbedaan antara aplikasi yang bekerja secara client side VS aplikasi yang bekerja secara server side. Dan ASP adalah salah satu bahasa pemrograman yang bekerja secara server side.

Pada posting kali ini Niguru.com akan menjelaskan mengenai cara untuk mengirimkan data yang diinputkan langsung oleh user lewat browser ke dalam program yang dieksekusi pada server.

Berikut ini cara menginput data dengan metode GET. Sintaks di bagian input yang digunakan untuk mengirim data adalah:

<form method="get" action="nama_file.asp">

<input name="nama_input_1">

<input name="nama_input_2">

<input name="nama_input_n">

<input type="submit" value="nama_tombol">

</form>

Sintaks di bagian penerimaan yang berupa program ASP yang menerima data dari web page pengirim adalah:

request.querystring("nama_input")

Berikut ini contoh script halaman input:

<form method="get" action="terima01.asp">

<input name="salam">

<input type="submit" value="Kirim Data">

</form>

 

Simpan dengan nama input01.html atau input01.asp. Extension pada halaman input boleh .HTML boleh .ASP, akan diperlakukan sama oleh browser selama tidak ada tag <% %> yang merupakan tag area ASP.

 

Berikut ini contoh script halaman penerima:

<%

Dim a

a = request.querystring("salam")

response.write(a)

%>

 

Simpan dengan nama terima01.asp. Nama halaman penerima harus sama dengan nama yang disebutkan pada action yang dituliskan pada halaman input.

 

Buka input01.html (atau input01.asp) pada browser:

 

Ketikkan kalimat apa saja (terserah) > klik Kirim Data:

 

Hasilnya:

 

Perhatikan pada contoh script halaman input berikut ini:

<h3>Pilih:<br>

1: Untuk SAPI<br>

2: Untuk RUMPUT

<br>--------------------------------<br>

<form method="get" action="terima02.asp">

<input name="pilih" size="3">

<input type="submit" value="Kirim Data">

</form></h3>

 

Simpan dengan nama: input02.html:

 

Dan script halaman penerimanya adalah:

<h2><%

Dim a

a = request.querystring("pilih")

if a=1 then

response.write("Sapi adalah hewan")

else

response.write("Rumput adalah tanaman")

end if

%></h2>

 

Simpan dengan nama: terima02.asp:

 

Buka input02.html pada browser > isi pilihan (boleh 1 atau 2) > klik Kirim Data:

 

Hasilnya:

 

Demikianlah penjelasan mengenai cara membuat fasilitas user input pada ASP. Penjelasan pada posting ini akan dilanjutkan pada posting berikutnya.

Selamat mencoba .. Have a nice day :-)

www.Niguru.com (Nino Guevara Ruwano)