BẮT ĐẦU HỌC LẬP TRÌNH ỨNG DỤNG WEB VỚI ASP
Được viết bởi Adminngày 14/04/2009 trongASP |Được xem 1640
lần.

 !"# $ %& 
"'%" (
)*  +,-%. /$ %& 012/$ %& 
34156#78%9
 7 ':;<2 =>??:?@ +?A
BC 5%DEFBGH7
9 334')"/  I 3J 
2:?K/%D% 
L434*-B)/ M1E1N ?O "P3
M1()@@
 010Q 0 RS?RT?UV-@  @  
@@Q 0 %MWXXX
/M1J()V  )"M1
6 "PJ?-
BY 6 "P0 %MZ +?> +?O "PB[
K ()V %& 
5 2\"]^^MMM
L4* P/ ?34%_ 15$"O Y* 
P` 1P  ?'%& U"%
V %& %D%_  a@ ; 1K
%
U$ %& 3Q 6E78%9?O "PB[
Q/"O Y78%9 
?=>?:?AO Y78%9B7 P  5
1bBO
L434E$ %& M11N ?O "P1E/6E $7
1P ]

2/HV>
2/B* j7 # "' B[ ["n2o@Vp
n^2o@Vp
j7 # B)B[ ["nqqp]
< "O 1 BO5eJK HV>  ?
%B334+K 
K HV>B) e Q"O +F'E1N j
a<"?f"??a'%& 
rK ?%9` 1P s0-M1V%-
]t?/HV>np?n<p?
B* j7 # B[9nqqp
nHV>p
n<:;up
npn<p0-M1n^<pV%-
nq
o" 0;
qp
n^<:;up
n^HV>p
vKh/?M16P
cVE6E>!"# $ %& M11N w>QL# ;-wUx<
Vh 6Q?WXX
cx,-%.  M1BK wU3/Py>@2:cWXX
c;1wU3/P@:U<::dcWXX
c vXw+HcRRR
c;UwV
c"]^^MMM "
c"]^^MMMm-
c"]^^MMMS %
c"]^^""+"

K1-
ag-EBz r /j3 E ig-EBz h) 
6'.B)j3a'%&? Er
/j3/B4j1N Be KB7 zjTc1#h) 
B4jJK1P j*r
1P jT1{34hBWS|
;1P j2@@6 BJB414%D /6'.J/   9
6/?'%& E a? Q
Bj K 1P j2@@1N /F%& WTB4j
3/zlWTcWSSB4j3
/6'. 2@@ -V- Q %{3WTB4j? 6
h) /6'.J/   9
6/ Y7 ? Q Bj* Y1P j6/ 
l *   9•‚a'%&]
%"WSXWSWSWWSvWSmWST?
""
WT
y y"2-0y
U@
6V6a ?
M
WT
2@@2@@2@@2@@2@@2@@?
V- Q  l 1P j -?6 "P5P/6'.JK
  9BY3 1P j
H- 3' +/7 6 "P5P/6'.BYB)14%D
1N %- 5KB4j>5-'
%&E ae 3vm6'.G)"lWT9/S%5 
;{3WTB4j Q 1P 
jM %McWST% E a14%D Kh6'. 

c2/j3/B4j /B7 zj
Z %%_ |1B414%D /B4j?%B3 33414
%D B)BE |S?Sv|6'.3B4j
N 6P lXc|S?SvS;!-Z % 3414
%D B)OE/6'.J
/   9
2/B7 P  5B4j3/6'.Z %14%D (B4
j1N Be KB7 zj|c1
L,-' /j3 -Q J-JZ % "Q 1P WX
B)@:^@y2ˆ 3 
@:^@y2X|m|-} rZ2cWV- Q ?B47 '/
h +F'6Z %
Bk  h3 g/# 9-Y %9? 
%_ //6/ B4j
3/B4j /B7 zj(/j3 !-B)
rK%* 1E BGJ
Z %ZV‰wZ %V  ‰V %&  5
-ZV‰cTZV‰c|%_ %j-
/B7 zj3BK%6/ B4j3/B4jZV‰cT
%_ BE mB7 zjTc1 6
ZV‰c|%_ BE WB7 zj|c1B4j3a'%& r
/j3JZV‰cT]
cWT6'.BOQ JZ %lB4jZ„XXXXBE Z„XX•‰?B)
j3 1-
cVlB4jZ„XXTXBE Z„X•‰‰?B)j3 W1-
cVlB4jZ„XTXXBE Z„‰‰‰‰?B)j3 v1-
cVlB4jZ„XTXXBE Z„‰‰‰‰?B)j3 m1-
U!-6BY!"BE Z % !"# ?O "P+/Bz Š
e %_ 1P jZ %
%* 1E BG ]Z2cW?ZV‰cT?-ZV‰c|?AZ2cWB)%_ 

