SQL 插入和更新在 Toad 中有效，但在 VB.NET 代码中无效

Question

我有一个 Web 表单 aspx 页面，用于使用具有三个强制参数的存储过程将新客户端添加到客户端表。这是程序：

CREATE PROCEDURE [dbo].[proc_NewClient]
       @ClientCode  VARCHAR (12)
     , @ClientName  VARCHAR (100)
     , @ClientPhone VARCHAR (20)
AS
INSERT INTO Client (
       ClientCode
     , ClientName
     , ClientPhone
     )
VALUES (
       @ClientCode
     , @ClientName
     , @ClientPhone
     )

桌子：

CREATE TABLE [dbo].[Client]
     ( [ClientID]               INT IDENTITY (1, 1) NOT NULL
     , [ClientCode]             VARCHAR (12) NOT NULL
     , [ClientName]             VARCHAR (100) NOT NULL
     , [ClientPhone]            VARCHAR (20) NOT NULL
     )
ON [PRIMARY]

ClientID 是从 ClientContact 表中作为其外键引用的。

如果我使用像

这样的程序

exec proc_NewClient 'somecode','somename','5551212'

它在 Toad 中工作正常（尽管插入将接受一个空字符串，这令人费解）。然而，在 aspx 页面后面的 VB.NET 代码中，代码在此处中断：

Dim conSTR As String = ""
conSTR = System.Configuration.ConfigurationManager.ConnectionStrings("dbConnectionString").ConnectionString
Dim con As SqlConnection
con = New SqlConnection(conSTR)
Dim da As New SqlDataAdapter("proc_UpdateVendor", con)
da.SelectCommand.CommandType = CommandType.StoredProcedure
Dim da As New SqlDataAdapter("proc_NewClient", con)
'    prepare da with parameters etc
da.SelectCommand.ExecuteNonQuery()  '<-- code breaks here

有错误

The INSERT statement conflicted with the FOREIGN KEY constraint 
"PrimayContact_FK". The conflict occurred in database "db", 
table "dbo.ClientContact", column 'ClientContactID'.

我不明白这一点，也不知道如何调试它。非常感谢任何帮助。

编辑：这段代码在几周前工作了，除了错误检查和 cmets 之外，我在 VB 代码中没有进行任何更改。我没有更改存储过程或表中的任何内容。 ClientContact 表上有两个触发器：

CREATE TRIGGER [dbo].[trgClientContact_ins]
    ON [dbo].[ClientContact]
    FOR INSERT
AS
BEGIN
    UPDATE ClientContact
       SET RecCreateDate = CURRENT_TIMESTAMP
         , RecCreateUser = CURRENT_USER
      FROM ClientContact
     INNER JOIN inserted
        ON (ClientContact.ClientContactID = inserted.ClientContactID)
END

和

CREATE TRIGGER [dbo].[trgClientContact_upd]
    ON [dbo].[ClientContact]
    FOR UPDATE
AS
BEGIN
    UPDATE ClientContact
       SET RecModifyDate = CURRENT_TIMESTAMP
         , RecModifyUser = CURRENT_USER
      FROM ClientContact
     INNER JOIN inserted
        ON (ClientContact.ClientContactID = inserted.ClientContactID)
END

为什么在 Toad 中插入没有错误，但在 VB.NET 中却有错误。

EDIT2：我刚刚发现错误发生在更新和插入时，考虑到触发器，这似乎很明显。类似表等

EDIT3：ClientContact 的完整表描述

CREATE TABLE [dbo].[ClientContact]
(   [ClientContactID]        INT IDENTITY (1, 1) NOT NULL
 , [ClientID]               INT          NOT NULL
 , [CliContactName]         VARCHAR (50) NOT NULL
 , [CliContactPhone]        VARCHAR (20) NULL
 , [CliContactFax]          VARCHAR (20) NULL
 , [CliContactPager]        VARCHAR (20) NULL
 , [CliContactMobile]       VARCHAR (20) NULL
 , [CliContactEmergency]    VARCHAR (20) NULL
 , [CliContactPhoneExt]     VARCHAR (10) NULL
 , [CliContactFaxExt]       VARCHAR (10) NULL
 , [CliContactPagerExt]     VARCHAR (10) NULL
 , [CliContactMobileExt]    VARCHAR (10) NULL
 , [CliContactEmergencyExt] VARCHAR (10) NULL
 , [CliContactEmail]        VARCHAR (200)NULL
 , [RecTimestamp]           TIMESTAMP    NULL
 , [RecCreateDate]          DATETIME     NULL
 , [RecCreateUser]          VARCHAR (100)NULL
 , [RecModifyDate]          DATETIME     NULL
 , [RecModifyUser]          VARCHAR (100)NULL
 , [CliContactNotes]        VARCHAR (2000) NULL
 , PRIMARY KEY NONCLUSTERED
    ([ClientContactID] ASC)
    WITH (PAD_INDEX = OFF
        , FILLFACTOR = 90
        , IGNORE_DUP_KEY = OFF
        , STATISTICS_NORECOMPUTE = OFF
        , ALLOW_ROW_LOCKS = ON
        , ALLOW_PAGE_LOCKS = ON
        , DATA_COMPRESSION = NONE)
    ON [PRIMARY]
, FOREIGN KEY ([ClientID]) REFERENCES [dbo].[Client] ([ClientID])
)
ON [PRIMARY]

Answer 1

您缺少过程中的参数

Dim da As New SqlDataAdapter("proc_UpdateVendor", con)
da.SelectCommand.CommandType = CommandType.StoredProcedure
MyCommand.Parameters.AddWithValue("@ClientCode", "myvalue")
MyCommand.Parameters.AddWithValue("@myparameter2", "myvalue2")
'add the others
da.SelectCommand.ExecuteNonQuery()

Answer 2

问题出在业务规则中。必填字段ClientContactID 没有要传递的数据，因为作为新客户，ClientContact 表中没有联系人。

感谢大家的帮助，你们的回答和 cmets 肯定帮助我解决了这个问题。

Answer 3

我认为您需要将 SelectCommand 类型设置为 CommandType.StoredProcedure。

请参阅this Stack Overflow answer 了解如何设置。