50 bài tập ASP cho người mới bắt đầu
Bộ bài tập ASP cơ bản, gồm 50 bài, từng bước từng bước, tương đối dễ học. Mong các bạn sưu
tầm tiếp và cập nhật thêm, để bộ sưu tập này nhiều lên và hữu ích hơn.
---------------------------
Băng qua việc cài đặt trình IIS trong WINDOWS, tạo thư mục ViduASP và soạn thảo các bài
tập vào đó, Share thư mục ViduASP thành WEB bằng cách chọn WebSharing. Cuối cùng có
thể chạy bằng địa chỉ trên Address của IE là http://localhost/viduAsp/tenfile.asp
Phần I: ASP cơ bản
1. Ghi dòng text ra trang web
<html>
<body>
<% response.write("Hello World!")
%>
</body>
</html>
2. Định dạng text kết hợp với các thẻ
html<html>
<body>
<% response.write("<h2>You can use
HTML tags to format the text!</h2>") %>
<%
response.write("<p
style='color:#0000ff'>This text is styled
with the style attribute!</p>")
%>
</body>
</html>
<%
dim i
for i=1 to 6
response.write("<h" & i & ">Header " & i
& "</h" & i & ">")
next
%>
</body>
</html>
6. Câu lệnh If và hàm thời gian dạng
đơn giản<html>
<body>
<%
dim h
h=hour(now())
response.write("<p>" & now())
response.write(" (Norwegian Time) </p>")
If h<12 then
response.write("Good Morning!")
else
response.write("Good day!")
end if
%>
</body>
</html>
7. Sử dụng lồng JavaScript (đối tượng
Date trong JavaScript)
<%@ language="javascript" %>
<html>
<body>
<body>
<p>Countdown to year 3000:</p>
<p>
<%millennium=cdate("1/1/3000
00:00:00")%>
It is
<%response.write(DateDiff("yyyy", Now(),
millennium))%>
years to year 3000!
<br>
It is
<%response.write(DateDiff("m", Now(),
millennium))%>
months to year 3000!
<br>
It is
<%response.write(DateDiff("ww", Now(),
millennium))%>
weeks to year 3000!
<br>
It is
<%response.write(DateDiff("d", Now(),
millennium))%>
days to year 3000!
<br>
It is
<%response.write(DateDiff("h", Now(),
millennium))%>
hours to year 3000!
<br>
cho các ứng dụng web xử lý ngày
tháng như ngày sinh, ngày thi, ngày
lên lương…
<html>
<body>
<%
response.write(FormatDateTime(date(),vbg
eneraldate))
response.write("<br />")
response.write(FormatDateTime(date(),vblo
ngdate))
response.write("<br />")
response.write(FormatDateTime(date(),vbs
hortdate))
response.write("<br />")
response.write(FormatDateTime(now(),vblo
ngtime))
response.write("<br />")
response.write(FormatDateTime(now(),vbsh
orttime))
%>
<p>
Syntax for FormatDateTime:
FormatDateTime(date,namedformat).
</p>
</body>
</html>
12. Kiểm tra xem 1 hằng số dạng
ngày có phải là 1ngày đúng không.
<html>
response.write("visit" & ltrim(name) &
"now<br />")
response.write("visit" & rtrim(name) &
"now")
%>
</body>
</html>
15. Đảo ngược xâu
<html>
<body>
<%
sometext = "Hello Everyone!"
response.write(strReverse(sometext))
%>
</body>
</html>
16. Làm tròn số như thế nào?
<html>
<body>
<%
i = 48.66776677
j = 48.3333333
response.write(Round(i))
response.write("<br>")
response.write(Round(j))
%>
</body>
</html>
17. Tạo ra một số ngẫu nhiên
<html>
<body>
<%
sometext="Welcome to this Web!!"
response.write(Mid(sometext, 9, 2))
%>
</body>
</html>
Các lệnh liên quan đến thủ tục
chương trình con
21. Gọi thủ tục con viết theo kiểu
VbScript khi lập trình ASP
<html>
<head>
<%
sub vbproc(num1,num2)
response.write(num1*num2)
end sub
%>
</head>
<body>
<p>
You can call a procedure like this:
</p>
<p>
Result: <%call vbproc(3,4)%>
</p>
<p>
Or, like this:
</p>
Response.Write(num1*num2)
end sub
%>
<script language="javascript"
runat="server">
function jsproc(num1,num2)
{
Response.Write(num1*num2)
}
</script>
</head>
<body>
<p>Result: <%call vbproc(3,4)%></p>
<p>Result: <%call jsproc(3,4)%></p>
</body>
</html>
Các xử lý trên form
24. Kiểm tra giá trị của một ô dữ liệu
trên form
<html>
<body>
<form action="demo_reqquery.asp"
method="get">
Your name: <input type="text"
name="fname" size="20" />
<input type="submit" value="Submit" />
</form>
<%
dim fname
fname=Request.QueryString("fname")
<html>
<%
dim cars
cars=Request.Form("cars")
%>
<body>
<form action="demo_radiob.asp"
method="post">
<p>Please select your favorite car:</p>
<input type="radio" name="cars"
<%if cars="Volvo" then
Response.Write("checked")%>
value="Volvo">Volvo</input>
<br />
<input type="radio" name="cars"
<%if cars="Saab" then
Response.Write("checked")%>
value="Saab">Saab</input>
<br />
<input type="radio" name="cars"
<%if cars="BMW" then
Response.Write("checked")%>
value="BMW">BMW</input>
<br /><br />
<input type="submit" value="Submit" />
</form>
<%
if cars<>"" then
Response.Write("<p>Your favorite car is:
" & cars & "</p>")
</body>
</html>
28. Hướng người dùng đến các form
khác nhau khi người dùng lựa chọn
hướng sử dụng
<%
if Request.Form("select")<>"" then
Response.Redirect(Request.Form("select"))
end if
%>
<html>
<body>
<form action="demo_redirect.asp"
method="post">
<input type="radio" name="select"
value="demo_server.asp">
Server Example<br>
<input type="radio" name="select"
value="demo_text.asp">
Text Example<br><br>
<input type="submit" value="Go!">
</form>
</body>
</html>
29. Xử lý thông tin của form ngay tại
form
<html>
<body>
<form action="demo_reqquery.asp"
Copyright: Tài liệu đại học ©