B)4 zs/‹t
L4{Bz 1P j M1  F%& ?%_ 
yVK' HVVcy=Z@aB)
/ 2  cV-"?{Bz Q J1P jB)%_  
K' 2:UVyUVV  Y/
1P jB)%_ Q 0 %M34+*•m‚V '%&?
yVB)%_ B4{Bz 
1P jM %McWSWK M1]
nyVHVVcy=Z@aƒŒ2  cV-"Œ2:UVyUVƒŒ+^•
2HoyVƒM %McWSWŒp
L4-QO# %-F%& K1P j 1K M1?
"PB[yV -
<:;uV  B[yV - Hy; '%&
]
nHV>p
nHy;p
nyVHVVcy=Z@aƒŒ2  cV-"Œ2:UVyUVƒŒ+^•
2HoyVƒM %McWSWŒp
nV@V>ypUMn^V@V>yp
n^Hy;p
n<:;up
A
n^<:;up
n^HV>p
V  )"1P jB){Bz 6 36P ` 14%D 
B)5P/6'.J M1?
"P%_ BE hEJ6'.U2oc 
 hE6'
.B4jJ6'.Z %7 $  314%D h
E6'.3%* !"", 

o" 0tVyU’Uat‘ %9JK1E ?'%& K
 J%
qp
A
L4-QOM1j3/%9 /N (1E
1P jiB)%_ B4
4 z* ?O "PB[K' 2%Y1P j
7 $ 2/  '%&i
-QOM1j3/(%91P jZV‰cT
V  Y/%"7 $ 
/1P j+*•m‚]
nq 2%ƒ|SXXqp^^;_  1K/  
   
nq“2%ƒ|SXXqp^^;_    
>5-'%&  )"%_ 78%9=>•X?%9
B)PYl/,-5 
1P jZ2cWUE{Bz 2%|SXX?M1i.
BK -4 %9lZ2cW 
ZV‰cT? )* E6 {Bz K' 2%?M1
i-4 %9B3BE  
1P j[Bz '%& M %McWSWLY -P'
 )"Kh M1"4
z6 Be %9Z %B) /78%9 
=>•X^WXXX?
WXXX
U?/ "3F%& B* j E!"2%
|SXX"PB)Bz 
%* 7 $ ZV‰cT•|‚
U!-?E!"K' 2%  "ie"
M14B)/%9

cdQ gP z2;>=>•X^WXXX? E%_ 
/N ( /,
 =>?"PQE"BO 9U1b1K9 •T‚
UE6 F%& E"BO
S
9 -?=>i.BK -4 (%9 1P j
[Bz   6
F%&  3 //!" !2;>a'%&? E1* %_ ,
 ]@UyoV@UV:
@UHa@yUVyU’aa>Zy‘VO UHP•#N (%9
‘VO UHP•iB)=>
+ (6'. $6 "P(Z %
LY -i%† BE !
gP%9iB)96 ' +/a'%& %9J
6'.sOt (Q 
y<•?iB) v6'.6/ V 6B3 E%_ 
, @UyoV@UV:
@UHa@yUVyU’aa>ZyU‘VO UHP•#v1-y<•i
B)+ K6'.
6+h •R‚
vH()Z %J/"O Y
v2/"O Y()* P M1
ca%UyV?U"%?‰ WXXW]H()!" 
%%* ZV‰cT
ca@ ;|X]UE  "F%& /N (
B)Š%%* 
Z %?'%& ]o" 0s2l 1* s#e!"
 ?7 # i"/
  " -3+5 6'.Z %-QO+h 
%%* Z %? E

