易截截图软件、单文件、免安装、纯绿色、仅160KB

ASP调用带参数存储过程的几种方式

  最近有很多的朋友问到调用存储过程的问题,这里简单介绍几种ASP调用带参数存储过程的方法。
  1. 这也是最简单的方法,两个输入参数,无返回值:
  set connection = server.createobject("adodb.connection")
  connection.open someDSN
  Connection.Execute "procname varvalue1, varvalue2"
  '将所有对象清为nothing,释放资源
  connection.close
  set connection = nothing
  
  2. 如果要返回 Recordset 集:
  set connection = server.createobject("adodb.connection")
  connection.open someDSN
  set rs = server.createobject("adodb.recordset")
  rs.Open "Exec procname varvalue1, varvalue2",connection
  '将所有对象清为nothing,释放资源
  rs.close
  connection.close
  set rs = nothing
  set connection = nothing
  
  3. 以上两种方法都不能有返回值,(Recordset除外),如果要得到返回值,需要用Command的方法。
  首先说明,返回值有两种。一种是在存储过程中直接return一个值,就象C和VB的函数返回值那样;另一种是可以返回多个值,存
  储这些值的变量名称需要在调用参数中先行指定。
  这个例子要处理多种参数,输入参数,输出参数,返回记录集以及一个直接返回值(够全了吧?)
  存储过程如下:
  use pubs
  GO
  -- 建立存储过程
  create procedure sp_PubsTest
  -- 定义三个参数变量,注意第三个,特别标记是用于输出
  @au_lname varchar (20),
  @intID int,
  @intIDOut int OUTPUT
  AS
  SELECT @intIDOut = @intID + 1
  SELECT *
  from authors
  WHERE au_lname LIKE @au_lname + '%'
  --直接返回一个值
  RETURN @intID + 2
  
  调用该存储过程的asp程序如下:
  <%@ Language=VBScript %>
  <%
  Dim CmdSP
  Dim adoRS
  Dim adCmdSPStoredProc
  Dim adParamReturnValue
  Dim adParaminput
  Dim adParamOutput
  Dim adInteger
  Dim iVal
  Dim oVal
  Dim adoField
  Dim adVarChar
  ‘这些值在 VB 中是预定义常量,可以直接调用,但在 VBScript 中没有预定义
  adCmdSPStoredProc = 4
  adParamReturnValue = 4
  adParaminput = 1
  adParamOutput = 2
  adInteger


相关文档:

ASP中十大常用程序代码.:第二节〈我的心得〉

用ASP制作张扬个性的调查系统(1)
  
  随着网络的普及,网上调查往往能达到较好的效果。在自己的个人站点上放一个趣味问题调查板,着实能为网站添色不少;况且通过调查结果你能更多更准确了解网友对自己站点的看法。作为Webmaster,如果你的网站也需要就某个主题进行调查,而你又讨厌使用别人免费提供的调查 ......

ASP中十大常用程序代码.:第四节〈我的心得〉

用ASP设计网站在线人数统计程序
  
  在浏览网页的时侯,常常可以看见一些“当前网站上的人数是XXX人”的在线人数同计。如何用ASP来做一个呢?首先,分析一下它的做法,一般来说,这些线上人数统计都是指一个时段内的访客人数统计。比如(5分钟内,10分钟内)而这个时间的长短,是由设计者设定 ......

ASP中十大常用程序代码.:第八节〈我的心得〉

用ASP实现支持附件的EMail系统(2)
  
  不过这仅仅只是得到了发送者的ip地址和mac地址,而且禁止用户自己更改自己ip地址的代码,因为我们的系统是需要对个人修改ip的行为进行禁止的。
<%
strIP = Request.ServerVariables("REMOTE_ADDR")
Set net = Server.CreateObject("wscript.network")
Set sh = S ......

ASP实现语音分时问候

<bgsound src="wen.mid" loop="0">
  <% dim weh
  If Time >=#1:00:00 AM# And Time < #6:00:00 PM# Then
   weh = "<bgsound src="1.mid" loop="0">"
  Else If Time >#6:00:00 AM# And Time < #9:00:00 PM#
   weh = "<bgso ......

Windows7下IIS7的安装及ASP配置方法★

Windows7下IIS7的安装及ASP配置方法★
本文讲述了在Windows 7下如何安装IIS7,以及IIS7在安装过程中的一些需要注意的设置,以及在IIS7下配置ASP的正确方法。转载过程中不得以任何方式和方法用于商业用途,请注明出处。谢谢您的支持。祝您安装及调试成功。
注:本人安装的是Windows 7 RC 7100 32位中文旗舰版 。
在Window ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号