Kamis, 18 Oktober 2012

DASAR DASAR ASP


:: Logika Pemrograman 

Tipe data digunakan misalnya untuk menyimpan  data dan umumnya kita menyimpan
data data sebagai variable, variable memiliki  nama dan nilai. Nama variable
menentukan bagaimana variable itu akan dipanggil dan nilainya merupakan data yang
disimpan pada variable tersebut.
Seperti bahasa pemrograman konvensional lainnya, variable kita deklarasikan terlebih
dahulu agar nantinya  dapat dieksekusi dan  juga akan  mempercepat waktu
pengeksekusian program.

>> Variabel 

Untuk mendeklarasikan variable, kita menggunakan statemen DIM seperti dibawah ini;
Dim nama_variabel, contohnya :
 Dim ilkom
 Dim raihan
Setelah melakukan deklarasi barulah kita  mengisikan sebuah nilai pada variable
tersebut. Untuk mengisinya kita  gunakan  operator penugasan (assignment  operator)
seperti :
 ilkom = 15
raihan = “nasyedman”
Web Programming With ASP
8 Web Programming With ASP
9
dari variable diatas maka variable stmik akan menyimpan nilai numeric 15 dan variable
raihan akan menyimpan string “nasyedman”.
Ada beberapa petunjuk pemberian nama Variabel diantaranya, harus dimulai dengan
suatu karakter alpabetik, tidak dapat mengandung titik atau karrakter untuk deklarasi
tipe, harus unik dengan jangkauan yang samaa (lihat yang dibawah ini untuk catatan
tentang jangkauan, harus berupa 255 karakter atau kurang
Contoh dalam pendeklarasian suatu variable dalam sebuah program pendek looping ,
seperti
Latihan 2.1
<% dim HP
HP = “Samsung”
If HP = “Nokia” Then %>
HP kita sama donk……..
<% Else %>
HP kita lain ya
<% End If %>
Hasil : HP kita lain ya
Latihan 2.2
<html>
<head>
<title><percobaan dengan ASP></title>
</head>
<body>
<%
   Dim ilkom
   ilkom= "Selamat Datang di STMIK MDP"
   Response.write (mdp)
%>  
 <BR>
<%
   ilkom = "Kampus Inderalaya"
   Response.write (ilkom)
%>
</body>
</html> Web Programming With ASP
10
>> String
Digunakan untuk menyimpan data berupa teks, karakter, maupun kumpulan karakter,
penulisannya diapit dengan tanda kutip (“), contohnya adalah ;
Latihan 2.3
<html>
<head>
<title>Fungsi STRING </title>
</head>
<body>
<script language="vbscript">
document.write "ASCII huruf besar =  "
document.write asc ("Z")
document.write "<br>"
document.write "ASCII huruf kecil =  "
document.write asc ("z")
document.write "<br>"
document.write "merubah dari besar ke kecil = "
document.write Lcase("ILKOM UNSRI")
document.write "<BR>"
document.write "merubah dari kecil kebesar = "
document.write UCase("FASILKOM UNSRI")
document.write "<BR>"
</script>
</body>
</html>
Maka hasil dari latihan 2.3 adalah; Latihan 2.4
<html>
<head>
<title>Fungsi STRING </title>
</head>
<body>
<script language="vbscript">
data1= "bandung lautan artis"
document.write "menampilkan tiga dari kiri = "
document.write left(data1,3)
document.write "<br>"
document.write "menampilkan 4 dari kanan = "
document.write right (data1,4)
document.write "<br>"
document.write "menampilakn tengah = "
document.write mid (data1,2,3)
document.write "<br>"
document.write mid(data1,1,3)
document.write "<br>"
document.write  mid(data1,19,2)
document.write "<BR>"
document.write "mengetahui jumlah karakter di data1 = "
document.write len(data1)
document.write "<br>"
</script>
</body>
</html>


Latihan 2.5
<html>
<head>
<title>Fungsi STRING </title>
</head>
<body>
<script language="vbscript">
data2 = "       Bandung Lautan Artis"
document.write "menghapus spasi di sebelah kiri = "
document.write LTrim(data2)
document.write "<br>"
data3 = "ILKOM UNSRI PALEMBANG"
document.write "menghapus spasi di sebelah kanan = "
document.write RTrim(data3)
document.write "<br>"
document.write "<br>"
string1 = "dERIS "
string2 = "Deriss"
document.write StrComp(string1, string2,1)
document.write "<br>"
</script>
</body>
</html>

<html>
<head>
<title>Fungsi STRING </title>
</head>
<body>
<script language="vbscript">
data = "x"
document.write "menampilkan tanda x = "
document.write string(95, data)
document.write "<br>"
document.write "<BR>"
document.write "membaca deris stiawan terbalik = "
data5 = "DERIS SETIAWAN"
document.write strreverse(data5)
document.write "<br>"
</script>
</body>
</html>


Latihan 2.7
<html>
<head>
<title>Fungsi STRING </title>
</head>
<body>
<script language="vbscript">
document.write "<br>"
document.write "menampilkan currency = "
document.write formatcurrency(10000,2) document.write "<br>"
document.write "menampilkan tanggal longdate =  "
document.write formatdatetime("27/07/2004", vblongdate)
document.write "<br>"
document.write formatpercent(30/100,2)
</script>
</body>
</html>

>> Function 

Pada script VBScript ada beberapa fungsi standar yang telah ada, kita dapat memanggil
fungsi Tersebut dengan mendeklarasikan terlebih dahulu, contohnya ;
Latihan 2.8
<html>
<head>
<title>contoh function</title>
</head>
<body>
<%
   function Hari_Esok()
   Hari_ini = Date()
   Hari_Esok = Hari_ini + 1
   end Function
Web Programming With ASP
14    response.write ("<H1> Panggil Fungsi </H1>")
   response.write ("Besok Tanggal : "& Hari_Esok ())
%>
</body>
</html>

Latihan 2.9
<html>
<head>
<title>contoh function</title>
</head>
<body>
<%
   function tampil()
   data_A = 90
   data_B = 10
   tampil  = data_A + data_B
   end Function
   
   function bagi()
   data_A = 90
   data_B = 10
   bagi = data_A / data_B
   end Function
Web Programming With ASP
15    
   response.write ("<H1> HASIL </H1>")
   response.write ("Hasilnya adalah : "& tampil())
   response.write ("<br>")
   response.write ("<hr>")
   response.write ("Hasilnya bagi : "& bagi())
%>
</body>
</html>

>> Konstanta 

Beberapa  variable tidak dapat diubah  nilainya  selama program  dieksekusi dan dapat
kita jadikan sebagai konstanta.  Nilai konstanta tetap sampai program berakhir,
pendefinisian konstanta dilakukan bersama dengan pendeklarasian, contohnya ; Const
nama_konstanta = nilanya_konstanta, contohnya :
Const pi =3.14
Konstanta sangat berguna dalam perhitungan-perhitungan dalam  matematikan and
fisika. Konstanta juga memiliki batas definisi, jadi sebuah konstanta bisa pula memiliki
btas definisi yang local maupun  global,  cara melakukan pembatasan ini sama dengan
pada vaiabel, yaitu ;
Web Programming With ASP
16 Web Programming With ASP
17
Public Const pi = 3.14
Private Const nama = “deris”
Latihan 2.10
<html>
<head>
<title>konstanta</title>
</head>
<body>
<%
 Const pi = 3.14
 Const kata = “Nilai pi adalah = “
 Response.write(“<h1>” & kata & pi & “</h1>”)
%>
</body>
</html>
>> Operator
Operator digunakan untuk melakukan beberapa operasi terhadap data,dalam VBScript
dikenal beberapa operator yaitu ;
Operator  Kegunaan
+  Penjumlahan
-  Pengurangan
*  Perkalian
/  Pembagian
^   Pemangkatan
\  Pembagian integer
=  Membangdingkan apakah data disebelah
kirinya sama dengan data disebelah kanan
<>  Membandingkan apakah data yang disebelah
kirinya tidak sama dengan data disebelah
kanan
>  Membandingkan apakah data disebelah
kirinya lebih besar daripada data disebelah
kanan
>=  Membandingkan apakah data disebelah
kirinya lebih besar atau sama dengan data
disebelah kanan Contoh dalam penulisan ;
2+3 = 5
2^3 = 8
10/3 = 3.3333
10\3 = 3

>> Pernyataan Kondisi 

Kondisi digunakan jika terdapat struktur program yang harus dipilih salah satu sebelum
menuju bagian berikutnya, ini sering kita  dengar pada pemrograman lainnya seperti
If…then….Else dan Select…Case
Latihan 2.11
<html>
<head>
<title>if then</title>
</head>
<body>
<%
Function halo_nama(nama)
If nama = "Deris" Then
halo_nama = "Hallo"  & nama
End if
end function
Response.write("<h1>Panggil Fungsi !</h1>")
Response.write(halo_nama("Deris"))
%>
</body>
</html>
Web Programming With ASP
18 Latihan 2.12
<html>
<head>
<title>If...Then...Else</title>
</head>
<body>
<%
Function halo_nama(nama)
If nama = "Deris" Then
halo_nama = "Haloo " & nama
ElseIf nama = "Stiawan" Then
halo_nama = "Haloo " & nama & ", nama deris"
 Else
Halo_nama = "Maaf Anda tidak dikenal,siapanih"
 End If
End Function
Response.write("<h1>Panggil fungsi !</h1>")
Response.write("<h1>Jika nama adalah Deris</h1>")
Response.write(halo_nama("Deris"))
Response.write("<h1>Jika nama adalah Stiawan</h1>")
Response.write(halo_nama("Stiawan"))
Response.write("<h1>Jika nama adalah Anonymous</h1>")
Response.write(halo_nama("anonymous"))
%>
</body>
</html>
Tampilan dari latihan 2.12
Web Programming With ASP
19 Web Programming With ASP
20
Latihan 2.13
<html>
<head>
<title>contoh function</title>
</head>
<body>
<script language="vbscript">
document.write "<b>"
document.write "<center>"
document.write "proses pengulangan for..next"
document.write "<hr>"
document.write "</center>"
for angka = 1 to 100 step 2
  document.write angka
  document.write "<br>"
next
</script>
</body>
</html>
Latihan 2.14
<html>
<head>
<title>contoh function</title>
</head>
<body>
<script language="vbscript">
document.write "<b>"
document.write "<center>"
document.write "proses pengulangan for..next"
document.write "<hr>"
document.write "</center>"
dim x(10)
a=0
do
 x(A) = 10 * a
 a = a + 1
  document.write " nomor index ke :" & a
  document.write "<br>"
loop until a = 10000
</script>
</body>
</html> Maka tampilan dari latihan 2.14 ;
Latihan 2.15
html>
<head>
<title>contoh function</title>
</head>
<body>
<%
  Function hai_nama(nama)
  select case UCASE(nama)
  case "STMIK MDP"
     hai_nama = "halloo....." & nama & ", bapak FASILKOM
UNSRI"
  case "ILKOM UNSRI"
     hai_nama = "halloo......." & nama & ", ibu ILKOM
UNSRI"
  case else
     hai_nama = "Maaf , anda tidak dikenal"
  end select
  end function
  response.write ("<H1> Jika Nama Adalah FASILKOM UNSRI
</H1>")
  response.write (hai_nama ("ilkom unsri"))
Web Programming With ASP
21 Web Programming With ASP
22
  response.write ("<H1> Jika Nama Adalah ILKOM UNSRI
</H1>")
  response.write (hai_nama ("ilkom unsri"))
  response.write ("<H1> Jika Nama Adalah anonymous </H1>")
  response.write (hai_nama ("anonymous"))
%>
</body>
</html>

Tidak ada komentar:

Posting Komentar