ACCESS的参数化查询（二）

会计考友 · 发表于 2012-7-31 22:29:16

以下是实例，查询news表中所有tsing发表的新闻　　------------------------------------------------------
　　et conn = Server.CreateObject("Adodb.Connection")
　　conn.ConnectionString = connString
　　conn.open()
　　set mycmd = Server.CreateObject("ADODB.Command")
　　mycmd.ActiveConnection=conn
　　mycmd.CommandText=sql
　　mycmd.Prepared = true
　　set mypar = mycmd.CreateParameter("temp",129,1,50,"tsing")
　　mycmd.Parameters.Append mypar
　　set myrs = mycmd.Execute
　　与上面基本相同不同的地方法是asp在对参数的表达上面不同
　　129为adChar，1就是指示输入参数(是其实是默认值)
　　大家请参阅MICROSOFT的ADOVB.Inc：
　　’---- ParameterDirectionEnum Values ----
　　Const adParamUnknown = 0
　　Const adParamInput = 1
　　Const adParamOutput = 2
　　Const adParamInputOutput = 3
　　Const adParamReturnValue = 4
　　’---- DataTypeEnum Values ----
　　Const adEmpty = 0
　　Const adTinyInt = 16
　　Const adSmallInt = 2
　　Const adInteger = 3
　　Const adBigInt = 20
　　Const adUnsignedTinyInt = 17
　　Const adUnsignedSmallInt = 18
　　Const adUnsignedInt = 19

　　Const adUnsignedBigInt = 21

会计考友 · 发表于 2012-7-31 22:29:17

</p>　　Const adSingle = 4
　　Const adDouble = 5
　　Const adCurrency = 6
　　Const adDecimal = 14
　　Const adNumeric = 131
　　Const adBoolean = 11
　　Const adError = 10
　　Const adUserDefined = 132
　　Const adVariant = 12
　　Const adIDispatch = 9
　　Const adIUnknown = 13
　　Const adGUID = 72
　　Const adDate = 7
　　Const adDBDate = 133
　　Const adDBTime = 134
　　Const adDBTimeStamp = 135
　　Const adBSTR = 8
　　Const adChar = 129
　　Const adVarChar = 200
　　Const adLongVarChar = 201
　　Const adWChar = 130
　　Const adVarWChar = 202
　　Const adLongVarWChar = 203
　　Const adBinary = 128
　　Const adVarBinary = 204
　　Const adLongVarBinary = 205

		自动登录	找回密码
密码			立即注册

[考试试题] ACCESS的参数化查询（二）

ACCESS的参数化查询（二）