[英]Checking if user name exists in database using a stored procedure in SQL Server
[英]Checking if a row already exists in SQL Server database using stored procedure
我插入了两行,它们具有表的相同内容,但是用于搜索现有数据的代码未返回期望的结果。
这是我的VB.Net代码:
Private Sub BtnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSave.Click
Try
If DateTimePicker1.Value.Date >= DateTime.Parse(TxtDateFrom.Text) And DateTimePicker1.Value.Date <= DateTime.Parse(TxtDateTo.Text) Then
Dim cmd1 As New SqlCommand
cmd1 = New SqlCommand("check_sched", connection)
cmd1.CommandType = CommandType.StoredProcedure
Dim rd As SqlDataReader
cmd1.Parameters.AddWithValue("@empid", Label17.Text)
cmd1.Parameters.AddWithValue("@datesched", DateTimePicker1.Value.Date)
cmd1.Parameters.AddWithValue("@timefrom", TimePicker1.Text)
cmd1.Parameters.AddWithValue("@timeto", TimePicker1.Text)
rd = cmd1.ExecuteReader()
If rd.HasRows Then
MsgBox("Employee already assigned a job for the particular time period", MsgBoxStyle.Information, "Change Time Period")
Else
Dim cmd As New SqlCommand
cmd = New SqlCommand("insert_schedule1", connection)
cmd.CommandType = CommandType.StoredProcedure
cmd.Parameters.Add("@actid", SqlDbType.Int).Value = Label2.Text
cmd.Parameters.Add("@activity", SqlDbType.NVarChar).Value = CmbActivity.Text
cmd.Parameters.Add("@serviceid", SqlDbType.Int).Value = Label14.Text
cmd.Parameters.Add("@servicename", SqlDbType.NVarChar).Value = TxtServiceType.Text
cmd.Parameters.Add("@pdatefrom", SqlDbType.NVarChar).Value = TxtDateFrom.Text
cmd.Parameters.Add("@pdateto", SqlDbType.NVarChar).Value = TxtDateTo.Text
cmd.Parameters.Add("@deptname", SqlDbType.NVarChar).Value = Label16.Text
cmd.Parameters.Add("@emp", SqlDbType.NVarChar).Value = CmbEmp.Text
cmd.Parameters.Add("@empid", SqlDbType.Int).Value = Label17.Text
cmd.Parameters.Add("@datesched", SqlDbType.DateTime).Value = myDate1
cmd.Parameters.Add("@timefrom", SqlDbType.Time).Value = TimePicker1.Value.TimeOfDay
cmd.Parameters.Add("@timeto", SqlDbType.Time).Value = TimePicker2.Value.TimeOfDay
cmd.Parameters.Add("@status", SqlDbType.Int).Value = "1"
cmd.ExecuteNonQuery()
MsgBox("Scheduled Successfully", MsgBoxStyle.Information, "Task Schedule")
CmbActivity.Text = ""
TxtServiceType.Text = ""
TxtDateFrom.Text = ""
TxtDateTo.Text = ""
'CmbSactivity.Text = ""
CmbEmp.Text = ""
DateTimePicker1.Text = Now
TimePicker1.Text = TimeOfDay
TimePicker2.Text = TimeOfDay
End If
Else
MsgBox("Please select a date within the duration", MsgBoxStyle.Information, "Invalid Date")
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
谁能帮我找到错误?
这是我的存储过程
create procedure check_sched
@empid int,
@datesched datetime,
@timefrom datetime,
@timeto datetime
as
begin
SELECT *
FROM tbl_schedule
WHERE empid = @empid
AND datesched = @datesched
AND timefrom >= @timefrom
AND timeto <= @timeto
end
表架构:
CREATE TABLE [dbo].[tbl_schedule]
(
[actid] [int] NULL,
[activity] [nvarchar](350) NULL,
[serviceid] [int] NULL,
[servicename] [nvarchar](50) NULL,
[pdatefrom] [nvarchar](50) NULL,
[pdateto] [nvarchar](50) NULL,
[sactid] [int] NULL,
[sactivity] [nvarchar](500) NULL,
[deptname] [nvarchar](150) NULL,
[emp] [nvarchar](150) NULL,
[empid] [int] NULL,
[datesched] [datetime] NULL,
[timefrom] [datetime] NULL,
[timeto] [datetime] NULL,
[actimefrom] [datetime] NULL,
[actimeto] [datetime] NULL,
[completed] [int] NULL,
[status] [int] NULL
) ON [PRIMARY]
您的检查计划对@timeFrom
和@timeTo
字段都使用TimePicker1
值,而您的插入分别使用TimePicker1
和TimePicker2
。 这使您的支票看错了日期。
为避免将来再出现此问题,并使查找这些错误变得更加容易,请尝试重构名称以使其与它们的作用相匹配(例如fromTimePicker
和toTimePicker
)。
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.