Incorrect syntax
Private Sub UpdatePwdInUSRByUserID(userid As String, newPwd As String) Using con As New SqlConnection(ConfigurationManager.ConnectionStrings("HMRCRM_SQL").ConnectionString) Dim cmd = New SqlCommand((Convert.ToString((Convert.ToString("update USR set PASS = '") & newPwd) + "' ,LASTPWDMDDT = GETDATE()' ', where USRID = '") & userid) + "'") cmd.Connection = con con.Open() cmd.ExecuteNonQuery() cmd.Dispose() con.Close() End Using End Sub

Go to the complete details ...