1

このようなテーブル値パラメーターがあります

CREATE TYPE dbo.Loc AS TABLE(Lo integer);

私のストアドプロシージャは次のようになります。

ALTER PROCEDURE [dbo].[T_TransactionSummary]  
                        @startDate datetime,  
                        @endDate datetime,
                        @locations dbo.Loc readonly
              ..........................
              ...........................
WHERE     (Transaction_tbl.dtime BETWEEN @fromDate AND @toDate) 
AND (Location_tbl.Locid IN (select Lo from @locations))

複数のアイテムを含むリストボックスがあります。リストボックスから複数のアイテムを選択できます。複数の Locationid をストアド プロシージャに渡すにはどうすればよいですか

 cnt = LSTlocations.SelectedItems.Count
 If cnt > 0 Then
          For i = 0 To cnt - 1
        Dim locationanme As String = LSTlocations.SelectedItems(i).ToString
        locid = RecordID("Locid", "Location_tbl", "LocName", locationanme)
next
end if  


  Dim da As New SqlDataAdapter
            Dim ds As New DataSet
            Dim cmd23 As New SqlCommand("IBS_TransactionSummary", con.connect)
            cmd23.CommandType = CommandType.StoredProcedure
            cmd23.Parameters.Add("@startDate", SqlDbType.NVarChar, 50, ParameterDirection.Input).Value = startdate
            cmd23.Parameters.Add("@endDate", SqlDbType.NVarChar, 50, ParameterDirection.Input).Value = enddate
Dim tvp1 As SqlParameter =cmd23.Parameters.Add("@location", SqlDbType.Int).Value = locid
 tvp1.SqlDbType = SqlDbType.Structured
        tvp1.TypeName = "dbo.Loc"
     da.SelectCommand = cmd23
    da.Fill(ds)

しかし、私はエラーが発生しています..私はvb.netでWindowsフォームに取り組んでいます

4

3 に答える 3

1

これを行う方法の例がhttp://msdn.microsoft.com/en-us/library/bb675163%28v=vs.110%29.aspxにあります(「テーブル値パラメーターをストアド プロシージャ ")。

最も簡単なことは、ユーザーが選択した値を a に入力し、それをパラメーターDataTableのストアド プロシージャに渡すことです。@locations

おそらく、次のようなものでしょう (VB.NET がインストールされていないことに注意してください。これは、必ずしもすぐに機能するコードではなく、機能の概要として扱ってください)。

cnt = LSTlocations.SelectedItems.Count
' *** Set up the DataTable here: *** '
Dim locTable As New DataTable
locTable.Columns.Add("Lo", GetType(Integer))

If cnt > 0 Then
    For i = 0 To cnt - 1
        Dim locationanme As String = LSTlocations.SelectedItems(i).ToString
        locid = RecordID("Locid", "Location_tbl", "LocName", locationanme)
        ' *** Add the ID to the table here: *** '
        locTable.Rows.Add(locid)
    next
end if  

Dim da As New SqlDataAdapter
Dim ds As New DataSet
Dim cmd23 As New SqlCommand("IBS_TransactionSummary", con.connect)
cmd23.CommandType = CommandType.StoredProcedure
cmd23.Parameters.Add("@startDate", SqlDbType.NVarChar, 50, ParameterDirection.Input).Value = startdate
cmd23.Parameters.Add("@endDate", SqlDbType.NVarChar, 50, ParameterDirection.Input).Value = enddate
' *** Supply the DataTable as a parameter to the procedure here: *** '
Dim tvp1 As SqlParameter =cmd23.Parameters.AddWithValue("@location", locTable)
tvp1.SqlDbType = SqlDbType.Structured
tvp1.TypeName = "dbo.Loc"
da.SelectCommand = cmd23
da.Fill(ds)
于 2013-11-04T08:02:07.240 に答える
0

テーブルの種類 SQL SERVER 2008

SQL Server > = 2008 のバージョンの場合。

于 2013-11-04T07:43:06.810 に答える