Dim cmdtblPatient As New SqlClient.SqlCommand("update tblPAInfo set memcomment = '" & TextBox1.Text & "', strowner = '" & ComboBox1.Text & "' where lngPatientid = " & lngpatientid, Connection1) Dim datblPatient As New SqlDataAdapter(cmdtblPatient) Try countupdate = cmdtblPatient.ExecuteNonQuery() Catch ex As Exception MsgBox(ex.Message) End Try
Gain unlimited access to on-demand training courses with an Experts Exchange subscription.Get Access
When asked, what has been your best career decision?
Deciding to stick with EE.
Being involved with EE helped me to grow personally and professionally.