Private Sub BTNUPDATE_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTNUPDATE.Click connetionString = " Data Source=KEERTIG-PC\SQLEXPRESS;Initial Catalog=GAURAV1;Integrated Security=True" connection = New SqlConnection(connetionString) sql = "UPDATE ROOM_BOOKING SET FIRST_NAME= '" & TXTBSFNAME.Text & "',MIDDLE_NAME= '" & TXTBSMNAME.Text & "',LAST_NAME= '" & TXTBSLNAME.Text & "',NUM_OF_ROOM= '" & TXTBSNOROOM.Text & "',NUM_OF_DAYS= '" & TXTBSNODAYS.Text & "',MOBILE_NO= '" & TXTBSMOBNO.Text & "',ADDERESS= '" & TXTBSADDRESS.Text & "',ROOMBK_PRICE= '" & TXTBSPRICE.Text & "' WHERE ROOMBK_ID = '" & TXTBSBID.Text & "' " Try connection.Open() MsgBox(...
Comments
Post a Comment