Bahasan selanjutnya adalah penggunaan response-response yang lain. Ada banyak penggunaan sintaks response; tetapi saya membahas hanya yang pernah saya gunakan saja.

  • response.Cookies: berguna untuk memberikan cookies ke browser client. Misalnya untuk menaruh informasi pembelian; jika memakai shopping chart, tanggal terakhir browsing dll. Sintaksnya mudah: <% response.cookies(“lastvisit”)=now%> . Yang artinya memberikan cookies lastvisit pada browser dengan isi tanggal sekarang. Untuk mengambil/membaca cookies gunakan <%= request.cookies(“lastvisit”)%>. <%= artinya alias untuk kode response.write  — tambahan properti .expires misalnya <% response.cookies(“lastvisit”).Expires=#May 10,2020# %> berarti memberi nilai kadaluarsa pada cookies lastvisit 10 Mei 2020.
  • response.redirect: Ini salah satu perintah yang saya sering gunakan. Gunanya untuk membelokkan url. contohnya <% response.redirect(“/app/login.asp”)%>, <% response.redirect(“http://anu.com/list.asp”) %>. Biasanya digunakan ketika verifikasi request form/querystring sukses tervalidasi.
  • response.End: Menghentikan script segera. Cukup <% response.end %> script dibawahnya akan tidak diproses lagi oleh webserver.

Penggunaan Session

Mirip dengan response.cookies, session juga menaruh cookies; tetapi tidak kelihatan valuenya oleh user; kode-kode acak. Biasanya untuk memverifikasi user yang login. Sintaksnya cukup mudah: Set Session(“login”)=”yes” artinya memberi variabel yes pada session login. Cara aplikasinya cukup mudah:

 

<!-- file: tes01.asp -->
<% sub header %>
<html><head>
<title> login </title>
<body>
<% end sub %>

<% sub footer %>
</body></html>
<% end sub %>

<% 
sub loginver 

	if request.form("txt_username")="tommy" and request.form("txt_password")="oke" then
		session("login")="yes"
		session("username")=request.form("txt_username")
		response.redirect ("tes01.asp?tugas=loggedin")
	else
		response.write "gagal login...<a href=""tes01.asp?err_login=yes"">kembali</a>    "
	end if
end sub

%>

<% sub loginpage %>
<form name="loginfrom" method="post" action="tes01.asp?tugas=loginver">
nama: <input type="text" name="txt_username" size="20"><br/>
pass: <input type="password" name="txt_password" size="20"><br/>
<input type="submit" value="login" name="cmd_submit">
</form>

<%
if request("err_login")="yes" then response.write "<font color=""red"">salah username/password</font>"
 end sub %>

<% sub loggedin 
if session("login")="yes" then
	response.write "hallo " & session("username") & "<br>"
	response.write "anda berhasil login di halaman ini"
	response.write "<br><br> klik <a href=""tes01.asp?tugas=logout"">disini untuk logout</a>"
else 
	response.redirect ("tes01.asp?tugas=loginpage&err_login=yes")

end if

end sub %>

<% sub logout 
	session.abandon()
	response.write "anda berhasil logout...<br>"
	response.write "<a href=""tes01.asp""> klik disini untuk ke form login"
end sub
%>

<% '' fungsi utama page
call header
x=request("tugas")
Select case x
	case "logout"
		call logout
	case "loginver"
		call loginver
	case "loggedin"
		call loggedin
	case "loginpage"
		call loginpage
	case else 
		call loginpage
end select

call footer
%>

 

 

 

 

 

Situs ini kehilangan image dan files penunjang; karena terjadi storage failure dan saya tidak menyimpan backupnya - harap maklum
+