0

一段时间以来,我一直在努力解决这个问题。

我有一个从表中检索字段并从中填充输入的函数,但是当我尝试执行该函数时,我收到一条错误消息,提示“过程或函数'Quad_GetAllFields'需要参数'@subWeek',但未提供”。

我知道我正在提供参数,因为我可以从函数中的任何位置访问它。

功能是:

Protected Sub setAllFields(ByVal myConnection As SqlConnection, ByVal subWeek As String, ByVal site As String)
    Dim myCommand = New SqlCommand("Quad_GetAllFields", myConnection)
    myCommand.Parameters.AddWithValue("@subWeek", subWeek)
    myCommand.Parameters.AddWithValue("@site", site)
    Dim myDataReader As SqlDataReader = myCommand.ExecuteReader()
    If myDataReader.Read() Then
        'populate fields
    End If
End Sub

存储过程是:

ALTER PROCEDURE dbo.Quad_GetAllFields
(
@subWeek VARCHAR(50),
@site VARCHAR(20)   
)
AS
BEGIN
SELECT TOP (1) ID, Priority1, Priority2, Priority3, Priority4, Highlight1, Highlight2, Highlight3, Highlight4, Update1, Update2, Update3, Ahead1, Ahead2, Ahead3, Outlook1, Outlook2, Comments, Site, Week, Submitted FROM Charts WHERE Week = @subWeek AND Site = @site ORDER BY ID DESC
END

对我做错了什么有帮助吗?

我在使用存储过程方面相当新,但我仍然找不到问题。

谢谢

4

2 回答 2

1

您必须将SqlCommand's CommandType属性设置为StoredProcedure,默认为Text

Protected Sub setAllFields(ByVal myConnection As SqlConnection, ByVal subWeek As String, ByVal site As String)
    Dim myCommand = New SqlCommand("Quad_GetAllFields", myConnection)
    myCommand.CommandType = CommandType.StoredProcedure
    myCommand.Parameters.AddWithValue("@subWeek", subWeek)
    myCommand.Parameters.AddWithValue("@site", site)
    Dim myDataReader As SqlDataReader = myCommand.ExecuteReader()
    If myDataReader.Read() Then
        'populate fields'
    End If
End Sub
于 2013-03-04T23:01:26.940 回答
0

如果您的字符串参数@subWeek 为空,您可能会收到此错误。

如果您的字符串为空,则需要为@subWeek 传递 DBNull.Value。

尝试硬编码 @subWeek 值

myCommand.Parameters.AddWithValue("@subWeek", "Myvalue")

这应该可以正常工作。

于 2013-03-04T22:19:57.350 回答