U%?A•F%& /gP
z2;>()Z % =>•X^WXXX?WXXX?
A•B[/B* j{Bz 1P j
M1# %-%_ B4j3Pj%9
V'%†
"]^^MMM^1%^^ %"
W"]^^MMM %^ %^ %%^" "
v"]^^""^%"+–%ƒ61• c•=vXv|W
m"]^^% ^1-^%"–
ƒ^M6"^^%^ ^^m"
S"]^^MMMMv^Vo^mX^•%c"
|
|"]^^""^%"+–%ƒd<•yUcZ•=WRSX|vŽ
•"]^^% ^1-^%"–ƒ^1-^ c
^^^"%6^"^11SX"
T"]^^""^%"+–%ƒ61• c•=WvRSvX
R"]^^""^%"+–%ƒ61• c•gWvWSTX
X"]^^""^%"+–%ƒ61• c•=WmSXXX
"]^^""^%"+–%ƒ61••>U‚•=WSmvv
H—V
Cỏc th thut cựng loi
Tỡm hiu 1 s vn trong ASP
c vit bi Adminngy 14/04/2009 trongASP |c xem 584
ln.

1. Đặc điểm:
Tên file: .asp
Phải cài thêm Microsoft Active Server Page để bổ trợ cho Web
Server, chuyên xử lý các script viết trong file .asp. Cho phép viết ứng dụng
theo kiểu Server Side => các trang web sẽ sẽ đợc xử lý tại Server trớc khi gửi

Để giải phóng dùng Set f = nothing 3. Truy nhập hệ thống file:
<%
Dim objFile
Dim objStream
Set objFile = Server.CreateObject(Scripting.FileSystemObject);
Set objStream = objFile.OpenTextFile(Server.Mapath(/ASP) &_
\Chapter05\Listing 5-9\tips.txt)
Randomize Timer
IntLine = Int(Rnd*19)
For i=0 to intLine
ObjStream.SkipLine
Next
StrTxt = objStream.ReadLine
ObjStream.Close
Set objFile= Nothing
Set objStream= Nothing
%>
=> Để tạo file mới dùng phơng thức CrateTextFile của objFile.
Để ghi một dòng văn bản dùng objStream.WriteLine s. 4. Truy nhập cơ sở dữ liệu:

<%
Dim objConnection
Set objConnection = Server.CreateObject(ADODB.Connection)
ObjConnection.Open Publication, sa,

Set objConnection = Server.CreateObject(ADODB.Connection)
StrCnn = driver = {SQL Server}; Server = smas; uid = sa; pwd= ;
database= pubs
objConnection.Open strCnn
%>

5. Phân trang RecordSet
Khi select => cho kết quả 1 bảng gồm nhiều hàng. Tuy nhiên mỗi lần
chỉ muốn sử dụng một vài hàng, ví dụ: bảng 50 hàng, mỗi lần hiển thị 10
hàng => sử dụng kỹ thuật paging. ADO cung cấp các thuộc tính của
Recordset nh: PageSize, PageCount, AbsolutePage.
PageCount: số trang, PageSize: số hàng.
ở đây ta dùng biến session CurrentPage để ghi nhận trang hiện hành.
<% Select Case Request.QueryString(Direction)
Case Null
Session(CurrentPage) = 1
Case Next
Session(CurrentPage) = Session(CurrentPage) +
1 Case Previous
Session(CurrentPage) = Session(CurrentPage) -
1
End Select %>
Chú ý: Request.QueryString(Direction) <=>
QueryString(Direction)
Tiến hành kết nối truy vấn dữ liệu.
<%
const adOpenKeySet = 1
dim objConnection không cần khai báo cũng đợc
dim objRexordset
Set objConnection = Server.CreateObject(ADODB.Connection)

các user của một ứng dụng web. Tất cả các user mà yêu cầu các trang web từ
một th mục web có thể chia xẻ với nhau các biến định nghĩa trong các trang
đó.
<% Application.Lock
Application(Company) = VASC
Application.Unlock %>
ở đây định nghĩa 1 biến là Company, có giá trị là VASC. Vì rằng biến có
thể bị tranh chấp nên phải đặt giữa Lock và Unlock.
<% Application.Lock
Application(Time) = Now
Application.Unlock %>

7. Đối t ợng Session:
Cho phép tạo ra các biến ứng với từng ngời dùng. Chẳng hạn biến có tên
là UserName, ứng với mỗi user có một giá trị cụ thể khác nhau, phân biệt. Nh-
ng khi sử dụng thì tổng quát cho các user. Thực ra mỗi biến sẽ đợc server phát
sinh và gán cho nó một giá trị định danh GUID (Globally Unique Identifier,
128 bit) và gửi tới Browser. Browser sẽ lu trữ GUID đó và sử dụng để yêu cầu
dữ liệu từ biến có GUID tơng ứng trên Server.
<% Session(Company) = NewTech
Session(Email) = %>
My Company : <% Session(Company) %>
Email : <% Session(Email) %>
Các biến Session này sẽ bị huỷ bỏ sau một khoảng thời gian (khoảng 20) ngời
dùng thôi truy xuất các trang web trong th mục web.
Chú ý là trong file global.asa => cho pháp đặt các biến, code vào các
thủ tục Session_OuStart và Session OuEnd. Ví dụ:
<SCRIPT LANGUAGE = VBScript RUNAT = Server>
Sub Session_OuStart
Session(Company) = VASC