Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!


How to update data using a radio button

AkagloAkaglo Member Posts: 4
The following code doesn't execute neither does it give any error message; therefore I'd be glad if someone could help me out by editing it for me:

Dim qry, subject As String
If rbnCore.Checked = True Then
subject = "Core"
Else : subject = "Elective"
End If
qry = "Update ProgramDetails.Subjects set SubjectCode=@SubjectCode,SubjectName=@SubjectName,SubjectType=@SubjectType,UserID=@UserID,UserName=@UserName,Password=@Password where SubjectCode='" & txtSubjectCode.Text & "'"
cmd = New SqlCommand(qry, cn)
cmd.Parameters.Add(New SqlParameter("@SubjectCode", txtSubjectCode.Text))
cmd.Parameters.Add(New SqlParameter("@SubjectName", txtSubName.Text))
cmd.Parameters.Add(New SqlParameter("@SubjectType", subject))
cmd.Parameters.Add(New SqlParameter("@UserID", txtUserName.Text))
cmd.Parameters.Add(New SqlParameter("@Password", txtPassword.Text))
MessageBox.Show("Record successfully updated", "Updated", MessageBoxButtons.OK, MessageBoxIcon.Information)
Catch ex As Exception
End Try

Sign In or Register to comment.