ขึ้น Error : Must declare the scalar variable "@title".
โค้ด Private Sub ButtonSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonSave.Click
If IsDataComplete() = False Then
Exit Sub
End If
sql = "INSERT INTO Patient(PatiTitel, PatiName, PatiIDCard, PatiDate, PatiAdd, PatiTel) " & _
"VALUES(@title, @name, @idCard, @date, @Add, @tel)"
AddParameters(sql)
Dim r As Integer = command.ExecuteNonQuery()
If r = -1 Then
MessageBox.Show("เกิดข้อผิดพลาด ไม่สามารถเพิ่มข้อมูลได้")
Else
MessageBox.Show("บันทึกข้อมูลแล้ว")
ButtonAdd.PerformClick()
End If
End Sub
ขึ้น Error บรรทัพนี้ Dim r As Integer = command.ExecuteNonQuery()
จะแก้ยังไงดีค่ะ
กดปุ่ม Save แล้วขึ้น Error "@title" ค่ะ
โค้ด Private Sub ButtonSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonSave.Click
If IsDataComplete() = False Then
Exit Sub
End If
sql = "INSERT INTO Patient(PatiTitel, PatiName, PatiIDCard, PatiDate, PatiAdd, PatiTel) " & _
"VALUES(@title, @name, @idCard, @date, @Add, @tel)"
AddParameters(sql)
Dim r As Integer = command.ExecuteNonQuery()
If r = -1 Then
MessageBox.Show("เกิดข้อผิดพลาด ไม่สามารถเพิ่มข้อมูลได้")
Else
MessageBox.Show("บันทึกข้อมูลแล้ว")
ButtonAdd.PerformClick()
End If
End Sub
ขึ้น Error บรรทัพนี้ Dim r As Integer = command.ExecuteNonQuery()
จะแก้ยังไงดีค่ะ