以下是实例,查询news表中所有tsing发表的新闻 ------------------------------------------------------
) v! ^' p+ s O. a9 U: e( a. B et conn = Server.CreateObject("Adodb.Connection")
* N* |5 y3 h' m$ b8 E conn.ConnectionString = connString, U1 e8 @0 a' P& c
conn.open()
# c/ V; h! O" W9 C; W/ g set mycmd = Server.CreateObject("ADODB.Command")2 Z, k1 O, o* S
mycmd.ActiveConnection=conn
& A1 g5 w1 ?, x. ~, r) b' K& a mycmd.CommandText=sql. v4 k( @+ Z2 \: l7 Q/ c" L
mycmd.Prepared = true; J9 z' F+ x7 s( s5 w# L& X4 j
set mypar = mycmd.CreateParameter("temp",129,1,50,"tsing")% h4 y+ w7 e. H0 Q. B; H9 ^" s
mycmd.Parameters.Append mypar, [* d7 b! v# O& w& R. u
set myrs = mycmd.Execute
2 D- P/ m8 s/ x 与上面基本相同不同的地方法是asp在对参数的表达上面不同
. V0 Q8 P) |/ {+ P- v( J; h( W7 z+ r1 s 129为adChar,1就是指示输入参数(是其实是默认值)+ a: M; l- P R$ ?. P
大家请参阅MICROSOFT的ADOVB.Inc:/ j+ Q) [" b d" \3 v! ~( E* O9 L) q1 Y
’---- ParameterDirectionEnum Values ----
+ o2 Y M1 @8 f$ h# @' A Const adParamUnknown = 0
. c! C6 \0 [# x, |" F: N6 I- E3 A Const adParamInput = 1
) X# \) o2 {$ H% p2 Z Const adParamOutput = 2
3 f( m4 ~: v0 N- Q8 o% D6 O Const adParamInputOutput = 3- I9 |3 |5 U; @0 m W+ P9 M
Const adParamReturnValue = 4# {9 q) K# {& k; H l4 V, U, B
; J7 {7 S" U: h! ^4 D ’---- DataTypeEnum Values ---- |