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 trongASP |Được xem 1640
lần.
!"# $ %&
"'%" (
)* +,-%. /$ %& 012/$ %&
34156#78%9
7 ':;<2 =>??:?@ +?A
BC 5%DEFBGH7
9 334')"/ I 3J
2:?K/%D%
L434*-B)/ M1E1N ?O "P3
M1()@@
010Q 0 RS?RT?UV-@ @
@@Q 0 %MWXXX
/M1J()V )"M1
6 "PJ?-
BY 6 "P0 %MZ +?> +?O "PB[
K ()V %&
5 2\"]^^MMM
L4* P/ ?34%_ 15$"O Y*
P` 1P ?'%& U"%
V %& %D%_ a@ ; 1K
%
U$ %& 3Q 6E78%9?O "PB[
Q/"O Y78%9
?=>?:?AO Y78%9B7 P 5
1bBO
L434E$ %& M11N ?O "P1E/6E $7
1P ]
cdE $YE6EM1?HV>B4e"E6E/ M1
cdE $Y/ 9!"# a<"?f"a<"
9!"#
%&
cV /$ %& M13Q g YBE gP '?
-+5?!" !78%9
Q O "P bQ6E $Ye"/"/,-5 =>?
6E $Y6E h!"
# 78%9;:
WKh6E $71P Y
K 3KhB[B4]
c>K!" ` 1P +3"O 8K "]O 8
K -ie"M1
-QO# +F' " 6PY#
%-
cU 9" %& 5%_ B4E/jJ
a<"U?k 34
E/j1N / 9 f"??- ? EQ
M13B[/1K
+F' 9 -"
c2/B* jE iB)/1K+F' 9Q
M1+F'O .l
Q +h %dEgPJ+F' -PY HV>
M1M1i
F -Y# %-L3'%*?*# %-
6 45-B)/B*
j7 # BjB)E
cK C3m "O ]
;9` 1P +
W
2/HV>
2/B* j7 # "' B[ ["n2o@Vp
n^2o@Vp
j7 # B)B[ ["nqqp]
< "O 1 BO5eJK HV> ?
%B334+K
K HV>B) e Q"O +F'E1N j
a<"?f"??a'%&
rK ?%9` 1P s0-M1V%-
]t?/HV>np?n<p?
B* j7 # B[9nqqp
nHV>p
n<:;up
npn<p0-M1n^<pV%-
nq
o" 0;
qp
n^<:;up
n^HV>p
vKh/?M16P
cVE6E>!"# $ %& M11N w>QL# ;-wUx<
Vh 6Q?WXX
cx,-%. M1BK wU3/Py>@2:cWXX
c;1wU3/P@:U<::dcWXX
c vXw+HcRRR
c;UwV
c"]^^MMM "
c"]^^MMMm-
c"]^^MMMS %
c"]^^""+"
c"]^^MMM"g
Các thủ thuật cùng loại
LẬP TRÌNH WEB ASP VỚI TIẾNG VIỆT UNICODE
Được viết bởi Adminngày 14/04/2009 trongASP |Được xem 1078
lần.
Kh6/ ` 1P Y14%D 6'.1Q /-'
d/ YB4j?B7 zj?1P j
aY[1P 5?/-' {/ h?%B3B414
%D /6'.Q /-' O "P
3Kg 5g/ 9/6'.O 14%D / h
7 $ /-' +F'=
-B)4 g/1]
c2r !"/6'.O j3
c/ (6'.O j3K/z -Q 6 ,?r
B4j%"
c2-4 /B4j %j-/B7 zj% B4
"&&9j
3KB7 zjKB7 zJ1K ?34T?|?-vW1
2/B4j6 5
E"P3_ hB7 zj
V!")" 9 B4jJK!"/6'.B)rK
j%"-} r1P
j-1KjU!-6 3YK1P j?e g ,
BE BY' ?h) /6'.
B)j3?/j3e /B7 zj
>5-'%&1P j2@@?!"6'.O j33WT6'.1C
/6'.E ?6'.h?6'.Y
?~/6'.BY64 h *2/B4j3
/z N 6P lXcW•(
B4jB)j31N Be KB7 zjT1?3 €Be
K1-
ag-EBz r /j3 E ig-EBz h)
6'.B)j3a'%&? Er
/j3/B4j1N Be KB7 zjTc1#h)
B4jJK1P j*r
1P jT1{34hBWS|
;1P j2@@6 BJB414%D /6'.J/ 9
6/?'%& E a? Q
Bj K 1P j2@@1N /F%& WTB4j
3/zlWTcWSSB4j3
/6'. 2@@ -V- Q %{3WTB4j? 6
h) /6'.J/ 9
6/ Y7 ? Q Bj* Y1P j6/
l * 9•‚a'%&]
%"WSXWSWSWWSvWSmWST?
""
WT
y y"2-0y
U@
6V6a ?
M
WT
2@@2@@2@@2@@2@@2@@?
V- Q l 1P j -?6 "P5P/6'.JK
9BY3 1P j
H- 3' +/7 6 "P5P/6'.BYB)14%D
1N %- 5KB4j>5-'
%&E ae 3vm6'.G)"lWT9/S%5
;{3WTB4j Q 1P
jM %McWST% E a14%D Kh6'.
B4jQ E"?KB4j%
6'.78KB4j% %5 a'%&]6'.sEt
B)14%D 1N B4j
W
7 $ /6'.Q6'.%5b]EƒQ„
…
2/14%D
!-B)r/14%D
/%"%! 9e -rG)"
<P jV2aUvc<2%_ vmB4jB414%D E/6'.
E a?' BY -Bj%† BE
"PF%& KhB4jJ1P j2@@L,-' '%
/ M1F%& 1P j
-6 4 zB)6'. /# %-@ y+"
SX8Q 2/14%D !-
B)r/14%D 6E)"I ""%! 9
e -r%. I
W<P jZ %
aY[1P 5/1P jQ J0 %M1P jTc1? €
(B4jB)j31N
Be KB7 zjTc12' BY -Bj* h) //
6'.B)j{WS|;B3
K` 1P 6 4_ 4 z Y6'.J/ 9
6/ B)
Z %B Nh 5 /6'.Jr 9
K1P j%- 5•W‚H5
BY Q ‡6BY!"BE ! 9Z %B3]
cV!"6'.Z %14%D ]8B,-h 3BE !"6'./
/ +*/6'.1N /
B4j7 $
c2/j3/B4j /B7 zj
Z %%_ |1B414%D /B4j?%B3 33414
%D B)BE |S?Sv|6'.3B4j
N 6P lXc|S?SvS;!-Z % 3414
%D B)OE/6'.J
/ 9
2/B7 P 5B4j3/6'.Z %14%D (B4
j1N Be KB7 zj|c1
L,-' /j3 -Q J-JZ % "Q 1P WX
B)@:^@y2ˆ 3
@:^@y2X|m|-} rZ2cWV- Q ?B47 '/
h +F'6Z %
Bk h3 g/# 9-Y %9?
%_ //6/ B4j
3/B4j /B7 zj(/j3 !-B)
rK%* 1E BGJ
Z %ZV‰wZ %V ‰V %& 5
-ZV‰cTZV‰c|%_ %j-
/B7 zj3BK%6/ B4j3/B4jZV‰cT
%_ BE mB7 zjTc1 6
ZV‰c|%_ BE WB7 zj|c1B4j3a'%& r
/j3JZV‰cT]
cWT6'.BOQ JZ %lB4jZ„XXXXBE Z„XX•‰?B)
j3 1-
cVlB4jZ„XXTXBE Z„X•‰‰?B)j3 W1-
cVlB4jZ„XTXXBE Z„‰‰‰‰?B)j3 v1-
cVlB4jZ„XTXXBE Z„‰‰‰‰?B)j3 m1-
U!-6BY!"BE Z % !"# ?O "P+/Bz Š
e %_ 1P jZ %
%* 1E BG ]Z2cW?ZV‰cT?-ZV‰c|?AZ2cWB)%_
/gP z78%9
=>•X^WXXX?WXXX?ZV‰cT B)
%_ /$ %& M1?
6ZV‰c|*B)%_ /h 0 %MWXXX^x?
f?A
W>!"# M1E aZ %
W2{Bz 1P j%_ M1
dK M1B)-4 +h ?# %-i
%_ Y1P j
M1B3F%& B4-4 %j-/1- B3 /6'.
7 $ B44 zQ
# U?K6%9 /‰:oB)FB6
%_ 1?# %-k i
` $1P j -B4-4 BG%96-Y Ba'%&? E
M1B){Bz %_ 1P
v
jM %McWSW#6‰:oB)1?%9iB)j3
1P j -%_B3
/K"BY64 J‰:o?%9B)Š%%*
Z %•v‚
a{Bz 1P j3}5g r 4 zBe
K% E6E
h ?18# E6 {Bz 1P jB)%_ M1
K/Š ?#
%-iF%& 1P j[Bz a'%&? E%9-4 BE
M1y<<T? E{
Bz 1P jZV‰cT#v1- -' 14%D jJ6'.sYt
6 Eh %_ 1P
j[Bz ?'%& M %McWSW?#v1- -*B)+
14%D v6'.6/ i
B)4 zs/‹t
L4{Bz 1P j M1 F%& ?%_
yVK' HVVcy=Z@aB)
/ 2 cV-"?{Bz Q J1P jB)%_
K' 2:UVyUVV Y/
1P jB)%_ Q 0 %M34+*•m‚V '%&?
yVB)%_ B4{Bz
1P jM %McWSWK M1]
nyVHVVcy=Z@aƒŒ2 cV-"Œ2:UVyUVƒŒ+^•
2HoyVƒM %McWSWŒp
L4-QO# %-F%& K1P j 1K M1?
"PB[yV -
<:;uV B[yV - Hy; '%&
]
nHV>p
nHy;p
nyVHVVcy=Z@aƒŒ2 cV-"Œ2:UVyUVƒŒ+^•
2HoyVƒM %McWSWŒp
nV@V>ypUMn^V@V>yp
n^Hy;p
n<:;up
A
n^<:;up
n^HV>p
V )"1P jB){Bz 6 36P ` 14%D
B)5P/6'.J M1?
"P%_ BE hEJ6'.U2oc
hE6'
.B4jJ6'.Z %7 $ 314%D h
E6'.3%* !"",
!"&", ;* !"", 3e"/"sŽ•;•t?;h!"
", ;* !"&", 3e"/"
sŽ•+H•t?Hh!"&", a'%&]Ž•WWR•Ž•+yS•/h
EJ6'.st 1P
jZ %K6["hEJ6'.?# %-i
E.E"BE 6'.3B4j
7 $ 1P jZ %6 F%& BE 1P j
B){Bz •S‚
>5-'%&K M1B)j31P jM %McWSW?e
B3B44 zB* ` 1P ]sVE
at?%9 M1"PsVŽ••T•• aŽ••T•R•t? B3
Ž••T••Ž••T•R•O )/
hEJ/6'.sEtst 1P jZ %
LY -"•"P'*?/ M16 %_ 1P
jZV‰cT?'%& M %McWSW?
† 344 zB)/6'.Z %6 K1P jB3-
6-4 BGl1P jZV‰cT
M %McWSW?‰ WXXX*.BK Q/h
E6'./Q
WWH*BK JM1
d# %--QOK "?# +F' "*
M1i %z/j 8
M1 -F6EgPY# %-V ?
o" 0B)%_ /
6E+5l/N (-l/1E # a'%& ]
m
A
nq
o" 0s2l 1* BE M1 -t‘ KN
(
o" 0tVyU’Uat‘ %9JK1E ?'%& K
J%
qp
A
L4-QOM1j3/%9 /N (1E
1P jiB)%_ B4
4 z* ?O "PB[K' 2%Y1P j
7 $ 2/ '%&i
-QOM1j3/(%91P jZV‰cT
V Y/%"7 $
/1P j+*•m‚]
nq 2%ƒ|SXXqp^^;_ 1K/
nq“2%ƒ|SXXqp^^;_
>5-'%& )"%_ 78%9=>•X?%9
B)PYl/,-5
1P jZ2cWUE{Bz 2%|SXX?M1i.
BK -4 %9lZ2cW
ZV‰cT? )* E6 {Bz K' 2%?M1
i-4 %9B3BE
1P j[Bz '%& M %McWSWLY -P'
)"Kh M1"4
z6 Be %9Z %B) /78%9
=>•X^WXXX?
WXXX
U?/ "3F%& B* j E!"2%
|SXX"PB)Bz
%* 7 $ ZV‰cT•|‚
U!-?E!"K' 2% "ie"
M14B)/%9
B) /78%9?N (6'.?A1P j
B4j3 % 36
-4 BE # %-a{Bz 1P j%_
M11N yVie"#
%-%D %z%%%9B)-4 BE lM1Be
564 z••‚
Wv2/171P J!"# M1"F%& E aZ %
c* 9!" "%%* j3ZV‰cT
cV /!" "?” /B* j{Bz M1
# %-+F'%9
M1 ZV‰cT2/B* j -"PB[8BO "
F%& '%&†]
nq“2:;yyƒ|SXXqp
nq 2%"ƒ|SXXqp
nHV>p
nHy;p
nyVHVVcy=Z@aƒŒ2 cV-"Œ2:UVyUVƒŒ+^•
2HoyVƒZV‰cTŒp
n^Hy;p
n<:;up
n^<:;up
n^HV>p
cF%& /gP z2;>()Z % =>
•X^WXXX?WXXXUE
%_ =>#"P61/64%9/ %9
Z %U2Ho?
Uao2Ho?UVyxV?A2/64%9 VyxV?y:?
Huyo>@Ud WXXX
[Bz ()%9Z %
cV-+578%9 gf"^a<"^:;<2
cdQ gP z2;>=>•X^WXXX? E%_
/N ( /,
=>?"PQE"BO 9U1b1K9 •T‚
UE6 F%& E"BO
S
9 -?=>i.BK -4 (%9 1P j
[Bz 6
F%& 3 //!" !2;>a'%&? E1* %_ ,
]@UyoV@UV:
@UHa@yUVyU’aa>Zy‘VO UHP•#N (%9
‘VO UHP•iB)=>
+ (6'. $6 "P(Z %
LY -i%† BE !
gP%9iB)96 ' +/a'%& %9J
6'.sOt (Q
y<•?iB) v6'.6/ V 6B3 E%_
, @UyoV@UV:
@UHa@yUVyU’aa>ZyU‘VO UHP•#v1-y<•i
B)+ K6'.
6+h •R‚
vH()Z %J/"O Y
v2/"O Y()* P M1
ca%UyV?U"%?‰ WXXW]H()!"
%%* ZV‰cT
ca@ ;|X]UE "F%& /N (
B)Š%%*
Z %?'%& ]o" 0s2l 1* s#e!"
?7 # i"/
" -3+5 6'.Z %-QO+h
%%* Z %? E
6 /6'.Z %i1z5V- Q ? Er %%*
Z %#7 # i
!" -%%* j3Z2cWH -M1@@6
4+F'B) "
-•X‚;B36 Q %_ a@ ;|XB4* P/
" /$ %&
Z %E a
c2/"O Y %& ()ŠE aZ %]Z d-?
ad-
vW2/"O Yh 6/
c=>•X^WXXXWXXX()Z %a(6'
.Z %?h iF
%& 1P jZ2cWB49? €%_ hBz W1-K
6'.=>|S
R•6 ()Z %
c@@SX6 4BrB)/!" %%* Z2cW•X‚?
6 ()2%J1P
jZV‰c|WXX•‚@@mX6 ()2%J1P j
ZV‰cT|SXX•‚
V3*
Z %B N6b"&* EYh) 6'.B)j
3J/1P jTc1B3?
"•"r 934F%& K1P j%- 5
;5 BY7 ' 9
-Y %9Z %3/%* j36/ Z2c
W?ZV‰cT?ZV‰c|ZV‰cT%*
j3Z % %& 5 /$ %& M1 -
L4E/$ %& M1%_ E aZ %?O r /"O
Y* P()9!"
%%* j3ZV‰cT a%UyV?‰ WXXX?
U%?A•F%& /gP
z2;>()Z % =>•X^WXXX?WXXX?
A•B[/B* j{Bz 1P j
M1# %-%_ B4j3Pj%9
V'%†
"]^^MMM^1%^^ %"
W"]^^MMM %^ %^ %%^" "
v"]^^""^%"+–%ƒ61• c•=vXv|W
m"]^^% ^1-^%"–
ƒ^M6"^^%^ ^^m"
S"]^^MMMMv^Vo^mX^•%c"
|
|"]^^""^%"+–%ƒd<•yUcZ•=WRSX|vŽ
•"]^^% ^1-^%"–ƒ^1-^ c
^^^"%6^"^11SX"
T"]^^""^%"+–%ƒ61• c•=WvRSvX
R"]^^""^%"+–%ƒ61• c•gWvWSTX
X"]^^""^%"+–%ƒ61• c•=WmSXXX
"]^^""^%"+–%ƒ61••>U‚•=WSmvv
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
xuống Client.
Các mã lệnh đợc chèn vào trong khắp trang web và đợc xử lý tuần tự.
Mã lệnh là các Script, hiện ASP cho phép dùng 2 srcript là VBScript hoặc
JavaScript. Lựa chọn Script đợc đặt ngay tại dòng đầu file:
<%@LANGUAGE = VBSCRIPT%>
<%@LANGUAGE = JSCRIPT%>
Ngầm định là VBScript.
Các đoạn mã không phân biệt dài ngắn đợc đặt trong dấu hiệu: <
% %>
Các biến không cần khai báo mà tự khi gán giá trị cho nó sẽ xác định
biến.
Để in ra các biến trong trang web sử dụng nh mã sau:
<% =s %>
Để làm việc với hệ thống file, thao tác với Database => cần phải sử
dụng các đối tợng kiểu Active X của ASP hay cài đặt thêm vào.
Để lấy các giá trị truyền từ client lên dùng phơng thức request.
Ex: s = request(Company)
=> Lấy giá trị của biến Company.
2. Sử dụng các đối t ợng:
ASP cho phép sử dụng các đối tợng kiểu Active X. Để khai báo ta dùng phơng
thức CreateObject của đối tợng Server có sẵn.
Ex: Set f = Server.CreateObject(Scripting.FileSystemObject);
Tổng quan: Set param =
Server.CreateObject(PacketName.ClassName)
ProgID
Sau đó có thể sử dụng các hàm của đối tợng đó.
Để 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,
Dim objRecordSet
Set objRecordSet = Server.CreateObject(ADODB.RecordSet)
ObjRecordSet.Open Select pub_name From Publishers,
objConnection
%>
Đối tợng kiểu Connection: tạo kết nối ADO tới Database.
Đối tợng kiểu RecordSet: cho phép thao tác trên table (select,update )
của Connection đã thiết lập.
<% Do While Not objRecordSet.EOF %>
<% = objRecordSet(pub_name)%>
<% objRecordSet.MoveNext
Loop
ObjRecordSet.close
ObjConnection.close
Set objRecordSet = nothing
Set objConnection = nothing %>
Chú ý: khi thêm, cập nhật dữ liệu ngoài việc dùng SQL, có thể thêm
theo cách :
With objRecordSet do
.AddNew
.Field(Authors) = Homes
. Field(Title) = Iliad
.Update
End With
Có thể kết nối trực tiếp không qua DSN của ODBC nh sau :
<%
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)
Set ObjConnection.Open Biblio, ,
Dim strSQL
StrSQL = Select * from Authors
Set objRecordSet = Server.CreateObject(ADODB.RecordSet)
ObjRecordSet.PageSize = 10
ObjRecordSet.Open strSQL, objConnection, adOpenKeyset
ObjRecordSet.AbsolutePage = CLng(Session(CurrentPage))
%>
<P> Page = <%=Session(CurrentPage) %> of <
%=ObjRecordSet.PageCount>
<% Dim i
For i = 1 to ObjRecordSet.PageSize %>
<% = ObjRecordSet(Authors) %>
<% ObjRecordSet.MoveNext
Next %>
<% if CLng(Session(CurrentPage)) < ObjRecordSet.PageCount Then %>
<P> <A HREF = paging.asp?Direction=Next>Next Page</A></P>
<%Enf if%>
<% If CLng(Session(CurrentPage)) > 1 then %>
<P><A Href = paging.asp?Direction=Previous>Previous
Page</A></P>
<%Enf if%>
<% ObjRecordSet.close
ObjConnection.close
Set objRecordSet = nothing
Set objConnection = nothing %>
6. Đối t ợng Application:
Đối tợng này cho phép tạo các biến ứng dụng. Đó là các biến cho tất cả
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
Session(Email) =
End sub
</SCRIPT>
8. Đối t ợng Request:
Để gửi dữ liệu lên Server, ta sử dụng Form trong trang Web. Tên của
các đồi tợng web nh Text, Button nằm trong form sẽ đợc dùng nh tên biến khi
phân tích, lấy dữ liệu trên Server. Trong form có button kiểu Submit để ng-
ời dùng đẩy dữ liệu lên Server.
Form có hai thuộc tính là Action và Method. Action quy định file
(.asp) mà sẽ đón nhận và xử lý dữ liệu đẩy lên. method quy định cách thức
gửi dữ liệu; nếu là POST thì tất cả dữ liệu trong form sẽ đóng gói và đẩy
lên Server; Nếu là GET thì dữ liệu đợc gửi đi nh một phần của URL, thờng
là sau dấu ?.
<Form Method = POST Action =
Kiểu gửi dữ liệu GET cũng có thể lợi dụng để gửi đi dới dạng một
link.
< A href =
http:// www.vnn.vn/data.asp?name=ha&company=VASC >Test</a>
Gửi theo GET thì độ lớn bị hạn chế và không che dấu dữ liệu.
Để lấy dữ liệu ta dùng phơng thức của đối tợng Request.
S = Request.Form(Name)
<=> S = Request(Name)
Trong trờng hợp dữ liệu đợc đa lên từ 1 hyperlink, có thể dùng:
S = Request.QueryString(Name)
<=> S = Request(Name)