这个存储过程有没有错误？

[itzhiren]

CREATE PROCEDURE [Get_Customers_By_Page]
@CurrentPage int,
@PageSize int,
@TotalRecords int output
AS
--Create a temp table to hold the current page of data
--Add and ID column to count the records
CREATE TABLE #TempTable
(
c_yhm varchar(20),
c_zsjgdm varchar(8),
c_qxlx varchar (500),

)
--Fill the temp table with the zsjgdm data
INSERT INTO #TempTable
(
c_yhm,
c_zsjgdm,
c_qxlx
)
SELECT
c_yhm,
c_zsjgdm,
c_qxlx
FROM
Customers
--Create variable to identify the first and last record that should be selected
DECLARE @FirstRec int, @LastRec int
SELECT @FirstRec = (@CurrentPage - 1) * @PageSize
SELECT @LastRec = (@CurrentPage * @PageSize + 1)
--Select one page of data based on the record numbers above
SELECT
c_yhm,
c_zsjgdm,
c_qxlx
FROM
#TempTable
WHERE
ID > @FirstRec
AND
ID < @LastRec
--Return the total number of records available as an output parameter
SELECT @TotalRecords = COUNT(*) FROM zsjgdm
GO


运行时有错误：
本页无法显示
试图访问的网页出现问题，无法显示。

--------------------------------------------------------------------------------

请尝试以下方法：

单击 刷新按钮或者梢候再试。

打开 127.0.0.1 主页，然后查找与所需信息相关的链接。
HTTP 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务

--------------------------------------------------------------------------------

技术信息（适用于支持人员）

错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
/luntan/cun.asp, 第 29 行


浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0; .NET CLR 1.1.4322)

页：
GET /luntan/cun.asp

时间：
2005年5月26日, 9:00:09


详细信息：
Microsoft 支持

－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
调用的代码如下：

set conn=Server.CreateObject("ADODB.Connection")
' conn.ConnectionString="Provider=SQLOLEDB;Data Source=(local);Initial Catalog=sykxt;User ID=sa;Password=;"
conn.open "Driver={SQL Server};Server=(local);Database=ssxt;Uid=sa;Pwd="
set cmd=Server.CreateObject("ADODB.Command")
set cmd.ActiveConnection=conn
cmd.CommandType=4'AdCmdStoredProc
cmd.CommandText="Get_Customers_By_Page"
set rt=cmd.CreateParameter("RETURN_VALUE",adInteger,adParamReturnValue, 4)
cmd.Parameters.Append rt
set crtPage=cmd.CreateParameter("@CurrentPage",adInteger,adParamInput,4,Curpage)
cmd.Parameters.Append crtPage
set ps=cmd.CreateParameter("@PageSize",adInteger,adParamInput,4,PageSize)
cmd.Parameters.Append ps
set tRcd=cmd.CreateParameter("@TotalRecords",adInteger,adParamOutput,4)
cmd.Parameters.Append tRcd
cmd.Execute()'这就是第２９行

[itzhiren]

ｕｐ

[zhangjun]

请看我的例子
Dim adBigInt
adBigInt= 20
Dim CmdSP
Dim adoRS

Dim adCmdSPStoredProc
Dim adParamReturnValue
Dim adParamInput
Dim adParamOutput
Dim adInteger
Dim adVarChar
dim adNumeric
dim adBoolean


adCmdSPStoredProc = 4
adParamReturnValue = 4
adParamInput = 1
adParamOutput = 2
adInteger = 3
adVarChar = 200
adNumeric = 131
adBoolean = 11


Dim cmdTest, prmTest, rsTest

'定义返回值
Dim ReturnStr,tMsg

Set cmdTest = Server.CreateObject("ADODB.Command")

cmdTest.ActiveConnection = Conn

cmdTest.CommandText = "proc_import_friend" '存储过程名

cmdTest.CommandType = adCmdSPStoredProc



cmdTest.Parameters.Append cmdTest.CreateParameter("ReturnValue",adInteger,adParamReturnValue)
cmdTest.Parameters.Append cmdTest.CreateParameter("@Userid",adInteger,adParamInput,18,Userid)
cmdTest.Parameters.Append cmdTest.CreateParameter("@Groupid",adInteger,adParamInput,18,groupID)
cmdTest.Parameters.Append cmdTest.CreateParameter("@Phones",adVarChar,adParamInput,8000,bookList)

Set rsTest = cmdTest.Execute()

[aspnet003]

你确定是Customers？

[aspnet003]

我记得是网上的一个存储过程，你改的吧？没改彻底呀