32.2.1 createparameter方法.asp

flash如何连接后台的数据库开发

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="adovbs.inc"-->
<title>CreateParameter方法</title>
<%
   dim objcmd,para
   set objcmd=server.CreateObject("ADODB.Command")
   set para=objcmd.CreateParameter("para1",adVarChar,adParamInput,10,"test")
   objcmd.Parameters.Append para 
   set para=objcmd.CreateParameter("para2",adInteger,adParamOutput)
   para.value=5
   objcmd.parameters.Append para
   for each para in objcmd.Parameters
       response.Write "<li>名称:"&para.name&"</li>"
	   response.Write "<li>类型:"&para.type&"</li>"
	   response.Write "<li>值:"&para.value&"</li>"
   next
%>