1

我正在尝试执行以下代码以使用 vb.net 从 infopath 表单调用 sql 过程，我调试并检查了错误，但代码正在正确执行，并且在检索执行过程后收到的输出消息时遇到问题。

请帮我尽快解决这些问题

谢谢

Try
         Dim con As New SqlConnection("Data Source= XXXX;Initial Catalog= XXXXX;Integrated Security=true")
         Dim cmd As New SqlCommand
         Dim dr As SqlDataReader
         con.Open()
         cmd.CommandType = Data.CommandType.StoredProcedure
         cmd.CommandText = "Procedure Name"
         cmd.Parameters.Add(New SqlParameter("@Name", SqlDbType.VarChar, 50)).Value = "XXX" 
         cmd.Parameters.Add(New SqlParameter("@CustID", SqlDbType.VarChar, 20)).Value = "XXX"  
         cmd.Connection = con
         dr = cmd.Executereader()
         dr.Read()
         If dr.HasRows Then
             MessageBox.Show(dr.GetString(0))
         End If
                con.Close()
Catch ex As Exception
         MessageBox.Show(ex.Message)
End Try

我的 Sql 程序：

enter code here

Create procedure Test_Infopath

@Name varchar(50),
@CustID Varchar(20)
      AS 

      Declare @Condition INT
      SELECT @Condition = CustID FROM temp_infopath WHERE CustID = @CustID
      IF @CustID= @Condition
      BEGIN 
                Print 'Customer ID already Exists'
      END
      Else 
                Print 'Submit the form to insert the data'
4

1 回答 1

0

所以你想在你的存储过程中返回消息，而不是一条记录。
然而，ADO.NET 的 SqlDataReader 和其他方法被认为返回记录而不是消息字符串。
我建议你以这种方式改变你的程序

ALTER PROCEDURE Test_Infopath
    @Name varchar(50),
    @CustID Varchar(20)
    AS 

    Declare @Condition INT
    SELECT @Condition = CustID FROM temp_infopath WHERE CustID = @CustID

    IF @CustID= @Condition
        SELECT 'Customer ID already Exists'
    Else 
        SELECT 'Submit the form to insert the data'

现在 SqlDataReader 会将消息视为 SELECT 返回的记录
顺便说一句，当您返回由单行组成的单条记录时，通常编写此场景的方法是通过 SqlCommand 的 ExecuteScalar 方法，而不涉及另一个对象实例像 SqlDataReader。

cmd.Connection = con
Dim message = cmd.ExecuteScalar().ToString()
MessageBox.Show(message)
于 2013-04-25T08:52:04.443 回答